Вопрос по работе с EnumEnhMetaFile [D6, Win2k]
jen_bond © (2003-03-25 20:28:00)
Подскажите в чем может быть проблема, хочу вытащить из
метафайла текст только с определенного участка, а вытаскиваеться
только вксь целиком из всего файла. В чем я допустил ошибку.
procedure TMainForm.FormCreate(Sender: TObject);
begin
emf:=TMetaFile.Create;
emf.LoadFromFile("c:\3.emf");
dc := GetDC(MainForm.Handle);
Mainform.Caption:="dc:"+IntToStr(dc)+"";
end;
procedure TMainForm.FormClick(Sender: TObject);
var r:Trect;
res,dp: boolean;
ptRealSize: TPoint;
begin
r:=Rect(0,0,10,10);
res:=EnumEnhMetaFile(DC,emf.Handle, @EnumProc, nil,r);
end;
Polevi (2003-03-26 14:47:00) [1]
MFC:=TMetafileCanvas.Create(emf,GetDC(0));
EnumEnhMetaFile(MFC.Handle,emf.Handle,@EnumProc,nil,r)
Наверх 
ЧАТ |
Орешник |
|
