Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Panthrax,
19. Mär 2010
So geht's:
type
TMyMemo = class(TMemo)
public
procedure WMMouseWheel(var Message: TWMMouseWheel); message WM_MOUSEWHEEL;
end;
{ TMyMemo }
procedure TMyMemo.WMMouseWheel(var Message: TWMMouseWheel);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Panthrax,
18. Mär 2010
:wiejetzt: Junge, junge, so langsam glaube ich, das Thema ist verhext...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Panthrax,
17. Mär 2010
Argh, stimmt, dass mir die Idee nicht gekommen ist... Manchmal lässt man sich durch Fragesteller aber auch sowas von irritieren... :duck: :spin2:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Panthrax,
16. Mär 2010
Das Projekt im Anhang zeigt, wie es gehen könnte. Es ist nicht perfekt, und um ehrlich zu sein, glaube ich, der Teufel steckt hier noch richtig im Detail. Diese Fehler sind bekannt:
* Kommunikation zwischen Memo und Laufleiste ist unvollständig. Es gibt keine Positionsanpassung, wenn im Memo am Ende geschrieben wird.
* Die Berechnung der Werte PageSize und Max stimmt nicht, wenn der Text das...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Panthrax,
14. Mär 2010
Schon Min, Max und PageSize eingestellt?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Panthrax,
14. Mär 2010
Die Memos müssten doch synchron laufen, wenn die gezeigten Befehle für Memo 2 dupliziert werden!?
Der obere Kasten zeigt die Textdarstellung der Objekte, die darin enthaltenen Eigenschaften können im Objektinspektor geändert werden. Die Werte müssen entsprechend der synchron zu scrollenden Memos gesetzt werden. Sinnvollerweise gelten diese Einstellungen für beide Memos. Scrollen von Min (für...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Panthrax,
14. Mär 2010
object Memo1: TMemo
Lines.Strings = (
'Memo1'
'2'
'3'
...
'29')
ScrollBars = ssVertical
end
object ScrollBar1: TScrollBar