Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как достать картинку из Excel документа [Delphi, Windows]

Ragazor © (2004-08-28 19:03:00)
сабж

Ragazor (2004-09-05 13:54:00) [1]
Excel.ActiveSheet.Shapes.Item('Picture 5').Select;
Excel.Selection.Copy;
Form1.Image1.Picture.Assign(Clipboard);

вот так работает 100%

Excel:olevariant

YurikGL (2004-09-03 15:27:00) [2]
Как вариант - через буфер.

Ragazor (2004-09-03 14:30:00) [3]
form1.Worksheet.Shapes.Item('Picture5').Select(pic);
вроде так должно быть, PIc: OLEVARIANT

А как потом его скинуть в файл или, например, в Имейдж.

Ragazor (2004-09-03 13:55:00) [4]
а я прбовал
ActiveSheet.Shapes('Картинка 1').Select
:)

YurikGL (2004-09-03 13:35:00) [5]

> Ragazor (03.09.04 12:18) [6]

А что делфи пишет?

На всякий случай попробуй
ActiveSheet.Shapes.item('Картинка 1').Select

На будущее, берешь компонент ExcelWorkSheet, нажимаешь ctrl+пробел и смотришь появившийся список, потом ExcelWorkSheet.Shapes и тоже Ctrl+пробел.... Много нового узнаешь.

Ragazor (2004-09-03 12:18:00) [6]
я сделал, там надо вписать типа имя картинки вида "Картинка1"
но в делфи так не проходит.

YurikGL (2004-08-31 10:45:00) [7]

> Ragazor (30.08.04 11:36) [4]

Сделай макрос и посмотри его синтаксис

Ragazor (2004-08-30 11:36:00) [8]
ActiveSheet.Shapes(...).Select
такой синтаксис требует "member not found"

Ragazor (2004-08-30 11:20:00) [9]
хммм...
А если картинка не одна, тоесть типа нужно выбрать картинку с нужным названием и потом копировать.

VMcL (2004-08-30 10:17:00) [10]
Как-то так, вроде:

ActiveSheet.Shapes(...).Select
Selection.Copy

YurikGL (2004-08-30 07:26:00) [11]
Как вариант запустить Excel потом нужную картинку сделать select а потом copytoclipboard

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »