Четверг, 01 Мая 2014 г. 04:01
+ в цитатник
Здравствуйте!
Delphi XE5, MS Office 2010.
Не работает такой код
[Code]
...
uses ComObj, Excel2010;
...
procedure TForm4.Button1Click(Sender: TObject);
var
XLApp, XLBook, XLSheet, XLRng : OleVariant;
begin
XLApp := CreateOleObject('Excel.Application');
XLApp.Visible:=true;
XLBook := XLApp.WorkBooks.Add;
XLSheet := XLBook.ActiveSheet;
XLRng := XLSheet.Range['A1:A1'];
XLRng.HorizontalAlignment := -4108; // OK - число найдено на просторах инета
XLRng.HorizontalAl ...
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=82547
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-