dotNetControl PictrueBox

(
 ---加以张图片的控件。
  rollout windowPictureBox "Picture box"
  (
   dotNetControl pictureBox "System.Windows.Forms.PictureBox" height:100 100 align:#center
   
   on windowPictureBox open do
   (
    imageFile = @"C:\Program Files (x86)\Autodesk\3ds Max 2008\ui\Icons\AtmosApp_24i.bmp" -- Point this to an image you want to use
    if (doesFileExist imageFile) do
    (
     imageObject = (dotNetClass "System.Drawing.Image").fromFile imageFile
     pictureBox.backGroundImage = imageObject
     pictureBox.backgroundImageLayout = (dotNetClass "System.Windows.Forms.ImageLayout").zoom
    )
   )
  )
  createDialog windowPictureBox 150 150
 )

原文地址:https://www.cnblogs.com/gaitian00/p/2181009.html