Einzelnen Beitrag anzeigen

Benutzerbild von Stern
Stern

Registriert seit: 26. Feb 2007
Ort: Köln
74 Beiträge
 
#1

Listbox Item überschreiben

  Alt 21. Nov 2007, 10:28
Hallo zusammen,

ich habe eine Frage zum Ändern eines bestimmmten Eintrags in einer ListBox.
Ich habe im Prinzip 2 Textdateien, die beide eingelesen werden und deren Inhalte jeweils in einer Listbox
ausgegeben werden. Beide Dateien enthalten die gleiche Anzahl an zeilen!

Wenn ich nun in der ersten Listbox ein Element auswähle, wird das entsprechende Element (mit dem gleichen Index)
der zweiten Listbox in einem Edit angezeigt. nun kommts...

Der Benutzer soll nun diesen Eintrag ändern können und über einen Button Speichern die Zeile in der Datei ÜBERSCHRIEBEN werden.
Bis jetzt bekomm ich es immer nur hin, dass er den Text am ENDE oder am ANFANG einfügt, aber icht überschreibt.
Kann mit da jemand einen Tipp geben? Ich steh da wohl gerade ziemlich auf dem Schlauch...

Liebe Grüße
Steffi

PS: Das Edit fülle ich so:
Delphi-Quellcode:
procedure TForm1.ListBox1Click(Sender: TObject);
var
  i: Integer;
begin
       for i := 0 to ListBox1.Items.Count -1 do
       begin
            if ListBox1.Selected[i] then
            Memo1.text := ListBox2.Items.Strings[i];
            end;
       end;
steffi
  Mit Zitat antworten Zitat