DelphiXE(DLL)

○イメージをデータ形式で設定する例
 
type
　　TByteArray = Array of byte;
var
　　ImageFile:    array[0..255] of AnsiChar;
　　imageLength:  Longint;
　　F:            TFileStream;
　　baImageData:  TByteArray;
begin
　　F:=TFileStream.Create(String(ImageFile),fmOpenRead);
　　imageLength := F.Size;
　　SetLength(baImageData, imageLength);
　　F.ReadBuffer(Pointer(baImageData)^,imageLength);
　　F.Free;
 
　　//イメージデータを描画します。
　　ret := jvSetFieldImageData(pid, 'IMAGE_2', imageLength,baImageData);