Hallo,
ich kann es kaum glauben, es funktioniert!
Wie viele Stunden habe ich schon versucht, diese Lösung hinzubekommen.
Ganz herzlichen Dank an alle, die mir hier weitergeholfen haben.
Und großes Lob dafür, dass Ihr Eure Hilfe so freundlich 'rübergebracht habt. Das habe ich in anderen Foren leider auch schon ganz anders erfahren.
Hier noch kurz meine Lösung (falls jemand ein ähnliches Problem hat):
Delphi-Quellcode:
procedure TForm1.ListBox1Click(Sender: TObject);
var
// arrayindex (ai) ist der 'richtige' index aus dem Array, nicht der aus der ListBox
ai: integer;
begin
ai := Integer(ListBox1.Items.Objects[Form1.ListBox1.ItemIndex]);
Form1.RichEdit1.Text := Eintrag[ai].Nachname;
Form1.RichEdit2.Text := Eintrag[ai].Vorname;
end;
Grüße und nochmals danke,
Christoph