Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

List.View.Selected - как правильно использовать?   Найти похожие ветки 

 
Zn   (2004-04-21 12:32) [0]

Ув. мастера! Как сделать, чобы при выделении элемента в ListView его Caption отображалось в Edit.text. Я делаю так:
procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem;
 Selected: Boolean);
begin
Edit1.Text:=ListView1.Selected.Caption;
end;

Но это работает только один раз, потом ошибка доступа. В хелпе написано об этом, но я не совсем понял. Помогите!


 
panov ©   (2004-04-21 12:34) [1]

if Selected
 then Edit1.Text:=Item.Caption
 else Edit1.Text:="";


 
VMcL ©   (2004-04-21 12:35) [2]

>>Zn  (21.04.04 12:32)

procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem; Selected: Boolean);
begin
 if ListView1.Selected = nil then
   Edit1.Text := "(ничего не выбрано)"
 else
   Edit1.Text := ListView1.Selected.Caption;
end;


?


 
Zn   (2004-04-21 12:50) [3]

Спасибо!



Страницы: 1 вся ветка

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.029 c
6-1079111211
LanLan
2004-03-12 20:06
2004.04.11
Получение данных от клиентских компов ServerSocket1ClientRead


6-1075797259
kkostik
2004-02-03 11:34
2004.04.11
иня домена


1-1082626363
Sergey__
2004-04-22 13:32
2004.04.11
Как сделать чтобы текст плавно передвигался по Cavans-у формы


3-1079131721
Rauf
2004-03-13 01:48
2004.04.11
Сбрасывается типа параметра в TADOQuery с ftWideString -> ftStrin


14-1082528376
VID
2004-04-21 10:19
2004.04.11
Как создать загрузочный диск, который будет видеть NTFS ?