![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как можно вытянуть из Metafile текст?
TeNY © (2004-10-16 13:59:00)К примеру Word при копировании копирует в формате Metafile как вытяныть оттуда и текст и изображения?
TeNY (2004-10-17 07:44:00) [1]Спасибо GROL
GROL (2004-10-17 01:06:00) [2]Вызываешь
EnumEnhMetaFile(0, MetaHandle, @EnumDebug, self, nil);
Парсиш этот метафайл
function EnumDebug(DC: HDC; HTable: PHandleTable; EMFR: PEnhMetaRecord; nObj: Integer; data: pointer): BOOL; stdcall;
begin
...
Result := true;
case EMFR^.iType of
EMR_HEADER: ;
...
EMR_EXTTEXTOUTA,
EMR_EXTTEXTOUTW: ;
end;
ну а дальше по задумке.