Logo Море(!) аналитической информации!
IT-консалтинг Software Engineering Программирование СУБД Безопасность Internet Сети Операционные системы Hardware
Архив форумов ЦИТФорума
Море(!) вопросов - Море(!) ответов
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 
Как правильно задавать вопросы

Создание отчетов в Excele через Delphi!

 
Перейти:  
Этот форум закрыт, вы не можете писать новые сообщения и редактировать старые.   Эта тема закрыта, вы не можете писать ответы и редактировать сообщения.    Список форумов Архив форумов ЦИТФорума -> Базы данных
Предыдущая тема :: Следующая тема  
Автор Сообщение
BLOOD_OMEN



Зарегистрирован: 10.01.2007
Сообщения: 1

СообщениеДобавлено: Чт Янв 11 2007 22:27    Заголовок сообщения: Создание отчетов в Excele через Delphi! Ответить с цитатой

Ребята помогите. Не могу вывести на отчет таблицы Paradox из базы данных сделанной в Delphi. отчеты необходимо вывести в Excel.
На счет ВОЛН ИНТЕГРАЦИИ I. II. III читал, ничего такого что могло бы мне помочь я не нашел. Может кто сталкивался с такой задачей!
Заранее спасибо за любой ответ!!!
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
mad_alexx



Зарегистрирован: 14.01.2005
Сообщения: 154
Откуда: Иркутск

СообщениеДобавлено: Пт Янв 12 2007 06:20    Заголовок сообщения: Ответить с цитатой

Если не работает открытие dbf-файла в экселе, то делай SELECT * FROM... и построчно вставляй записи в эксель. Когда мне надо было экспортировать данные в эксель пользовался примерно таким кодом:
Код:

const
  ShortName='excel_template.xls';
var
  TemplateFile, ReportFile, CurTimeStamp: string;
  XLApp, Sheet : Variant;
begin
  ReportFile := MainForm.XlsReportsDir + '\' + ShortName + '(' + CurTimeStamp + ').xls';
  try
     XLApp:= CreateOleObject('Excel.Application');
  except
     XLApp:= GetActiveOleObject('Excel.Application');
  end;
  XLApp.Visible := True;
  XLApp.Workbooks.Open(FileName := TemplateFile);
  Sheet := XLApp.WorkBooks[1].WorkSheets[1];
  Sheet.cells[y, k] := 'some text';
  XLApp.Workbooks[1].SaveAs(ReportFile);
  XLApp := UnAssigned;
end;
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Показать сообщения:   
Этот форум закрыт, вы не можете писать новые сообщения и редактировать старые.   Эта тема закрыта, вы не можете писать ответы и редактировать сообщения.    Список форумов Архив форумов ЦИТФорума -> Базы данных Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2002 phpBB Group
Русская поддержка phpBB

 

IT-консалтинг Software Engineering Программирование СУБД Безопасность Internet Сети Операционные системы Hardware

Информация для рекламодателей PR-акции, размещение рекламы — adv@citforum.ru,
тел. +7 495 6608306, ICQ 232284597
Пресс-релизы — pr@citforum.ru
Послать комментарий
Информация для авторов
This Web server launched on February 24, 1997
Copyright © 1997-2000 CIT, © 2001-2006 CIT Forum
Внимание! Любой из материалов, опубликованных на этом сервере, не может быть воспроизведен в какой бы то ни было форме и какими бы то ни было средствами без письменного разрешения владельцев авторских прав. Подробнее...