Um Mich selber zu zitieren
:
Zitat von
Mr_G:
...
Dann mach daraus Folgendes:
Delphi-Quellcode:
procedure TForm2:Form2.Button1Click(Sender: TObject);
begin
beep;
if Form2.ListBox1.ItemIndex <> -1 then
Form3.Memo1.Lines.Add(Form2.ListBox1.Items[Form2.ListBox1.Itemindex])
else
Form3.Memo1.Lines.Add('');
end;
...
Mit Form2.ListBox1.Items greifst du auf die einzelnen Elemente zu. Nun Musst du noch den Index des Elementes als Interger in [] angeben. ItemIndex ist wie du schon richtig gesagt hast das ausgewählte Element. Draus Folgt... ich zitiere:
Zitat von
Mr_G:
Form3.Memo1.Lines.Add(Form2.ListBox1.Items[Form2.ListBox1.Itemindex])