FireMonkey的窗口Handle转为Windows窗口的Handle

FireMonkey的Form窗口在Windows平台上当然还是通过Windows API来创建的，但Windows API操作窗口都是通过窗口句柄来实现，VCL中可以通过Form.Handle直接返回，而在FireMonkey中变成了FMX.Types.TWindowHandle。如果要通过窗口句柄调用原生的Windows API，可以引用单元FMX.Platform.Win，使用FmxHandleToHwnd或FormToHWND进行转换，加上条件编译：

{$IFDEF MSWINDOWS}
var
  h:HWND;
{$ENDIF}
.....
{$IFDEF MSWINDOWS}
  h:=FormToHWND(Self);//推荐使用,Self就是一个FireMonkey的TForm对象
  h:=FmxHandleToHwnd(Handle);//Handle就是一个FireMonkey的TForm.Handle
   ...
{$ENDIF}

因为FmxHandleToHwnd在新版中已经被标为废弃，不推荐使用。

原文地址：http://blog.csdn.net/maxwoods/article/details/48351441