Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Prozesse eines anderen Rechners anzeigen (https://www.delphipraxis.net/70831-prozesse-eines-anderen-rechners-anzeigen.html)

robinWie 5. Jun 2006 15:23


Prozesse eines anderen Rechners anzeigen
 
Hi,
ich suche die Möglichkeit mir die Prozesse anzeigen zu lassen, die auf einem Computer im LAN laufen. Ich habe zwar was in der CL gefunden aber diese Möglichkeit kommt mir einfacher vor. Außerdem habe ich in den Text aus der CL ständig Fehermeldungen drin. Problem: Wie bediene ich die Kompo? Kann mir jemand helfen? Habe schon ein bisschen rum gebastelt aber das funzt alles nicht.

Danke im Voraus
:cheers:
Robin

Van HelF 5. Jun 2006 15:28

Re: Prozesse eines anderen Rechners anzeigen
 
du kannst einen client proggen. der auf dem anderen rechner lüuft und dir dann dir daten zuschickt.

vl. hilft dir das ja weiter :
Delphi-Quellcode:
Mithilfe folgende Procedure können alle laufenden Prozesse ermittelt werden. Als Parameter wird eine Liste, die vom Typ TStrings abgeleitet ist, erwartet. Diese Liste wird mit den jeweiligen Dateinamen gefüllt. Zusätzlich muss die Unit tlhelp32 eingebunden werden.

uses
 tlhelp32;

procedure GetProcessList(const aProcessList: TStrings);
var
  Snap: THandle;
  ProcessE: TProcessEntry32;
begin
  aProcessList.Clear;
  Snap := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
  try
    ProcessE.dwSize := SizeOf(ProcessE);
    if Process32First(Snap, ProcessE) then
      Repeat
        aProcessList.Add(ProcessE.szExeFile);
      Until not Process32Next(Snap, ProcessE)
    else
      RaiseLastOSError;
  finally
    CloseHandle(Snap);
  end;
end;

Hinweis für Benutzer bis Delphi 5: Ersetzen Sie RaiseLastOSError bitte durch RaiseLastWin32Error.

Die Procedure läuft unter W98, WME, W2k und WXP. Aufgerufen werden kann die Procedure beispielsweise so:

procedure TForm1.Button1Click(Sender: TObject);
begin
 GetProcessList(listbox1.Items);
end;

robinWie 5. Jun 2006 15:41

Re: Prozesse eines anderen Rechners anzeigen
 
Danke für den Tipp. Ich versuchs mal mit den Sockets


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:45 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