сделал так:
свойство формы
alphablend:=true
alphablendvalue:=0
Код:
procedure TForm1.FormPaint(Sender: TObject);
begin
form1.visible:=false;
end;
если делать без прозрачности то окно появляется на мнгновение а потом исчезает
Может есть более рациональный способ? кто знает?