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

Вниз

Подскажите как узнать заполнел ли пользователь массив   Найти похожие ветки 

 
JTAG   (2006-05-30 20:11) [0]

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


 
Джо ©   (2006-05-30 20:15) [1]

При открытии файла устанавливать соответствующий флаг, его же и проверять, когда нужно (например, в событии OnUpdate компонента TActionList).


 
Std ©   (2006-05-30 20:16) [2]

если масив динамический то приблизительно так:
if array.Length = 0 then
 if MessageDlg("Массив не заполнен. Необходимо выбрать фай", mtErroe,[mbYesNo],0)=mrYes then OPenDialog.execute


 
Kolan ©   (2006-05-30 20:41) [3]

Не

> if array.Length = 0 then

а
if Length(Arr) = 0 then


 
JTAG   (2006-05-30 21:18) [4]

Точно , огромное все спасибо!


 
Галинка ©   (2006-05-30 21:58) [5]

А еще можно заблокировать все лишние кнопки, пока массив незаполнен. От греза подальше...



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

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

Наверх




Память: 0.45 MB
Время: 0.01 c
15-1148298030
Gorlum
2006-05-22 15:40
2006.06.18
Управление ISA-сервером


2-1149165412
newbie2
2006-06-01 16:36
2006.06.18
Почему не вызывается destructor?


2-1149159277
koha
2006-06-01 14:54
2006.06.18
CreateProcess


2-1148983839
Andrey_Gor
2006-05-30 14:10
2006.06.18
проблема с модулем sharemem!


2-1148196813
Belorus
2006-05-21 11:33
2006.06.18
Список процедур в библиотеке





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский