怎么把下面的几行代码转到D来，多谢

如何把下面的几行代码转到D来，谢谢
vb
1.   ttext   =   StrConv(SSTR,   128)
2.   FORM1.HORPIC(0).Width  
      Form1.VerPic(0).Height
3.   Unload   FORM1.VERPIC(I)
4.   Load   FORM1.HORPIC(I)
5.   Wnd   =   Screen.ActiveForm.hwnd
6.   FORM1.Picture1.Picture   =   Clipboard.GetData()


谢谢


------解决方案--------------------
5 GetForegroundWindow
6 Image1.Picture.LoadFromClipboardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0)
------解决方案--------------------
ttext = StrConv(SSTR, 128)
把sstr由Unicode转成系统的缺省码
FORM1.HORPIC(0).Width 取窗体的设计宽度
3. Unload FORM1.VERPIC(I)
4. Load FORM1.HORPIC(I) 重载?
------解决方案--------------------
Unload Form1.VerPic(i) 和 Load Form1.HorPic(i) 你先找到Unload Load 过程看看，毕竟这里是DELPHI区不是VB区，比较偏门的东西知道的人少
------解决方案--------------------
主要是看不懂太复杂的VB程序。
你先解释一下，然后大家给你想办法。