Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by runningsoft,
27. Jan 2010
Ich hab das jetzt vom Ansatz her etwas anders gelöst, keine Ahnung, ob es besonders elegant ist, aber es funktioniert offensichtlich.
Das RichEdit habe ich in einer ScrollBox platziert. Und in dieser Scrollbox erzeuge ich zur Laufzeit als visuelle Begrenzungslinien für die im Richedit gesetzten Ränder vier Panele von entweder 1 px Breite (senkrechte Linien) oder 1 px Höhe (waagerechte Linien)....
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by runningsoft,
27. Jan 2010
Hallo,
wenn ich auf einem TRichEdit die gesetzten Ränder mit so einer schicken grauen Linie anzeigen möchte, wie im Layoutmodus von Word, so werden mir diese mit folgendem Code zwar wunderbar angezeigt:
procedure TForm11.SetBorders(var R: TRect);
var LeftLine, TopLine, RightLine, BottomLine : TShape;
begin
//Textränder als graue Linie anzeigen
LeftLine := Tshape.Create(RichEdit1);
with...