Fragen zu TMemo

[u-boot]

TMemo hat das tolle MaxLength-Property.... soll das die Gesamtzeichenanzahl sein oder nur für eine Zeile ?

Ein TMemo in ner Schleife mit TMemo.Lines.add zu befüllen funktioniert bei mir nur, wenn man am Ende der Zeilen einen Zeilenumbruch anfügt. Ist das ein Bug oder gewollt ?
(Falls das so gewollt ist versteh ich nicht, warum man über Lines die einzelnen Zeilen ansprechen können soll, wenn man sowieso einen Zeilenumbruch benötigt)
Füge ich einen Zeilenumbruch am Ende der Zeile ein, dann wird eine [ungewollte] leere Zeile eingefügt.

Dann noch etwas: fügt man zur Designtime ein ha ll oo jeweils in verschiedene Zeilen ein, wird zur Laufzeit daraus ein halloo in der ersten Linie.

Kann jemand diese Verhaltensweisen von TMemo bei sich bestätigen ?

Momentan verwende ich Lazarus svn fixes 0.9.30 und FPC 2.4.2

[theo]

Kann jemand diese Verhaltensweisen von TMemo bei sich bestätigen ?

Nein, nichts davon.
Lazarus 0.9.31 r28409M FPC 2.4.2 i386-linux-gtk 2

[pluto]

Ein TMemo in ner Schleife mit TMemo.Lines.add zu befüllen funktioniert bei mir nur, wenn man am Ende der Zeilen einen Zeilenumbruch anfügt. Ist das ein Bug oder gewollt ?

Diese Methode fügt legendlich eine neue Zeile hinzu. Also musst du für jede neue Zeile, diese Methode erneut aufrufen. Das was du im Moment machst ist Folgendes: Du fügst nur eine Zeile hinzu. Mehr nicht.

[am2]

Ein TMemo in ner Schleife mit TMemo.Lines.add zu befüllen funktioniert bei mir nur, wenn man am Ende der Zeilen einen Zeilenumbruch anfügt. Ist das ein Bug oder gewollt ?

Diese Methode fügt legendlich eine neue Zeile hinzu. Also musst du für jede neue Zeile, diese Methode erneut aufrufen. Das was du im Moment machst ist Folgendes: Du fügst nur eine Zeile hinzu. Mehr nicht.

Hab ich da was verpaßt? Hast Du das erraten oder steht das irgendwo in einem Posting?
Ich habe den OP schon so verstanden, dass er irgenetwas in der Art

Code: Alles auswählen

for i:=0 to MyStringList.Count-1 do
  MyMemo.Add(MyStringList[i]);

macht und dass mit Add an sich eben keine neue Zeile eingefügt wird, sondern lediglich der Text.

Zur Frage nach der Funktionsweise von Add kann ich nicht viel sagen, ich bin auch davon ausgegangen, dass diese Methode eine neue Zeile anfügt. Zu Deiner letzten Leerzeile: Das ist so ja nicht ganz richtig: Du erzeugst ja keine Leerzeile, sondern einen Zeilenumbruch, danach steht nichts. Wenn Dich dieser letzte Zeilenumbruch stört, dann solltest Du den letzten Zeilenvorschub eben nicht schreiben. Je nach gusto beispielsweise

Code: Alles auswählen

for i:=0 to MyStringList.Count-1 do begin
  MyMemo.Add(MyStringList[i]);
  if i<MyStringList.Count-1 then MyMemo.Add(#13#10);
end;

oder

Code: Alles auswählen

for i:=0 to MyStringList.Count-1 do begin
  if i>0 then MyMemo.Add(#13#10);
  MyMemo.Add(MyStringList[i]);
end;

Aber vielleicht habe ich Dich auch völlig falsch verstanden. Hast Du mal ein paar Zeilen Code?

[Socke]

Wie wärs mit

Code: Alles auswählen

MyMemo.Lines.Add('neue Zeile!');

Edit: Welche Lazarus-Version verwendest du? Meine (SVN 28849) besitzt keine Methode TMemo.Add();

[pluto]

@am2 Hätte mir den Code genauer anschauen sollen. Dann hätte ich vielleicht gar nicht gepostet.

[u-boot]

Ich weiss immer noch nicht an was es lag. Ich habe nichts bis auf Maxlength wissentlich verändert und nun funktioniert das mit dem memo.line.add . Ehrlich gesagt, keine Ahnung warum. Ich glaub mittlerweile wird dieses Maxlength bei mir einfach ignoriert. Jedenfalls scheint da noch ein Käferchen zu sein, den ich nicht mal reproduzieren kann.

[pluto]

Vielleicht hast du auch "nur" ein -1 Problem bzw +1 Problem.

[mtbf40]

Hallo,

wie kann man einen Text - nachträglich - in einem/bzw. zwei TMemo(s) farblich ändern.
Grund:
Ich fülle ein TMemo aus einer TStringList. Jede Zeile wird mit einer Zeile aus einem 2.TMemo (über Index) verglichen. Wenn ich Unterschiede feststelle sollen beide Zeilen farblich markiert werden.

Ich hoffe das mich jemand auf die Spur der Lösung bringen kann.

[pluto]

mit einem TMemo überhaupt nicht. Jedenfalls habe ich es versucht und es sollte eigentlich über die API gehen, aber bei meinen letzten Versuchen ging das nicht.

Du könntest höchsten ein TSynEdit oder TSynMemo verwenden... die können aber kein Automatischen Zeilenumbruch...

[hde]

Und was ist mit TRichMemo?

[pluto]

Stimmt, dass hatte ich vergessen gehabt.