Listbox Item überschreiben

[Stern]

Entschuldigt bitte, wenn ich mich so doof anstelle. Aber jetzt blick ich es wirklich nich mehr... :oops:
Wenn ich das ganze mit ListBox1.ItemIndex zurückschreibe bekomm ich es an das Ende der datei und mit meiner Version von oben an das Ende. Aber ich schaff es nicht mir den Index zu merken und dann beim überschreiben wieder einzusetzen...

Kann mir vielleicht nochmal jemand kurz an meinem Beispiel zeigen, wie ich das hinbekommen könnte?

Liebe Grüße
Steffi

[Deep-Sea]

Zitat:

Zitat von Stern

Entschuldigt bitte, wenn ich mich so doof anstelle. Aber jetzt blick ich es wirklich nich mehr... :oops:
Wenn ich das ganze mit ListBox1.ItemIndex zurückschreibe bekomm ich es an das Ende der datei und mit meiner Version von oben an das Ende. Aber ich schaff es nicht mir den Index zu merken und dann beim überschreiben wieder einzusetzen...

Kann mir vielleicht nochmal jemand kurz an meinem Beispiel zeigen, wie ich das hinbekommen könnte?

Liebe Grüße
Steffi

Delphi-Quellcode:

procedure TForm1.ListBox1Click(Sender: TObject);
begin
  If ListBox1.ItemIndex > -1 then Edit1.Text := ListBox2.Items[ListBox1.ItemIndex];
end;

Soweit war es ja klar ... oder?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  If ListBox1.ItemIndex > -1 then ListBox2.Items[ListBox1.ItemIndex] := Edit1.Text;
end;

Und anders rum sollte das auch gehen ;)

[Stern]

OHHHHHH MEEEEIIIIN GOOTTTT... :oops: :wall: :oops:
Wie blöde kann man sich den anstellen? Vielen lieben Dank für eure Ausführliche Hilfe...
Ihr seid der Hammer :kiss:

Liebe Grüße
Steffi