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

Вниз

Не работает Sleep   Найти похожие ветки 

 
lewka_s   (2014-06-27 12:27) [0]

Всем привет!
есть код
Application.Initialize;
 Application.Title := "Ввод данных бактериологической лаборатории";
 fmZastavka:=TfmZastavka.Create(Application);
 fmZastavka.Show;
 fmZastavka.Update;
 Sleep(1000);
 fmZastavka.Hide;
 fmZastavka.Free;
 Application.CreateForm(Tfmbak, fmbak);

при компиляции говорит, что Undeclared identifier: "Sleep";
Подскажите как это исправить?


 
Dimka Maslov ©   (2014-06-27 12:34) [1]

Сначала надо разобраться в каком именно модуле объявлена данная процедура, а потом добавить этот модуль в секцию uses проекта.


 
lewka_s   (2014-06-27 13:41) [2]

я разобрался. SysUtils добавил  в uses


 
oldman ©   (2014-06-27 13:53) [3]


>  fmZastavka:=TfmZastavka.Create(Application);
>  fmZastavka.Show;
>  fmZastavka.Update;
>  Sleep(1000);
>  fmZastavka.Hide;
>  fmZastavka.Free;


О!
На самой форме Zastavka повесить таймер на Close после 1000 не?


 
Jeer ©   (2014-06-27 14:24) [4]

Вопрос в другом - зачем вообще нужен Sleep(), если есть процедура *.Update и форма не закроется, пока она не выполнится?


 
Dennis I. Komarov ©   (2014-06-27 18:05) [5]

И зачем люди заставку придумали...



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

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

Наверх





Память: 0.45 MB
Время: 0.002 c
15-1430775002
Юрий
2015-05-05 00:30
2015.12.27
С днем рождения ! 5 мая 2015 вторник


15-1429776423
sniknik
2015-04-23 11:07
2015.12.27
Исключить поля из запроса.


3-1306138163
vv_fran
2011-05-23 12:09
2015.12.27
Как сообщение RAISERROR из ХП показать пользователю на экране?


15-1430502599
Кто б сомневался
2015-05-01 20:49
2015.12.27
Досоздать наследованный класс позже


2-1403862365
ivan_ivany4
2014-06-27 13:46
2015.12.27
Яркость изображения в TImage





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