Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Name mit Endung (https://www.delphipraxis.net/23924-name-mit-endung.html)

Masterof 12. Jun 2004 08:57


Name mit Endung
 
Hallo!!

Wie bekomme ich von einem Prozess den genauen Namen mit Endung, meist exe. Ich habe ein Programm geschrieben um einen Task nach einser bestimmten Zeit zu beenden. Ich lese aber immer nur den Titel aus. Wenn der Titel = der Exe ist, dann funktioniert das auch. Meine Ansicht sollte so aussehen wie im Windows Taskmanager die erste Spalte Name.
MfG Master

S2B 12. Jun 2004 08:58

Re: Name mit Endung
 
Welchen Code benutzt du denn, um die Prozesse aufzulisten?

Masterof 12. Jun 2004 10:01

Re: Name mit Endung
 
Hallo!! Also hier ist mein Quelltext zum auslesen des Namens.

Delphi-Quellcode:
function EnumWindowsProc(Wnd: HWND; LParam: LPARAM):BOOL; stdcall;
var PID : LongWord;
    Title : array[0..255] of char;
begin
 result := true;
 If (IsWindowVisible(Wnd) or IsIconic(wnd)) and
    ((GetWindowLong(Wnd, GWL_HWNDPARENT) = 0) or
    (GetWindowLong(Wnd, GWL_HWNDPARENT) = GetDesktopWindow)) and
    (GetWindowLong(Wnd, GWL_EXSTYLE) and WS_EX_TOOLWINDOW = 0) then
     begin
      GetWindowThreadProcessID(Wnd, @PID);
      GetWindowText(Wnd, Title, 256);
      with frmmain.lvprocess.Items.Add do
      begin
       Caption:= Title;
       Subitems.Add(IntToStr(PID));
      end;
    end;
end;
Master :)

Luckie 12. Jun 2004 10:17

Re: Name mit Endung
 
Das sind nicht die Prozesse, das sind die Namen der Fenster. Die Prozesse bekommst du so: http://www.luckie-online.de/Ablage/Delphi-Quellcodes/


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:32 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz