juhuuu...ich glaube ich habs
Delphi-Quellcode:
var
AForegroundPID : dword;
AMyWindow : boolean;
begin
AForegroundPID := 0;
getWindowThreadProcessId(GetForegroundWindow, @AForegroundPID);
AMyWindow := AForegroundPID = getCurrentProcessId;
caption := BoolToStr(AMyWindow);
end;
Mit dem @-Operator funktionierts auch unter Delphi5.
