Вопросы по Delphi (все версии) - часть 3 - [97] :: Прикладное программирование :: Компьютерный форум Ru.Board
Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (все версии) - часть 3

Модерирует : ShIvADeSt

ShIvADeSt (07-04-2008 02:27): продолжение в http://forum.ru-board.com/topic.cgi?forum=33&topic=9383  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

   

Jokerjar79



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

Цитата:
юзеру? -- не фиг ему там делать, для него гуй сделан...

Изначально, как я помню, проблема стояла в размещении комментариев в ini файле. Они то, скорей всего, как раз и нужны юзеру.

Всего записей: 710 | Зарегистр. 08-09-2007 | Отправлено: 07:29 19-03-2008
ILSOFT

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
akaGM

Цитата:
хмл -- давно стандарт, кросс-платформа, библиотек до фига, зачем? от добра добра не ищут...

предложил как вариант, не нравитсяя не ешь может кому пригодится

Всего записей: 231 | Зарегистр. 20-09-2002 | Отправлено: 07:31 19-03-2008
myxa0

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Как узнать размер изображения в дюймах?

Всего записей: 76 | Зарегистр. 02-01-2005 | Отправлено: 07:35 19-03-2008
Jokerjar79



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Как определить описание exe?
 

Всего записей: 710 | Зарегистр. 08-09-2007 | Отправлено: 08:46 19-03-2008
RostY



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Jokerjar79
Project - Options - закладка Application - свойство Title
 
Добавлено:
myxa0
если есть в сантиметрах, то поделить на 2.54.
если в пикселях - то делить на dpi

Всего записей: 387 | Зарегистр. 11-01-2006 | Отправлено: 09:18 19-03-2008
Jokerjar79



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
RostY, это да. Я имею в виду определить данное описание у произвольного exe'шника. Сорри, что сразу не оконкретизировал свой вопрос

Всего записей: 710 | Зарегистр. 08-09-2007 | Отправлено: 09:31 19-03-2008
SERGE_BLIZNUK

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Jokerjar79 очень рекомендую Delphi World цитата оттуда... Получаем информацию о версии файла [?]

Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 10:53 19-03-2008
xy



ХУдератор
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Jokerjar79
я использую http://www.delphidabbler.com/software/verinfo?mid=3.1
всё просто и лаконично работает ;)

----------
Счастливые мысли приводят к счастливой клеточной биохимии

Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 11:22 19-03-2008
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
fcdobpiy
чтобы не прыгать с версии на версию, я использую встроенный родной, всё в сорсах, c хелпом, всё прозрачно...
../sources/win32/xml/

Всего записей: 25518 | Зарегистр. 06-12-2002 | Отправлено: 13:21 19-03-2008
Diadema



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
В SQL есть таблица "Процедуры", где записаны ID и Name процедур
Есть таблица "Группы процедур", где записаны ID и Name групп процедур
И, наконец, есть третья таблица, которая связывает первую и вторую.
Как можно создать грид, который будет добавлять строки в третью группу?
 
Добавлено:
Т.е. третью таблицу

Всего записей: 185 | Зарегистр. 17-01-2006 | Отправлено: 15:50 19-03-2008
Jokerjar79



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
xy, я пользуюсь бесплатной Turbo Delphi
 
В общем, вот решение моей проблемы:
 

Код:
function GetFileDescription(FileName: string): string;
var
  szName: array[0..255] of Char;
  P: Pointer;
  Value: Pointer;
  Len: UINT;
  GetTranslationString:string;
  FFileName: PChar;
  FValid:boolean;
  FSize: DWORD;
  FHandle: DWORD;
  FBuffer: PChar;
begin
  try
    FFileName := StrPCopy(StrAlloc(Length(FileName) + 1), FileName);
    FValid := False;
    FSize := GetFileVersionInfoSize(FFileName, FHandle);
    if FSize > 0 then
      try
        GetMem(FBuffer, FSize);
        FValid := GetFileVersionInfo(FFileName, FHandle, FSize, FBuffer);
      except
        FValid := False;
        raise;
      end;
    Result := '';
    if FValid then
      VerQueryValue(FBuffer, '\VarFileInfo\Translation', p, Len)
    else
      p := nil;
    if P <> nil then
      GetTranslationString := IntToHex(MakeLong(HiWord(Longint(P^)), LoWord(Longint(P^))), 8);
    if FValid then
      begin
        StrPCopy(szName, '\StringFileInfo\' + GetTranslationString + '\FileDescription');
        if VerQueryValue(FBuffer, szName, Value, Len) then
          Result := StrPas(PChar(Value));
      end;
  finally
    try
      if FBuffer <> nil then
        FreeMem(FBuffer, FSize);
    except
    end;
    try
      StrDispose(FFileName);
    except
    end;
  end;
end;
 


Всего записей: 710 | Зарегистр. 08-09-2007 | Отправлено: 16:55 19-03-2008
xy



ХУдератор
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Jokerjar79

Цитата:
я пользуюсь бесплатной Turbo Delphi  

эту фразу не понял
 
в остальном вроде компактное решение, главное чтоб устраивало

Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 22:00 19-03-2008
Frodo_Torbins

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
xy
Turbo Delphi Explorer не позволяет ставить компоненты, но зато является бесплатной.

Всего записей: 2322 | Зарегистр. 24-05-2007 | Отправлено: 22:05 19-03-2008
HellChild

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Помогите, подскажите. Пишу прогу, которая создаёт текстовый файл, записывает в него
содержимое "Мемо" при нажатии кнопки. Но принажатии другой кнопки для открытия файла и помещения его содержимого обратно в "мемо" выдаёт ошибку "104 I/O....." что это может быть?

Всего записей: 18 | Зарегистр. 20-03-2008 | Отправлено: 23:38 22-03-2008
RomanTim

Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
HellChild
А гугл уже отменили? Первая же ссылка по запросу "delphi error 104" - список кодов рантаймовых ошибок делфи, где написано: 104 File not open for input
Вообще то у Memo.Lines есть методы SaveToFile и LoadFromFile, зачем велосипед сочинять?

Всего записей: 375 | Зарегистр. 11-09-2003 | Отправлено: 02:22 23-03-2008 | Исправлено: RomanTim, 02:23 23-03-2008
JasonX

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Помогите разобраться почему эти два фрагмента не работают вместе.
 
Пардон муа, нашел ошибку. Можно удалить мой пост.
 
     

Всего записей: 1 | Зарегистр. 06-01-2008 | Отправлено: 10:54 23-03-2008 | Исправлено: JasonX, 20:43 23-03-2008
HalfLitre



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Вопрос не по программированию, но может кто-нибудь сталкивался.
Есть куча проектов (Delphi-7) но только два из них ведут себя странно и
при этом только в этих проектах используется MyDAC от crlab.com.
Странность заключается в том что в IDE при открытом (не запущенном) проекте
даешь команду из меню "File -> Close All" и delphi вылетает c AV.  
Все остальные проекты такой болезнью
не страдают. Делал и Repair и  ReInstall delphi, ничего не помогает.


Всего записей: 265 | Зарегистр. 16-08-2004 | Отправлено: 19:29 24-03-2008
RostY



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
HalfLitre
1. попробуй поудаляй (перемести в другое место) из папки проекта *.dcu, *.dof, *.dsk, *.dti
2. Возможно, используются примочки к дельфи типа coderush, castalia... (у меня вылетал дельфи-5 с coderush, правда без MyDac. Так и не разобрался из-за чего).
3. Если создаешь новый проект з майдаками (формочку и несколько компонентов) тож вылетает ?
4. в DesignTime у тебя в проектах Dataset'ы  открытые ?

Всего записей: 387 | Зарегистр. 11-01-2006 | Отправлено: 09:20 25-03-2008
HalfLitre



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
RostY
1.Попробовал, не помогло.
2.Стоял CnWizards (типа Castalia), снес, не помогло.
4.Все открывается только в run-time  
 
3.Попробовал, что интересно не вылетает.
Мистика блин

Всего записей: 265 | Зарегистр. 16-08-2004 | Отправлено: 15:02 25-03-2008 | Исправлено: HalfLitre, 15:03 25-03-2008
DmitryKz

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Ребята, если у кого есть книга Дарахвелидзе Марков Программирование в Delphi 7 не могли бы выложить содержимое дискеты отдельно. А то купил книгу, а дискета не читается.

Всего записей: 3147 | Зарегистр. 29-09-2005 | Отправлено: 19:00 25-03-2008
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (все версии) - часть 3
ShIvADeSt (07-04-2008 02:27): продолжение в http://forum.ru-board.com/topic.cgi?forum=33&topic=9383


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2025

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru