Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by jaenicke,
2. Nov 2020
Empfang der Nachricht:const
MyMessage = WM_APP + 100;
type
TBlubForm = class(TForm)
protected
procedure WmMyMessage(var Msg: TMessage); message MyMessage;
end;
implementation
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by jaenicke,
31. Okt 2020
Ein Timer ist gar nicht nötig. Es sollte reichen dir selbst mit PostMessage eine Nachricht zu schicken. Die wird dann hinter den vorhandenen Nachrichten in die Warteschlange eingereiht, also auch hinter den noch anstehenden Mausereignissen (bei Drag & Drop, sprich wenn man mit der Maus noch nicht fertig ist, geht das natürlich z.B. nicht).