Вниз
Скачать: CL | DM;

имя программы   Найти похожие ветки 

← →
Iris ©   (2008-09-24 12:16) [0]

Нужно получить имя запущенного приложения
(можно полный путь к нему + имя).
Как это можно сделать?


← →
Поросенок Винни-Пух ©   (2008-09-24 12:17) [1]

Имя? а что это?


← →
Правильный$Вася   (2008-09-24 12:18) [2]

Application.exename
ParamStr(0)


← →
Поросенок Винни-Пух ©   (2008-09-24 12:19) [3]

(можно полный путь к нему + имя).

Вот и интересно что такое имя, если полный путь это не оно.


← →
Fiery dragon ©   (2008-09-24 12:24) [4]

var
Directory:Shortstring;

begin
Directory:=Application.ExeName;Directory:=ExtractFileDir(Directory);
if Directory[Length(Directory)]<>"\" then Directory:=Directory+"\";
end;


← →
Dennis I. Komarov ©   (2008-09-24 12:27) [5]


> if Directory[Length(Directory)]<>"\" then Directory:=Directory+"\";

Фу, как не культурно...


← →
{RASkov} ©   (2008-09-24 12:29) [6]

> [4] Fiery dragon ©   (24.09.08 12:24)

Сам придумал? :)


← →
Fiery dragon ©   (2008-09-24 12:29) [7]

Интересно, а как культурно?


← →
Dennis I. Komarov ©   (2008-09-24 12:38) [8]


> Fiery dragon ©   (24.09.08 12:29) [7]

IncludeTrailingPathDelimiter


← →
Vlad Oshin ©   (2008-09-24 12:39) [9]

ShowMessage(ExtractFilePath(Application.ExeName)+" + " +ExtractFileName(Application.ExeName));


← →
Dennis I. Komarov ©   (2008-09-24 12:53) [10]


> Dennis I. Komarov ©   (24.09.08 12:38) [8]

+ если нужен "\" то пользуй ExtractFilePath


← →
Iris ©   (2008-09-24 13:17) [11]

всем спасибо



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.016 c
6-1194405257
Lemon
2007-11-07 06:14
2008.11.02
Программно закрыть порт


15-1221033743
*Pavel
2008-09-10 12:02
2008.11.02
Права на папки в домене Windows 2003


4-1198918810
Winni
2007-12-29 12:00
2008.11.02
FindNextFile


2-1222241412
Nick87
2008-09-24 11:30
2008.11.02
SQLзапрос


1-1201861006
Still Swamp
2008-02-01 13:16
2008.11.02
Обшуршивание компонент на предмет строк




   Наверх