hi all
also wie ich die processe aufliste weis ich ja aber wie realisiere ich das per remote??
A:Client
B:Server
A verbindet sich zu B, A clickt auf button Refresh und bekommt die processe von B in einer listview aufgelistet! und wie stell ich das nun an??
für local wäre diese source
Delphi-Quellcode:
uses TLHelp32;
procedure Tmasta.btnRefreshProcessClick(Sender: TObject);
var
i: Integer;
bContinue: BOOL;
NewItem: TListItem;
begin
ListView2.Items.Clear;
aSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
aProcessEntry32.dwSize := SizeOf(aProcessEntry32);
bContinue := Process32First(aSnapshotHandle, aProcessEntry32);
while Integer(bContinue) <> 0 do
begin
NewItem := ListView2.Items.Add;
NewItem.Caption := ExtractFileName(aProcessEntry32.szExeFile);
NewItem.subItems.Add(IntToHex(aProcessEntry32.th32ProcessID, 4));
NewItem.subItems.Add(aProcessEntry32.szExeFile);
bContinue := Process32Next(aSnapshotHandle, aProcessEntry32);
end;
CloseHandle(aSnapshotHandle);
end;
was müsst ich alles verändern damit das per Remote klappt?? danke schon im vorraus
Zero1