|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Помогите с metafile
Есть проблема: Нужно из Word`а скопировать фигуру и вставить в TImage.
|
#2
|
||||
|
||||
в uses добавь ClipBrd
Код:
procedure TForm1.Button1Click(Sender: TObject); begin if Clipboard.HasFormat(CF_METAFILEPICT ) then image1.Picture.Metafile.Assign(Clipboard) else showmessage('Буфер обмена не содержит нужный формат данных!!!'); end; |