Question

delphi怎样获得listbox里被鼠标选中的行的内容

如题

Answer 1

var
s:string;
begin
s:=listbox1.Items.Strings[listbox1.itemindex] ;
edit1.Text :=s;
end;

Answer 2

var
s:string;
begin
s:=listbox1.Items[listbox1.itemindex] ;
end;