Re: Help with a pic

Posted by Jim Guerber on September 23, 2012 at 10:18:59:

In Reply to: Re: Help with a pic posted by Robert G Laurin on September 23, 2012 at 07:27:11:

We have found that, because of window's refusal to display images from a network share (at times), that if we always copy the file before displaying it works better.

I reduced Robert's snippet to about a dozen lines.

   Print (0) (SCREEN=90,25)                                    
   Print (0) (Wall Paper Color=255,255,240)                    
   Print (0) (MAPMODE=4)                                       
   From$ = PATH('CED') + 'CED-1201.BMP'                   
   To$ = "$(CATOOLS)\CED-MINI.BMP"  
   copyflag=64 + 128                                               ! Copy local->local
   if  SUB(DSTAT(TERM$),21,1) = '@01@' copyflag = copyflag + 512   ! Copy Local->Remote          
   Print (CopyFile=From$,To$,copyflag)  
   INPUT (0) ''                                             
   Print (0) (DrawImage = 27,4,59,17,100,100,1,To$)        
   Print (0) (TransparentColor=254)

You still have to play with the coordinates and image size a bit.

Follow Ups:

• Re: Help with a pic Stephen Auerbach (sauerbach@auerbach.net) 09:59:22 09/24/12 (0)

Post a Followup

Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.