home bbs files messages ]

Forums before death by AOL, social media and spammers... "We can't have nice things"

   comp.lang.visual.basic      MS Visual Basic discussions, NOT dot-net      10,840 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 9,499 of 10,840   
   Steve Gerrard to craige@qnet.com   
   Re: copying layered pictures in VB6   
   15 May 05 12:18:21   
   
   From: mynamehere@comcast.net   
      
    wrote in message   
   news:7n4f81puhvpaekr09u0lmi60svj426030s@4ax.com...   
   >I am trying to embed the contents of one picturebox.picture into   
   > another picturebox.picture. My goal is to Annotate pictures, and save   
   > them to file. The display on the form works, but the original picture   
   > (without annotation) is saved to file. Worse case senerio would be   
   > using PrintScreen, but VB6 does not allow PRTSC in a SendKeys   
   > statement. Is VB6 capable of annotatiing and saving picture files?   
      
   Two things: set AutoRedraw to True, and then save the Image, not the Picture:   
      
   Private Sub Command1_Click()   
       Picture1.AutoRedraw = True   
       Picture1.Picture = LoadPicture("C:\Windows\Zapotec.bmp")   
       Picture1.Print "nice picture"   
       Call SavePicture(Picture1.Image, "C:\Windows\ZapotecPlus.bmp")   
   End Sub   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca