Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.03.18;
Скачать: [xml.tar.bz2];

Вниз

Передача данных в Excel   Найти похожие ветки 

 
ishicucu ©   (2007-02-26 21:00) [0]

Здравствуйте.
Из моей программы нужно построить таблицу в Excel, я использую COM.
Для форматирования ячеек (расчерчивание линий для печати, выравнивание в ячейке) я использую примерно следующий код:

   for i := 1 to 42 do
     for j := 3 to 27 do begin
       sheet.cells[j,i].HorizontalAlignment:=-4108;
       sheet.cells[j,i].VerticalAlignment:=-4108;
       sheet.cells[j,i].Borders.LineStyle:=1;
     end;

Но программа работает слишком медленно:( На простое форматирование тратится несколько секунд. Возможно, существуют какие-то методы чтобы задать форматирование сразу целому диапазону ячеек?


 
ishicucu ©   (2007-02-26 21:06) [1]

Да, забыл добавить, в переменной sheet лежит указатель на лист.


 
Сергей М. ©   (2007-02-27 08:28) [2]

Sheet.Range[требуемый диапазон ячеек].HorizontalAlignment:= ...


 
SlymRO   (2007-02-27 08:32) [3]

sheet.cells[j,i] - трижды!
надо так
for i := 1 to 42 do
 for j := 3 to 27 do begin
   cell:=sheet.cells[j,i];
   cell.HorizontalAlignment:=-4108;
   cell.VerticalAlignment:=-4108;
   cell.Borders.LineStyle:=1;
 end;

Но быстрее Сергей М. ©   (27.02.07 8:28) [2] всеравно не получится


 
ishicucu ©   (2007-02-27 13:09) [4]

Спасибо, все работает:)



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.03.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.038 c
15-1171978977
Ega23
2007-02-20 16:42
2007.03.18
А куда в Delphi7 делся QuickReport?


15-1171865166
Чапаев
2007-02-19 09:06
2007.03.18
Звериный оскал копирайта %-)


2-1171876396
Прохожев Максим
2007-02-19 12:13
2007.03.18
Количество строк в проекте


2-1172263631
Allexandr
2007-02-23 23:47
2007.03.18
Процедуры


2-1172321193
ishicucu
2007-02-24 15:46
2007.03.18
Печать содержимого TWebbrowser





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский