16.03.2009, 22:49
|
|
Активный
|
|
Регистрация: 22.09.2007
Адрес: SPb
Сообщения: 228
Версия Delphi: 7, 2009, XE2
Репутация: 70
|
|
А, извиняюсь, ступил. Программа не долго грузится, просто создатель SplashScrrena сделал его "криво". Вот приводим код проекта к:
Код:
program Server;
uses
Forms,
ServOpen in 'ServOpen.pas' {Open},
ServMain in 'ServMain.pas' {Servak},
Mod1 in 'Mod1.pas' {DataModule1: TDataModule},
Zast in 'Zast.pas' {Anim},
AboutProg in 'AboutProg.pas' {About},
GoPrint in 'GoPrint.pas' {Printer},
Help in 'Help.pas' {Instrukt},
on_line_client in 'on_line_client.pas' {On_line},
Sveden1 in 'Sveden1.pas' {Pokupat};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TOpen, Open);
Application.CreateForm(TAbout, About);
Application.CreateForm(TPrinter, Printer);
Application.CreateForm(TInstrukt, Instrukt);
Application.CreateForm(TOn_line, On_line);
Application.CreateForm(TServak, Servak);
Application.CreateForm(TDataModule1, DataModule1);
Application.CreateForm(TPokupat, Pokupat);
Application.Run;
end.
и все ОК.
__________________
Начинающий программист уверен, что в 1 килобайте 1000 байт.
Законченный программист уверен, что в 1 километре 1024 метра.
|