
18.09.2009, 13:56
|
Активный
|
|
Регистрация: 15.04.2009
Сообщения: 369
Репутация: 93
|
|
Sorry.
Забыл про "мусор" ...
Код:
begin
Application.Initialize;
//------------------------
Form_Logo := TForm_Logo.Create(nil);
Form_Logo.Show;
MyDelay(3000);
//............................
if Form_Logo<>nil then begin
FreeAndNil(Form_Logo); //!!!
Form_Logo:=NIL;
end;
//............................
//---------------------------
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
|