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进行转换，加上条件编译：

[delphi]  view plain copy

1. {$IFDEF MSWINDOWS}  
2. var  
3.   h:HWND;  
4. {$ENDIF}  
5. .....  
6. {$IFDEF MSWINDOWS}  
7.   h:=FormToHWND(Self);//推荐使用,Self就是一个FireMonkey的TForm对象  
8.   h:=FmxHandleToHwnd(Handle);//Handle就是一个FireMonkey的TForm.Handle  
9.    ...  
10. {$ENDIF}  

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

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