^V^ 一个很菜的问题，还请您帮忙

Question

if Assigned(tdeform) then
  begin
    tdeform:=Ttdeform.create(application);
    tdeform.showmodal;
  end else
  begin
    showmessage('这个窗体你已经建立，不能再重新建立');
    这里应该写什么？;
  end;

Answer 1

to zswang(伴水)（被黑中）
  老兄啊，那种方法更不行了，我想着如何让tdeform重新获得焦点，可是却苦于不能实现；
  

Answer 2

调用api函数SetForegroundWindow（HWND hWnd）
    函数功能：该函数将创建指定窗口的线程设置到前台，并且激活该窗口。键盘输入转向该窗口，并为用户改各种可视的记号。系统给创建前台窗口的线程分配的权限稍高于其他线程。    函数原型：BOOL SetForegroundWindow（HWND hWnd）    参数：    hWnd：将被激活并被调入前台的窗口句柄。    返回值：如果窗口设入了前台，返回值为非零；如果窗口未被设入前台，返回值为零。    备注：前台窗口是z序顶部的窗口，是用户的工作窗口。在一个多任务优先抢占环境中，应让用户控制前台窗口。    Windows NT 5.0：当用户在另一个窗口中工作时，应用程序不能强行设置一个窗口到前台。相反，SetForeground函数将会激活窗口并且调用FlashWindowEx函数通知用户。    Windows CE：拥有窗口的线程不具有优先启动权。    速查：Windows NT；3.1以上版本；Windows；95以上版本；Windows CE：1.0以上版本；头文件：winuser.h;库文件：user32.lib。

Answer 3

在这之前先得到窗口的句柄HWND FindWindowEx（HWND hwndParent，HWND hwndChildAfter，LPCTSTR lpszClass，LPCTSTR lpszWindow）；    函数功能：该函数获得一个窗口的句柄，该窗口的类名和窗口名与给定的字符串相匹配。这个函数查找子窗口，从排在给定的子窗口后面的下一个子窗口开始。在查找时不区分大小写。    函数原型：HWND FindWindowEx（HWND hwndParent，HWND hwndChildAfter，LPCTSTR lpszClass，LPCTSTR lpszWindow）；    参数；    hwndParent：要查找子窗口的父窗口句柄。    如果hwnjParent为NULL，则函数以桌面窗口为父窗口，查找桌面窗口的所有子窗口。    Windows NT5.0 and later：如果hwndParent是HWND_MESSAGE，函数仅查找所有消息窗口。    hwndChildAfter ：子窗口句柄。查找从在Z序中的下一个子窗口开始。子窗口必须为hwndPareRt窗口的直接子窗口而非后代窗口。如果HwndChildAfter为NULL，查找从hwndParent的第一个子窗口开始。如果hwndParent 和 hwndChildAfter同时为NULL，则函数查找所有的顶层窗口及消息窗口。    lpszClass：指向一个指定了类名的空结束字符串，或一个标识类名字符串的成员的指针。如果该参数为一个成员，则它必须为前次调用theGlobaIAddAtom函数产生的全局成员。该成员为16位，必须位于lpClassName的低16位，高位必须为0。    lpszWindow：指向一个指定了窗口名（窗口标题）的空结束字符串。如果该参数为 NULL，则为所有窗口全匹配。返回值：如果函数成功，返回值为具有指定类名和窗口名的窗口句柄。如果函数失败，返回值为NULL。    若想获得更多错误信息，请调用GetLastError函数。    速查 NT：4.0对以上版本；Windows：95以上版本；Windows CE：不支持；头文件：winuser.h；库文件：user32．lib；Unicode：在Windows NT上实现为Unicode和ANSI两种版本。

Answer 4

xxmmmx(踢踏)正确，你还要人家看什么啊

Answer 5

就两个API调用还复杂吗？如果想再简单一点的话，你可以花点功夫做个函数或者组件封装，一劳永逸，以后想用的话设置一下参数就可以了。

Answer 6

先用PIW=FindWindow(nil,PChar(Application.Title))找是否存在，如果
if PIW<>0 then
if IsIconic(PIW) then
    showWindow(PIW,SW_RESTORE);
else
    SetForegroundWindow(PIW);

Answer 7

只是两个api函数而已，一大堆东西是这两个函数的说明。
对窗口类通用。