안녕하세요,
저는 KDDG에서 도움만(^^) 받는 개발자입니다.

잘 안되는 부분이 있어서 도움을 청합니다.

다름이 아니라..

처음 폼이 뜰때 화면에 보이는 것이 아니라 트레이 아이콘이 생성되고

화면과 작업표시줄에는 아무것도 표시되지 않도록 하려고 합니다.

procedure TForm1.FormShow(Sender: TObject);
begin
  HideForm;
end;

procedure TForm1.HideForm;
begin
  ShowWindow(Application.Handle, SW_MINIMIZE);
  ShowWindow(Application.Handle, SW_HIDE);
end;

이와 같이 하였는데...
트레이아이콘은 생성되고 폼은 화면에 나타납니다.
(나타나지 않게 해야하는데...--;)

그리고 또한가지....
폼의 타이틀바를 클릭하여 폼을 이동시키려는데 그게 안됩니다.
코딩은 아래같습니다.

procedure TForm1.FormCreate(Sender: TObject);
begin

  Application.OnMessage := AppMessage;

end;

procedure TfAlram_newmsg.AppMessage(var Msg: TMsg; var Handled: Boolean);
begin
  if Msg.message = WM_SYSCOMMAND then
  begin

    Case Msg.wParam of
      SC_MINIMIZE : HideForm;
      SC_CLOSE     : Close;
      SC_RESTORE : ViewForm;
      else                 Inherited;
     End;//case
  end;
end;

이상입니다...

여러고수님의 도움을 청합니다...
그럼이만...