Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by NickelM,
13. Jul 2009
So hmmm also nach langem hin und her hab ich es hinbekommen das er den Text unterstreichst aber der Cursor will net ändern....hm :gruebel:
Und wenn man auf das Memo klickt, wird ja SelStart und SelLenght gesetz welches ja beim MouseMove geändert wird wiederum, deshalb entsteht ein flackern
Vll bekommst du den Fehler raus.. hier der Code
var Test : TSize;
Rect1 : TRect;
TextHoehe :...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by NickelM,
13. Jul 2009
Ich habe gemerkt es gibt ein prob mit dem SelStart, da er immer von der Ersten Buchstaben in der Liste ausgeht. Mann mus irgendwie die ganzen Zeilen die davor waren deren ihre Länge zum SelStart dazuzählen....Aber nun ja ich kümmer mich drum muss nur jetzt weg.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by NickelM,
13. Jul 2009
Hmmm also über den Code würde ich sagen solltest du den folgendermasen ändern
var Test : TSize;
Rect1 : TRect;
TextHoehe : Integer;
Zeile : Integer;
Text1 : String;
begin
for Zeile := 1 to JvRichEdit1.Lines.Count do
begin //Zeile in der der Text steht (Index der Linesliste +1 des RichEdits)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by NickelM,
13. Jul 2009
So also ich hab jetzt das was du willst mal mit einem normalen RichEdit versucht und habs hinbekommen das wenn die Mouse über dem Text ist er es anders darstellt
var Test : TSize;
Rect1 : TRect;
TextHöhe : Integer;
Zeile : Integer;
Text1 : String;
begin
Zeile := 1; //Zeile in der der Text steht (Index der Linesliste +1 des RichEdits)
Text1 := 'Hi' //Text, der angeklickt...