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

Вниз

Поработать до создания формы   Найти похожие ветки 

 
parovoZZ ©   (2006-06-23 19:39) [0]

Здарова

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

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


 
ECM ©   (2006-06-23 21:29) [1]

Есть для этих целей 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. }


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


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


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


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

Юзай - OnBeforeCreateWindow, OnFormCreate.


 
parovoZZ ©   (2006-06-25 06:43) [4]

Ну есть такой код, который сейчас в _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) и он будет также рабоать?



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

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

Наверх




Память: 0.47 MB
Время: 0.033 c
4-1163097625
Shopot
2006-11-09 21:40
2007.03.25
Прием/передача данных по com порту.


2-1173082254
Нуб
2007-03-05 11:10
2007.03.25
matrix


8-1152074992
Аман
2006-07-05 08:49
2007.03.25
Ошибка частой перерисовки Image


2-1172726975
Шофер
2007-03-01 08:29
2007.03.25
HELP


1-1170327389
vtur
2007-02-01 13:56
2007.03.25
Обмен сообщениями между приложениями