Форум: "Основная";
Текущий архив: 2003.02.13;
Скачать: [xml.tar.bz2];
ВнизДва в одном.Помогите кто чем может Найти похожие ветки
← →
dimich1978 (2003-02-04 09:18) [0]Как можно по Hendl"у окна получить имя исполняемого файла?
Ну типа
Handle=Winword
File=winword.exe
или
Handle=Winmp 2.8 Гарик сукачев mp3 3.42
File=winamp.exe
И еще видел в форуме ответ на вопрос, но не нашел его, как сделать форму поверх всех(это StayOnTop), но даже когда она неактивна....а вот с этим у меня и проблема.
Плиз помогите. Заранее всем благодарен.
← →
Игорь Шевченко (2003-02-04 10:35) [1]
> Как можно по Hendl"у окна получить имя исполняемого файла?
В кладовке, в разделе "готовые программы" лежит программа EnumFunctions. Для NT/Win2k/WinXP там есть функция, делающая это.
← →
dimich1978 (2003-02-04 10:55) [2]Спасибо
← →
Sheriff (2003-02-04 10:55) [3]кривовато, но у меня работает:
uses ..., TlHelp32;
var
Handle: THandle;
hProcess: THandle;
ProcId: LongInt;
hSnapshoot: THandle;
me32: TModuleEntry32;
begin
Handle:=FindWindow(nil,PChar("C:\Borland\Delphi5\Project\LanScan"));
if Handle=0 then exit;
hProcess:=GetWindowThreadProcessId(Handle, @ProcId);
if hProcess=0 then exit;
hSnapshoot := CreateToolhelp32Snapshot(TH32CS_SNAPMODULE, ProcId);
if hSnapshoot = -1 then exit;
if Module32First(hSnapshoot, me32) then Memo2.Lines.add(me32.szExePath);
end;
← →
Anatoly Podgoretsky (2003-02-04 11:00) [4]Sheriff (04.02.03 10:55)
На НТ4?
← →
Sheriff (2003-02-04 11:14) [5]на ХР
← →
Anatoly Podgoretsky (2003-02-04 11:30) [6]Sheriff (04.02.03 10:55)
А при чем тут ХР?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.02.13;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.014 c