Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Вниз

Проблемы с TListView... 


DSR   (2002-03-06 09:22) [0]

Хелло Всем...
Я хочу чтобы при выборе строки в TListView в TEdit появлялось значение выбранной строки TListView...
Так вот... Если какая-либо строка в ListView выбрана то все работает нормально, а если ничего не выбрано то выскакивает сообщение об ошибке типа "Access volation...".
Как узнать выбрана ли строка в ListView...

Я делал так...
procedure TForm1.ListViewClick(Sender:TObject);
begin
Edit1.Text:=ListView1.Selection.Caption;
end;

procedure TForm1.ListViewKeyUp(Sender:TObject);
begin
Edit1.Text:=ListView1.Selection.Caption;
end;



Виктор Щербаков   (2002-03-06 09:26) [1]

if Assigned(ListView1.Selected) then
Edit1.Text := ListView1.Selected.Caption else
Edit1.Text := "";



Olgerd   (2002-03-06 09:51) [2]

if ListView1.ItemIndex<>-1 then ....



DSR   (2002-03-06 12:48) [3]

Спасибо всем...
в особенности Виктору Щербакову...
Воспользуемся ликующей фразой - It"s working... Cool..




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.025 c
1-66937           Reals                 2002-03-06 16:15  2002.03.21  
Как перейти на споледнюю строчку текстового файла и прочитать ее.


3-66746           skiph                 2002-02-12 09:03  2002.03.21  
INSERT в MS SQL7.0


3-66755           dymka                 2002-02-21 08:53  2002.03.21  
Нужен совет по проектированию системы


6-66944           netter                2002-01-07 13:29  2002.03.21  
Workgroup обычно


3-66742           Александр1            2002-02-21 05:18  2002.03.21  
Помогите разобратся с процедурой GetCurrentRecord