| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Стрелка в Excel [D6, WinXP]
001 © (2006-05-26 17:04:00)Excel пише макрос такой:
ActiveSheet.Shapes.AddLine(255#, 95.25, 314.25, 96#).Select
Selection.ShapeRange.Line.EndArrowheadStyle = msoArrowheadTriangle
Selection.ShapeRange.Line.EndArrowheadLength = msoArrowheadLengthMedium
Selection.ShapeRange.Line.EndArrowheadWidth = msoArrowheadWidthMedium
Selection.ShapeRange.Flip msoFlipHorizontal
Delphi при подключении
ComObj, OleServer, Excel2000, Activex
не знает что такое msoArrowheadTriangle
Как сделать у линии на конце стрелку?
001 (2006-05-27 03:54:00) [1]Вопрос исчерпан. Шагать надо было от ExcelApp.Selection
001 (2006-05-26 19:11:00) [2]
msoArrowheadTriangleначала понимать.
но
Shape:=Sheet.Shapes.AddLine(....
Shape.Line.EndArrowheadStyle := msoArrowheadTriangle;
выдает на второй строчке
Variant does not reference an automation object.
umbra (2006-05-26 18:19:00) [3]добавьте в
uses Office2000(ну или какой там у вас оффис)
| |
