Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проблемы с TListView... [D5, Win95/98]


DSR ©   (2002-03-06 09:22:00) 

Хелло Всем...
Я хочу чтобы при выборе строки в 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;


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

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


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

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


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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо