hallo.
ich habe folgendes problem:
sobald ich EnumWindows mit einem thread koppel kracht es:
Delphi-Quellcode:
type
TMyThread = class(TThread)
private
function GetPid(hHwnd: HWND; lParam : Integer): Boolean; stdcall;
protected
procedure Execute; override;
public
constructor Create; virtual;
end;
constructor TMyThread.Create;
begin
FreeOnTerminate:=True;
inherited Create(false);
end;
function TMyThread.GetPid(hHwnd: HWND; lParam : Integer): Boolean; stdcall;
begin
if (hHwnd=0) then Result:=False
else Result:=True;
//code gekürzt aber kracht ja trozdem ;-)
end;
procedure TMyThread.Execute;
begin
while not Terminated do
begin
EnumWindows(@TMyThread.GetPid, 0);
Sleep(5000);
end;
end;
die GetPid funktion wird aufgerufen und am ende gibts dann eine zugriffsverletzung in der ntdll.dll
dachte dann noch, dass evtl. die deklaration in den public teil muss, damit windows auf die callback funktion zugreifen kann aber das ändert auch nichts
. sobald ich die funktion aus dem thread nehme klappt es. ich will aber auf thread interne variablen zugreifen...
jemand ne idee?