Top.Mail.Ru
Ответы

Киньте плиз примерчик, как имя исполняемого файла с помощью GetModuleFileName в Дельфи выудить.

Весь Тырнет облазил. Только описание функции нашел.

По дате
По рейтингу
Аватар пользователя
Новичок
16лет

Например:
-----------------------------------------
var
wStr : string;
wNSize : LongWord;
hModule :HInst;
begin
SetLength(wStr,260);
hModule := GetModuleHandle(nil);
if GetModuleFileName(hModule,PChar(wStr),wNSize) <> 0 then
// wStr содержит имя файла с текущей программой
else
// Ошибка
;
end;

Аватар пользователя
Мастер
16лет

А Paramstr(0); не подойдет ?
а Application.ExeName; тоже не канает ?

Аватар пользователя
Ученик
16лет

var fn : string;
fn := GetModuleName(0);