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

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

ListBox1 Ошибку не магу не обойти


HITMAN ©   (2006-02-02 23:34:00) 

Допустим index = 0 имеет текст, адрес к файлу.
Допустим index = 1 имеет текст, адрес к файлу.
Допустим index = 2 имеет текст, адрес к файлу.

Когда кликаешь на любую из строчек, загружается файл

допустим SchelExecute(....ListBox1.index[index клика].text.....)

ОШИБКА: почему когда кликаеш ниже на чистом поле он выдаёт ошибку,
какойто -1 и чё-то неможет зделать...

Я пытался по всякому утачнять, мол чтобы при клике если линия не выделенно,
то ничего else begin загрузить файл,
и это не помогло... всё равно ошибается, не так, так по другому...

может кто подскажет как радикально, по умному обойти эту ошибку..???


Eraser   (2006-02-02 23:44:00) [1]


> HITMAN ©   (02.02.06 23:34)


> SchelExecute

немецкий учил? )

> почему когда кликаеш ниже на чистом поле он выдаёт ошибку,
>
> какойто -1 и чё-то неможет зделать...

Перед вызовом ShellExecute проверяй не равен ли ItemIndex -1 .. если равен, то не выполняй вызов.
К примеру:
if List.ItemIndex = -1 then
 exit;


Наверх

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