Имя программы Delphi7

[-Jack-]

Всем доброго времени суток. Кто может подсказать, каким образом можно определить имя запускаемого exe-шника ? Т.е. хочу сделать проверку, переименовывается запускаемый мой exe файл пользователем или нет...

[BDA]

ExtractFileName(ParamStr(0));

[-Jack-]

А можно чуть по подробней ? )
а не, всё, сообразил )))
Спасибо за помощь !

[Человек_Борща]

вам дали готовый код, че подробней-то?
Описние этого модно даже в основах delphi найти(ссылка в самом верху форума).

[Shouldercannon]

Сообщение от -Jack-

каким образом можно определить имя запускаемого exe-шника ?

или

ExtractFileName(Application.ExeName);

Скорее всего имя уже где-то есть исходя из того, что вы его запускаете.

[QunneD]

var
  lpBuffer : array[0..MAX_PATH] of char;
  hr : _SHFILEINFO;
begin
  GetModuleFileName(GetModuleHandle(nil), @lpBuffer, MAX_PATH);
  SHGetFileInfo(@lpBuffer, 0, hr, sizeof(hr), SHGFI_DISPLAYNAME);
  MessageBoxA(0, hr.szDisplayName, '', 0);
end;

#include <Windows.h>
#include <ShellAPI.h>

int APIENTRY WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
	char lpBuffer[MAX_PATH];
	SHFILEINFO hr;
	GetModuleFileName(hInstance, lpBuffer, MAX_PATH);
	SHGetFileInfo(lpBuffer, 0, &hr, sizeof(hr), SHGFI_DISPLAYNAME);
	MessageBox(0, hr.szDisplayName, "", 0);
}

[p51x]

Последний код особо актуален для вопроса про Delphi 7...

[QunneD]

Последний код особо актуален для вопроса про Delphi 7...

Имеешь что-то против дополнительной заметочки для сишных юзеров? Если нет, то стоило бы промолчать.

[p51x]

Имею, это раздел не сишных юзеров... Вот с таких заметочек и начинаются помойки по разделам.

[Serge_Bliznykov]

Сообщение от QunneD

Имеешь что-то против дополнительной заметочки для сишных юзеров?

QunneD, А почему же такая дискриминация? Где такой же код для TurboPascal'а, Visual Basic'а, Java и C# ??! почему только для Сишных программеров такие подарки?!

Если Вас раздел, где тема помещена не смущает, тогда хотя бы на название темы внимание обратите...


p.s. и предвосхищая ваш ответ - да, я лично имею что-то против помещения ответа на ЯП, который не имеет отношения к разделу и теме.

p.p.s. вопросы в моём сообщении, разумеется, риторические!