Jak zrobić aby po zaznaczeniu w ListView1 wybranej linii i kliknięciu na Button1 wczytało do?
edit1 , edit2 jeśli to jest możliwe:d
0
0
Bujakasha :-D a nie próbowałeś ListView1.Selected.Caption?
do postu ponizej
Selected ListViewa zwraca wartość TListItem, a selected tlistitema zwraca boolean, poza tym można również ListView1.Items[ListView1.ItemIndex].Caption
0
Edit1.Text := ListBox1.Items[ListBox1.ItemIndex] czy jakos tak..
ze jak selected jest typu boolean hehehe tym sprawdza sie czy dana linijka jest zaznaczona hehehe :-D
0
Żywcem z programu...
procedure TAutoCorrectForm.FlatSpeedButton2Click(Sender: TObject);
begin
if ListView1.ItemIndex = -1 then Exit;
Edit1.Text := ListView1.Selected.Caption;
Edit1.SelectAll;
Edit2.Text := ListView1.Selected.SubItems[0];
Edit2.SelectAll;
ListView1.DeleteSelected;
Edit1.SetFocus;
end;