danke für die antwort.
mein problem ist folgendes:
die in forms.pas implementierte processmessages verarbeitet die messages solange
bis keine mehr da sind (while):
Delphi-Quellcode:
procedure TApplication.ProcessMessages;
var
Msg: TMsg;
begin
while ProcessMessage(Msg) do {loop};
end;
ich bräuchte aber eine funktion die immer nur eine verarbeitet. deshalb wollte
das wie folgt änder:
Delphi-Quellcode:
procedure TApplication.myProcessMessages;
var
Msg: TMsg;
begin
ProcessMessage(Msg);
end;
dafür gibt es bestimmt eine bessere lösung oder?
ein ansatz von mir sah so aus (hat aber leider nicht 100% funktioniert):
Delphi-Quellcode:
if not GetMessage(msg, 0, 0, 0) then halt;
TranslateMessage(Msg);
DispatchMessage(Msg);
danke...