Вниз
Скачать: CL | DM;

Application.CreateForm   Найти похожие ветки 

 
gp ©   (2003-12-28 15:16) [0]

Решил попробовать перевести один проект на KOL+MCK, это мой первый опыт с KOL, и сразу возникло несколько вопросов. Исходный текст проекта на VCL выгдядел как
program App;
....
procedure ExeProcedure;
begin
 Application.CreateForm(TMainForm, MainForm)
 ...
end;

begin
 Application.Initialize;
 ExeProcedure;
 Application.Run;
end;

И как подобное выразить в рамках KOL+MCK?


 
SPeller ©   (2003-12-28 16:21) [1]

NewForm1( Form1, Applet );

Run( Applet );

Ф лучше создай МСК проект и посмотри как она КОЛ-проекты гененрирует и что там пишет.


 
gp ©   (2003-12-28 16:40) [2]

я посмотрел, потому и спросил :)
она там пишет

begin
 {$IFDEF KOL_MCK} {$I app_0.inc} {$ELSE}
 ...
end.

вот мне и непонятно, как можно создание форм вынести в процедуру при большом количестве {$IFDEF} и {$I}. причем таким образом чтобы  все это не мешало тому коду который генерируется автоматически.


 
Gandalf ©   (2003-12-28 17:58) [3]

Автоматику не трогайт, если работаешь с MCK, примеры чистого KOL и создания форм есть на сайте Кладова (testkol.dpr и т.д.).


 
Boguslaw   (2003-12-28 17:59) [4]

причем таким образом чтобы  все это не мешало тому коду который генерируется автоматически

Well,all *.inc have descriptions (in English) - just read them and You will know where You can put Your code.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.02 c
3-1083040503
AntonVS
2004-04-27 08:35
2004.05.23
кирилица в FB


4-1081233002
S@shka
2004-04-06 10:30
2004.05.23
Определение загрузки ПК


3-1083218458
Mitrofan
2004-04-29 10:00
2004.05.23
Одно приложение - несколько СУБД


3-1083053774
neVIP.
2004-04-27 12:16
2004.05.23
Фильтр


1-1083904561
Sirus
2004-05-07 08:36
2004.05.23
Divizion by Zero.... Нету такого понятия???? :((




   Наверх