Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
14. Mär 2008
Ich hab das mal mit 2 Listboxen getestet, da geht es.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
13. Mär 2008
Delphi öffnen, "Perform" eintippen, markieren -> F1 :mrgreen: . Aber ich will mal nicht so sein:procedure TForm1.WndMessage(var msg: TMessage);
begin
case msg.Msg of
WM_VSCROLL,
WM_MOUSEWHEEL: SynEdit2.Perform(msg.Msg, msg.wParam, msg.lParam);
end;
_OldProc(msg);
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
13. Mär 2008
Und mit Perform, wie oben vorgeschlagen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
13. Mär 2008
Ich denke, das Ganze lässt sich doch vereinfachen (aus dem Kopf):procedure TForm1.WndMessage(var msg: TMessage);
begin
case msg.Msg of
WM_VSCROLL,
WM_MOUSEWHEEL: SendMessage(SynEdit2.Handle,
msg.Msg,
msg.wParam,
msg.lParam);
end;
_OldProc(msg);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
13. Mär 2008
Gegenfrage: wieso schickst Du nicht einfach WM_MOUSEWHEEL an das andere Synedit? Die Parameter kannst Du doch 1:1 mit übergeben, wenn ich jetzt keinen Denkfehler habe.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
13. Mär 2008
In meiner Hilfe zu WM_MOUSEWHEEL steht: