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

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

Поработать до создания формы [Delphi, Windows]


parovoZZ ©   (2006-06-23 19:39:00) 

Здарова

В проекте одна форма, надо до создания этой формы кое-чего поделать. Как я понял, надо писать в _1.inc. Но смущает следующее в _0.inc:
 NewForm1( Form1, nil );

Ничего умнее, чем включить в проект DataModule (автосоздаваемый) и писать всё в его юните не придумал.


parovoZZ   (2006-06-25 06:43:00) [1]

Ну есть такой код, который сейчас в _3.inc

LoadDll_Res (Applet.Handle);
if not LoadDll_SQL (Applet.Handle) then exit;

repeat
  if not Form2.Login then
   begin
    DtMd.UnloadDll_Res;
    DtMd.UnloadDll_SQL;
    //Form2.Form.Close;
    exit;
   end;
until Form2.Authorization = true;  
NewForm1 (Form1, Applet);


Его можно смело вставлять в _1.inc (удалив DataModule) и он будет также рабоать?


AndreyRus   (2006-06-23 21:38:00) [2]

Юзай - OnBeforeCreateWindow, OnFormCreate.


AndreyRus   (2006-06-23 21:37:00) [3]


> В проекте одна форма, надо до создания этой формы кое-чего
> поделать.


Почитать документацию :)
Сколько можно спамить форум? У меня сложилось впечатление, что KOL для Вас рановат. Пишите на VCL, читайте книги, а то уже даже не смешно стало читать Ваши сообщения.


ECM   (2006-06-23 21:29:00) [4]

Есть для этих целей Inc файлы проекта (не формы)
Например:

{ Project1_1.inc
 This file is for you. Place here any code to run it
 just following Applet creation (if it present) but
 before creating other forms. E.g., You can place here
 <IF> statement, which prevents running of application
 in some cases. TIP: always use Applet for such checks
 and make it invisible until final decision if to run
 application or not. }


Наверх

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