又一超高难度的问题，菜鸟别进来！放心，不是叫你做操作系统！

当我们双击托盘上的时间时，会出来一个窗体，这个窗体上有日历与时钟。
现在的问题是，如何把这个日历与时钟搬到自已的窗体中来。注意，不是叫你做一个跟它一模一样的窗体，而是要把它们从原来的窗体搬过来或者复制过来。

解决方案 »

  1.   

    如果只是想调用的话：
    WInExec('RunDLL32.exe Shell32.dll,Control_RunDLL TimeDate.cpl,,0')如果要是把它们放到自己的窗体中的话……
    应该是没有办法的。
      

  2.   

    先用findwindow找到这个窗口的句柄，然后用setparent函数把它的父窗口指向你自己的窗口。good luck
      

  3.   

    对，照foxnt说的做。控件重画你可以不用管
      

  4.   

    得到时间窗口的句柄，然后用setparent（）将他的父窗口设置为你的窗口就行了！！
      

  5.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      Wnd:HWND;
    begin
      Wnd :=FindWindow('#32770','日期/时间 属性');
      Wnd := GetWindow(Wnd,GW_CHILD);
      Windows.SetParent(Wnd, Handle);
    end;
      

  6.   

    先用findwindow找到这个窗口的句柄，然后用setparent函数把它的父窗口指向你自己的窗口。
    同意