History  | 
ImageResize (general internal functions) 
Purpose 
Changes the displayed size of an image. 
Binary data will be returned in the same image format with the new dimensions. 
Syntax 
ImageResize (OriginalData, NewWidth, NewHeight) 
 Example 
Sub Main() 
Dim fIn as File 
Dim fOut as File 
fIn.OpenFile("c:\photo.jpg") 
fIn.Read(fIn.Datasize) 
fOut.OpenFile(FCPOFolder & "\smallphoto.jpg",fcWrite) 
fOut.Write(ImageResize(fIn.Data,32,32)) 
fOut.CloseFile 
fIn.CloseFile 
End Sub 
 | ||||||||