请教一个有关于自定义FORM的初级问题

Question

我想用一张底图来替换DELPHI的MAINFORM,请问，
1、我关闭窗口可以调用form1.close方法，那最小化窗口要使用哪一种方法。
2、我因为使用底图，我想把原来的窗口不可视，透明化掉，要怎么做，
我使用的是DELPHI 7，

Answer 1

没太弄懂楼主的意思；
透明化窗体可以通过如下设置实现：
1：修改窗体Alphablend属性值为true
2：修改AlphaBlendValue属性值；0为完全透明；255为不透明

Answer 2

我就是想不用DELPHI默认窗体做我的MAINFORM,我想自定义一张BMP的图做我的FORM界面，不要原来的标题，边框，不知道这样说可以否

Answer 3

当然可以,你可以在窗体上放一个Image,将BMP图片载入,让Image充满整个窗体,然后再将窗体的BorderStyle属性设成bsNone即可.

Answer 4

设置form的style属性（记不清了）

Answer 5

delphi里有个控件Application，可以控制最小化窗体。

Answer 6

菜单项project-->options，里面设置工程主窗体

Answer 7

首先谢谢大家的帮助，各位我都会适当加分，如果分不足，我会增加管理分。
不好意思，原先没有说清楚，是我自已的失误，我想建立一个无标题FORM,把外框架隐藏掉，FORM1.BORDERSTYLE := BSNONE,后来我在UNIT里加了一段代码，让窗口可以移动，
  private
    procedure WmNCHitTest(var Msg: TWMNCHitTest);
    message WM_NCHITTEST;procedure TForm1.WmNCHitTest(var Msg: TWMNCHitTest);
begin
   DefaultHandler(Msg);
 　if Msg.Result = HTCLIENT then
     Msg.Result := HTCAPTION;end;
但这样的一个结果，就是，窗口是可以移动了，但是FORM内的其它事件，比如FORM1.Image3Click等其它事件不能被触发，都被拦截，请问现在要怎么办。

Answer 8

你现在重载了消息处理函数；但在结束后没将句柄交给父类窗体处理；
所以；等于屏蔽了所有其他的消息处理；
解决方式： 在消息处理函数最后加上一句inherited; 就可以了；
fx：
procedure TForm1.WmNCHitTest(var Msg: TWMNCHitTest);
begin
   DefaultHandler(Msg);  //这句好像作用不大
 　if Msg.Result = HTCLIENT then
     Msg.Result := HTCAPTION;
   inherited;   //加上这句
end;

Answer 9

sorry;
上述代码不对；
没经过测试；我回头再看看

Answer 10

procedure FormMouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
if (ssLeft in Shift) then begin
ReleaseCapture;
SendMessage(Form1.Handle,WM_SYSCOMMAND,SC_MOVE+1,0);
end;
end;上面这个测试通过；我会再试试看为什么第一个不行^_^