안녕하세요.
F1Book에서 metafile 삽입하는 방법 좀 가르쳐 주십시오.
베이직에서는 삽입이 되는데 델파이에서는 안되네요....
procedure TForm1.Button1Click(Sender: TObject);
var
MetaFile: TMetaFile;
MetaFileCanvas: TMetaFileCanvas;
ID1: integer;
nX,nY: integer;
mHandle: OLE_HANDLE;
nMapMode: integer
nXL,nXR,nXT,nXB: single;
begin
MetaFile := TMetaFile.Create;
MetaFile.LoadFromFile('d:jusangdo.wmf');
mHandle := MetaFile.Handle;
nMapMode := 7;
nX := MetaFile.Width;
nY := MetaFile.Height;
nXL := 10;
nXR := 20;
nXT := 20;
nXB := 30;
MetaFileCanvas := TMetaFileCanvas.Create(MetaFile,0);
F1Book2.ObjNewPicture(nXL,nXT,nXR,nXB,ID1,mHandle,nMapMode,nX,nY);
MetaFileCanvas.Free;
MetaFile.Free;
end;
그럼 답변 부탁드립니다.
그럼 즐프하세요..