![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Excel: свойства ячейки.
bw © (2004-12-07 20:25:00)Расскажите пожайлуста, какие свойства ячейки в Excel доступны через Delphi.
Более конкрето, если смотреть по анологии с самим Excel, то при нажатии свойства ячейки и "Формат ячеек" на закладке "выравнивание" есть параметр "Ориентация". Как его изменить из Delphi???
И еще конкретнее, если можно, то как изменить ориентацию для строки A2 на 90 градусов?
GanibalLector (2004-12-09 01:23:00) [1]
> А запросто. Может речь шла не об работе через
> CreateOleObject, а о компонентах с закладки Servers.
Ну что-ж...ушел в запой...
GuAV (2004-12-08 21:45:00) [2]GanibalLector © (08.12.04 3:32) [2]
Ежели все повторится подобно [Печать!] ,
А запросто. Может речь шла не об работе через CreateOleObject, а о компонентах с закладки Servers.
GanibalLector (2004-12-08 03:45:00) [3]/ если можно, то как изменить ориентацию для строки A2 на 90 градусов?/
Пардонь,мне Б2 больше понравилась.
GanibalLector (2004-12-08 03:32:00) [4]Ежели все повторится подобно http://www.delphimaster.ru/cgi-bin/forum.pl?id=1101847447&n=0,то вероятно уйду в запой и перестану отвечать на любые вопросы.
GanibalLector (2004-12-08 03:29:00) [5]
uses ActiveX,ComObj;
...
procedure TForm1.Button1Click(Sender: TObject);
var XLAPP:OleVariant;
i:integer;
begin
XLApp:=CreateOleObject('Excel.Application');
XLApp.Visible:=true;
XLApp.WorkBooks.Add;
XLApp.WorkBooks[1].WorkSheets[1].Name:='test ;)';
XLApp.WorkBooks[1].Sheets[1].Cells[2,2]:='GanibalLector';
XLApp.Workbooks[1].WorkSheets[1].Range['B2'].Select;
for i:=1 to 20 do begin
if odd(i) then
XLApp.Workbooks[1].WorkSheets[1].Range['B2'].Orientation:=random(90)
else
XLApp.Workbooks[1].WorkSheets[1].Range['B2'].Orientation:=0-random(90);
sleep(200);
end;
end;