Модераторы: Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> [excel] заголовок таблицы на каждой странице 
V
    Опции темы
devyshko
Дата 6.6.2008, 11:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 67
Регистрация: 2.12.2007

Репутация: нет
Всего: нет
Народ, подскажите пожалуйста.

Вот делаю отчёт, вывожу его в эксель из делфи. При этом заголовок таблицы не рисую каждый раз, а открываю файл, где уже есть этот заголовок. Всё вроде класс, но надо, чтоб этот заголовок был на каждой странице, подскажите, как бы это сделать smile спасибо smile
PM   Вверх
Данкинг
Дата 6.6.2008, 12:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Код

Excel.ActiveSheet.PageSetup.PrintTitleRows := '$1:$1';




--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
devyshko
Дата 9.6.2008, 09:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 67
Регистрация: 2.12.2007

Репутация: нет
Всего: нет
Ребята, ну что за фигня. Не всё класс :((((

При попытке сделать заголовок на каждой странице, оказалось, что кроме первой страницы ничего то и не печатается больше. В общем кшмар :(

Код

excel : variant;

dm.QueryOt1.sql.loadfromfile(GetCurrentDir() + '\sql\Otch1.sql');
DM.QueryOt1.Open;

excel := CreateOleObject('Excel.Application'); 
Excel.Workbooks.Open[GetCurrentDir() + '\shablon\Otch1.xls', 0, true];

while true do
begin
  for n:= 2 to 28 do
   begin
      excel.range[perevod(Nstr,n-1,true,true)] := string(DM.QueryOt1.Fields[n].Value);
   end;
   inc(Nstr);
   DM.QueryOt1.next;
   if DM.QueryOt1.Eof then break;
end;

Excel.Visible := true;
PM   Вверх
Данкинг
Дата 9.6.2008, 10:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Цитата(devyshko @  9.6.2008,  10:40 Найти цитируемый пост)
При попытке сделать заголовок на каждой странице,

А где в твоём коде мой пример?


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
devyshko
Дата 9.6.2008, 10:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 67
Регистрация: 2.12.2007

Репутация: нет
Всего: нет
Временно был закомментен, ибо всё равно кроме первой страницы ничего не печаталось smile

А ошибка нагло пряталась в шаблоне smile. 


Спасибо за помощь  :-*
PM   Вверх
Данкинг
Дата 9.6.2008, 10:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Всегда пожалуйста...


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Центр помощи"

ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Несоблюдение правил может повлечь за собой самые строгие меры от закрытия/удаления темы до бана пользователя!


  • Название темы должно отражать её суть! (Не следует добавлять туда слова "помогите", "срочно" и т.п.)
  • При создании темы, первым делом в квадратных скобках укажите область, из которой исходит вопрос (язык, дисциплина, диплом). Пример: [C++].
  • В названии темы не нужно указывать происхождение задачи (например "школьная задача", "задача из учебника" и т.п.), не нужно указывать ее сложность ("простая задача", "легкий вопрос" и т.п.). Все это можно писать в тексте самой задачи.
  • Если Вы ошиблись при вводе названия темы, отправьте письмо любому из модераторов раздела (через личные сообщения или report).
  • Для подсветки кода пользуйтесь тегами [code][/code] (выделяйте код и нажимаете на кнопку "Код"). Не забывайте выбирать при этом соответствующий язык.
  • Помните: один топик - один вопрос!
  • В данном разделе запрещено поднимать темы, т.е. при отсутствии ответов на Ваш вопрос добавлять новые ответы к теме, тем самым поднимая тему на верх списка.
  • Если вы хотите, чтобы вашу проблему решили при помощи определенного алгоритма, то не забудьте описать его!
  • Если вопрос решён, то воспользуйтесь ссылкой "Пометить как решённый", которая находится под кнопками создания темы или специальным флажком при ответе.

Более подробно с правилами данного раздела Вы можете ознакомится в этой теме.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Центр помощи | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0440 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.