 ViewPicture       
 .     

   :
    "ViewPicture"
     "ViewPicture"
   "MyPicture" -     .
     "Picture"
..   "Picture"  ,
    .Picture = "Carta.bmp"
       "GetPicture"
myvar = GetPicture()
metod SEtPicture      "*.bmp"
    6060
    
width_assign  height_assign
          .

===
        RUN
  FORMMAIN