Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как узнать имя


shader ©   (2004-02-17 02:02:00) 

мне нужно узнать имя программы из неё самой как ето возможно реализовать


Игорь Шевченко   (2004-02-17 12:55:00) [1]

Alex Konshin ©   (17.02.04 10:15)

В случае GetModuleFileName должно возвратить имя EXE'шника, по идее, так как эта функция честно черпает информацию из списка загруженных модулей в PEB. На мой взгляд, даже для сервисов. ParamStr(0), кстати, тоже, так как

if Index = 0 then
   SetString(Result, Buffer, GetModuleFileName(0, Buffer, SizeOf(Buffer)))
 else


_Прохожий   (2004-02-17 12:08:00) [2]

Application.Title? :)


Alex Konshin   (2004-02-17 10:15:00) [3]

ParamStr(0);

Еще варианты? :)
Ты бы еще упомянул, что на самом деле твой вариант более правильный.

Кстати, помнится, что в случае сервисов ParamStr(0) и, соответственно, Application.ExeName пустой (или что-то другое возвращают, я уж не помню). А что в случае GetModuleFilename?
Или опять путаю?


Игорь Шевченко   (2004-02-17 09:57:00) [4]

GetModuleFileName(0, ...) ?


DDA   (2004-02-17 02:04:00) [5]

Если имя ехе-шника то ExtractFileName(Application.ExeName);


Наверх

Титульная страница Поиск, карта сайта Написать письмо