我想通过写个类似QQ的软件来学习DELPHI的方方面面,不过近来困难重重,希望得到各位的帮助和支持,谢谢了!问题1:如何做到程序移到屏幕边界自动隐藏?
问题2:有何方法象QQ一样将最大最小化按钮位置设置成自己的功能键(包括按钮外观)?

解决方案 »

  1.   

    没人帮帮我么?难道DELPHI不能作到这种效果么?
      

  2.   

    应该可以,看看API吧。帮你UP!
      

  3.   

    谢谢楼上的,我其实以前在学校有一定的DELPHI和VB编程基础和经验,后来去搞LINUX下的C了。现在工作调动又开始用DELPHI,所以想做个东西一边复习一边深入。
      

  4.   

    这个东西不是那么好做的 你去问问suipack控件的作者吧他有几个控件可以满足你的要求
      

  5.   

    问题1可以参考以下代码:
    unit Unit1:::::::::::::::::::::::::::::::::
    ...
    ...
    var
      Form1: TForm1;
      HideTime:Integer=3;//一定时间后隐藏
    implementation{$R *.DFM}procedure TForm1.Timer1Timer(Sender: TObject);
    var
      P:Tpoint;
    begin
      GetCursorPos(P);
      if P.x>Screen.Width-2 then Show else if(Left>Screen.Width-Width-2)and(HideTime<=0)then Hide;
      if Left>Screen.Width-Width then Left:=Screen.Width-Width;
      Dec(HideTime);
    end;procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
      Y: Integer);
    begin
      HideTime:=3;//一定时间后隐藏
    end;
    end.问题2可以用现成的控件.