VC中只需要SetForegroundWindow和ShowWindow即可，不过Delphi和bcb中有个宝蓝自定义的Application对象，如果直接用API函数将窗口显示在最前端，会造成窗口无法最小化。正常的代码如下：

if IsIconic(Application.Handle) then
begin
        DefWindowProc(Application.Handle, WM_SYSCOMMAND, SC_RESTORE, 0);
end;
SetWindowPos(fmMain.handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE);