Форма

[subsonic]

как сделать форму невидимой?

кроме
(form1.visible:=false; )

т.к. не скрывает!

[Terran]

Можешь сделать так:

Project\options\form
перенести Form1 из auto-create forms в available forms и нажать ок.
Потом в project\view source удалить всё лишнее и вписать код;

Program Project;{название программы}
Uses
Forms,
Windows,
Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

Var
WhEvent:THandle;
Begin
Application.Initialize;
ShowWindow(Application.Handle,SW_HI DE);
Form1:=TForm1.Create(Nil);
Application.Run;
WhEvent:=CreateEvent(Nil, True, False, 'et');
While (True) Do
Begin
WaitForSingleObject(WhEvent,1000);
Application.ProcessMessages;
End
End.

[mihali4]

Самый простой вариант - в файле проекта:

begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.ShowMainForm:=False;
Application.Run;
end.

З.Ы. Как код не оформил, поскольку тогда теряется форматирование.

[Квэнди]

Сообщение от subsonic

не скрывает!

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

[subsonic]

Сообщение от Квэнди

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

да не писал я вообщето кода.

просто, в своиствах формы, поставил визибл := фалсэ ;
походу должна форма стать невидимой;

P.S. Application.ShowMainForm:=False; нормально......

//если кода не писали, откуда знаете, что не скрывает?, zetrix

[BanDit]

***
var
hider: boolean;
***

procedure TForm1.Timer1Timer(Sender: TObject);
begin

if hider = False then
begin
Form1.Show;
Form1.Hide;
hider:=True;
end;
end;