hi,
wie wärs wenn du ne globale var machst die du dann auf true setzt wenn das einmal durchgelaufen ist ?
Delphi-Quellcode:
procedure TForm1.MyMessage(var Msg:TMsg; var Handled:Boolean);
begin
if ( not handled ) and ( Msg.message=HCWM_SET ) then begin
ShowMessage('SET-OK');
Handled:=True;
end
else
exit;
end;
(nicht getestet, müsste aber klappen)
Powerstreamer