У меня сделано так:
В проекте
Код:
begin
Application.ShowMainForm:=False;
...
ShowWindow(Application.Handle, SW_HIDE);
end;
Потом в файле Unit1.pas
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
Visible:=False;
...
end;
Работает.
__________________
Что делать, когда сломался комп:
1. Если вы юзер - делать ноги.
2. Если ремонтник - делать деньги.
3. Если вы программист - делать вид, что так было задумано.
|