Показать сообщение отдельно
  #2  
Старый 05.03.2009, 14:31
Аватар для Rokuell
Rokuell Rokuell вне форума
Активный
 
Регистрация: 27.12.2006
Адрес: Псков
Сообщения: 274
Версия Delphi: Delphi 7
Репутация: 497
Сообщение

Код:
GetModuleName(GetClassLong(handle,GCL_HMODULE))
функция возвращает строку с полным именем файла
handle - это тебе известно
__________________
Велик и могуч наш Object Pascal !
ICQ: 357-591-887
Ответить с цитированием