Einzelnen Beitrag anzeigen

flacky

Registriert seit: 20. Dez 2006
4 Beiträge
 
#1

Hilfe bei Richedit und Tstring bzw string

  Alt 20. Dez 2006, 15:11
Hi,
ich hab momentan ein kleines Problem mit RIchEdit etc...
also um die ganze Sache mal zu beschreiben :
Ich habe eine doppelt verkettete Liste als Datensatz.
Diese Liste wird dann in einer listview wiedergegeben.
Ich benutze als eines der Eingabefelder ein RichEdit.
Gespeichert wird es dann so :
Delphi-Quellcode:
 
var
  neu : TKnoten; // Neuer Knotenpunkt
  i,z:integer; // Zaehler fuer bemerkung (trichedit)
begin
 i:=form_hinzufuegen.edit_bemerkung.Lines.Count-1; // Zählt die lines ;)
  for z:=0 to i do
  begin
    neu.Daten.bemerkung:=neu.Daten.bemerkung+form_hinzufuegen.edit_bemerkung.Lines[z]+'; ';
  end;
Das geht soweit gut.
Nun will ich auch die Eintraege editieren und will sie dann wieder zurueck ins RichEdit laden, mit den Absätzen, die ich ja vorher durch Semikolons ersetz habe.
    form_editieren.richedit_bemerkung.Text := StringReplace(lauf.Daten.bemerkung, '; ', #13, [rfReplaceAll]); Wenn ich das so mache, wird der erste Eintrag, den ich editieren will, zwar in alllen anderen Feldern angezeigt, aber das RichEdit ist leer. Erst wenn ich es ein zweites mal aufrufe - dann geht es ueberall wunderbar.
Warum ist das so, bzw. gibt es da vielleich eine Lösung

Ich hoffe ihr konntet meine Schilderung verstehen. Mein erstes mal hier Wenn ihr das Programm selber anschauen wollt, sagt es und ich lad es hoch
  Mit Zitat antworten Zitat