Главная страница
    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
3-1145891342
linx
2006-04-24 19:09
2006.06.18
Запретить чтение ячейки данных в таблице


6-1139502884
RusGl
2006-02-09 19:34
2006.06.18
Yahoo Messenger.


15-1148657865
AlexanderMS
2006-05-26 19:37
2006.06.18
Интересное задание.


2-1149069396
АндрейК
2006-05-31 13:56
2006.06.18
свернутая форма


15-1148096700
TUser
2006-05-20 07:45
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский