Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Помогите с диапазоном в Excel-e. [D7, WinXP]


tytus ©   (2005-01-21 12:24:00) 

Добрый день мастера. Есть такой код:
procedure TForm1.Button1Click(Sender: TObject);
begin
Excel.SheetsInNewWorkbook[0]:=1;
Excel.Workbooks.Add(EmptyParam,0);
Excel.Cells.Item[1,1].Columns.ColumnWidth:=6;
Excel.Cells.Item[1,2].Columns.ColumnWidth:=40;
Excel.Cells.Item[2,2].Rows.RowHeight:=30;
Excel.Cells.Item[1,3].Columns.ColumnWidth:=20;
Excel.Cells.Item[1,2].Value:='Тестирование Excel';
Excel.Range["A1:C3"].Borders.LineStyle:=xlDouble;///?????
Excel.Visible[0]:=true;
end;
Так вот никак не получается описать диапазон
["A1:C3"],['A1:C3']- в справке по Excel (VBAXL10) пишеться как
["A1:C3"] а в делфи не получается.
Без ///???? все работает нормально.
Excel- компонент TExcelApplication.


Yr2   (2005-01-21 16:09:00) [1]

to tytus:
вообще-то это пишется так: Range['A1', 'C3']


tytus   (2005-01-21 15:10:00) [2]

>Style;
OK, помогло. Спасибо. В хелпе так и пишется, что это второй
синтаксис свойства Range.


Style   (2005-01-21 14:56:00) [3]

Может так?

Excel.Range[
 Excel.Cells.Item[1,1],
 Excel.Cells.Item[3,3]
          ].Borders.LineStyle := 7;


tytus   (2005-01-21 14:37:00) [4]

>Style;
Нет. Как раз после ...С3'] и ругается Not enough actual parametrs...


Style   (2005-01-21 14:26:00) [5]

Я просто число указывю и все работает..
Excel.Range['A1:C3'].Borders.LineStyle := 7;
можеть ему xlDouble не нравится??


tytus   (2005-01-21 14:20:00) [6]

>Sash
Не работает. Пишет Not enough actual parametrs.


Sash   (2005-01-21 12:46:00) [7]

["A1:C3"] в дельфи будет ['A1:C3']
попробуй так:
Excel.Range['A1:C3'].Select;
Excel.Range['A1:C3'].Borders.LineStyle:=xlDouble;


Наверх

Титульная страница Поиск, карта сайта Написать письмо