Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.05.20;
Скачать: [xml.tar.bz2];

Вниз

ListView: как проверить, выеделена ли пустая строка или нет?   Найти похожие ветки 

 
Perf2k2 ©   (2007-05-02 12:18) [0]

Прив.

Суть проблемы такова: есть ЛистВью, он может быть или с записями в списке, или без. Вот если он без записей, при двойном нажатии он выдает ошибку "Access Violation ..." . То же самое происходит, если записи есть, но я кликаю на пустой строке. Поэтому пытаюсь выяснить сначала, выделена ли хоть какая-то запись или нет:


procedure TfrmNewAlbum.ListView1DblClick(Sender: TObject);
begin

 if ListView1.Selected.Caption <> EmptyStr then
  begin
  Application.CreateForm(TfrmEditFoto, frmEditFoto);
  frmEditFoto.ShowModal;
  end;

end;


Не помогает. Есть ли способ?
Или надо писать обработчик ошибок?


 
iXT ©   (2007-05-02 12:23) [1]

if ListView1.Selected.Caption <> nil


 
trubin ©   (2007-05-02 12:43) [2]


> if ListView1.Selected.Caption <> EmptyStr then


Сначала надо узнать есть ли вообще выделенный элемент:

if ListView1.Selected <> nil then


 
iXT ©   (2007-05-02 12:47) [3]

> trubin ©   (02.05.07 12:43)

Ну скопировал, Caption не заметил. Sorry! Это и хотел написать.


 
Perf2k2 ©   (2007-05-02 12:48) [4]

Спасибо! Все-таки все гениальное просто...


 
iXT ©   (2007-05-02 12:50) [5]

Не все простое - гениально!



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

Форум: "Начинающим";
Текущий архив: 2007.05.20;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.039 c
8-1157978391
Dmitriy O_
2006-09-11 16:39
2007.05.20
Как получить быстрый доступ к Пикселям BMP ?


15-1176820561
ANB
2007-04-17 18:36
2007.05.20
Чего с зарплатой будет ?


9-1137053986
Ньюб2
2006-01-12 11:19
2007.05.20
Фейерверк в DelphiX


4-1166388905
Шоломицкий С. А.
2006-12-17 23:55
2007.05.20
Подать питание. COM или USB


1-1174478364
alyona
2007-03-21 14:59
2007.05.20
dbf-файлы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский