Как повернуть изображение в TextBox(e)?

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
Diego__
Сообщения: 16
Зарегистрирован: 12 авг 2009, 15:35

Пишу на плюсах, но думаю, что код будет понятен.

Добавляю новый текст бокс:
Word::ShapePtr imTextBox = m_WordDocument->Shapes->AddTextbox (Office::msoTextOrientationHorizont al, 100, 100, 1000, 1000);

Добавляю в текст бокс изображение:
Word::InlineShapePtr picture = imTextBox->TextFrame->ContainingRange->InlineShapes->AddPicture(L"c:\\image.bmp");

у InlineShape-a нет свойства rotate или метода которым его можно развернуть, пробую конвертировать его в ShapePtr и у Shape-a задать поворот:
Word::ShapePtr shapePtr = shape->ConvertToShape();
shapePtr->Rotation = angel;

в методе ConvertToShape падаем.

Если делаю так:
Word::InlineShapePtr shape = m_WordDocument->Paragraphs->Last->Range->InlineShapes->AddPicture(L"c:\\untitled.bmp");
Word::ShapePtr shapePtr = shape->ConvertToShape();

все нормально.

Что я делаю не так? Есть ли другой стособ добавить изображение в текст бокс? Возможно, сначала нужно развернуть изображение, а потом добавлять его в текст бокс?

Очень жду помощи на любом языке программирования
Аватара пользователя
Aent
Сообщения: 1129
Зарегистрирован: 01 окт 2006, 14:52
Откуда: Saratov,Russia
Контактная информация:

Посмотрите вариант решения задачи здесь:
http://www.programmersforum.ru/showpost ... ostcount=6
Андрей Энтелис,
aentelis.livejournal.com
Diego__
Сообщения: 16
Зарегистрирован: 12 авг 2009, 15:35

Спасибо, в форуме на кот. ссылка тема создана мною :)
Аватара пользователя
Aent
Сообщения: 1129
Зарегистрирован: 01 окт 2006, 14:52
Откуда: Saratov,Russia
Контактная информация:

Пожалуйста, это было очевидно. Там 6-м постом мой ответ на ваш вопрос.
:)
Андрей Энтелис,
aentelis.livejournal.com
Ответить