Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.11.16;
Скачать: CL | DM;

Вниз

как открыть в Delphi таблицу Excel?   Найти похожие ветки 

 
feel ©   (2008-10-07 09:45) [0]

как открыть в Delphi таблицу Excel?


 
Сергей М. ©   (2008-10-07 09:49) [1]

Что значит "открыть" ?


 
Jeer ©   (2008-10-07 09:58) [2]


> как открыть в Delphi таблицу Excel?


Варианты:
1. Открыть как нетипизированный файл.
2. Написать свой аля Ексел и открывать в нем, как файл формата Excel
3. Использовать сторонние компненты ( методы доступа), например - FlexExcel.


 
feel ©   (2008-10-07 09:59) [3]

Есть готовые таблицы .xls, для открытия их в Database Desktop сохраняю их с расширением .dbf, в результате проблемы то с кодировкой то ещё с чем.
Может я вообще неправельно начинаю?
Как первоначальный результат хочу сделать несколько таблиц и одну суммирующую данные из всех остальных.
Вот.


 
feel ©   (2008-10-07 10:02) [4]

Если можно поподробнее, "для чайника":-)


 
Сергей М. ©   (2008-10-07 10:05) [5]


> Может я вообще неправельно начинаю?


Так оно и есть.
http://www.citforum.ru/programming/windows/excel_faq/part5.shtml


 
MsGuns ©   (2008-10-07 10:28) [6]

В экселе понятие "таблица" отсутствует


 
feel ©   (2008-10-07 10:40) [7]

Спасибо за ссылку.
Хочу теперь обнаружить, где находиться Jet OLE DB Provider?


 
Palladin ©   (2008-10-07 10:43) [8]


> Хочу теперь обнаружить, где находиться Jet OLE DB Provider?

это ты у нас спрашиваешь хочешь ты или нет? :)
зачем тебе он конкретно? тебе ADO соединение поднимать нужно к нему, сам он тебе нафиг не сдался


 
feel ©   (2008-10-07 10:46) [9]

> тебе ADO соединение поднимать нужно к нему, сам он тебе
  нафиг не сдался

и как это сделать?


 
Palladin ©   (2008-10-07 10:47) [10]

просто. изучить компоненты на вкладе ADO.


 
feel ©   (2008-10-07 11:15) [11]

ага, спасибо!
Допустим это у меня получиться, как теперь непосредственно вызывать этот .xls файл с формы?


 
Виталий Панасенко   (2008-10-07 11:19) [12]


> feel ©   (07.10.08 11:15) [11]
>
> ага, спасибо!
> Допустим это у меня получиться, как теперь непосредственно
> вызывать этот .xls файл с формы?

Куда, на допрос в прокуратуру?


 
Виталий Панасенко   (2008-10-07 11:21) [13]

по ссылке все есть.абсолютно и расжевано


 
Anatoly Podgoretsky ©   (2008-10-07 11:29) [14]

> Palladin  (07.10.2008 10:47:10)  [10]

С Экселем - да он умрет, он и сейчас взял и переименовал файл и на что то расчитывает.
Тут же программист нужен!


 
feel ©   (2008-10-07 11:42) [15]

Я согласен с тем, что нужен программист.
Но, есть очень большое желание научиться работать в Delphi.
С ADO и ссылкой на файл думаю что разобрался.
Другой вопрос: как создать таблицу в Delphi?


 
pavel_guzhanov ©   (2008-10-07 11:44) [16]

Примерно так. В uses добавь comObj. При необходимости еще надо добавить Excel_TLB. Последний файл создается в Delphi Project->Import Type Library

var XLApp, Sheet, Colum:Variant;
..........

 XLApp:=CreateOleObject("Excel.Application");
 XLApp.WorkBooks.Open("C:\MyXls.xls");
 Sheet:=XLApp.Workbooks[1].WorkSheets["Лист1"];// или как там у тебя лист называется


 
pavel_guzhanov ©   (2008-10-07 11:47) [17]


> pavel_guzhanov ©   (07.10.08 11:44) [16]


Это был ответ на первый вопрос.


> Другой вопрос: как создать таблицу в Delphi?


Вот так:
 XLApp:=CreateOleObject("Excel.Application");
 XLApp.Workbooks.Add(-4167);
 XLApp.Workbooks[1].Worksheets[1].Name:="Лист1";
 Sheet:=XLApp.Workbooks[1].Worksheets["Лист1"];
 Sheet.PageSetup.Orientation:=xlLandscape;
 Colum:=XLApp.Workbooks[1].Worksheets["Лист1"].Columns;
 XLApp.Visible:=true;


 
feel ©   (2008-10-07 11:56) [18]

Пожалуйста, поподробнее о >В uses добавь comObj
У меня Delphi, на русском, я понимаю для создания последнего файла на до открыть фкладку ПРОЕКТ и выбрать там ИМПОРТ БИБЛИОТЕКИ ТИПОВ..., правильно?


 
Виталий Панасенко   (2008-10-07 12:01) [19]


> feel ©   (07.10.08 11:56) [18]

Можешь использовать закладку Servers. Это обертки над
> pavel_guzhanov ©   (07.10.08 11:44) [16]


 
feel ©   (2008-10-07 12:02) [20]

> Другой вопрос: как создать таблицу в Delphi?

А можно попроще, или по подробнее.
Может есть что нибудь типа мастера форм, а то текст который ты мне написал мне вообще ничто не говорит, даже если его скопировать, то тупо не знаю куда его вставить... извени...


 
pavel_guzhanov ©   (2008-10-07 12:06) [21]


> Пожалуйста, поподробнее о >В uses добавь comObj


В каждом юните есть раздел uses. Вот в него и допиши руками comObj. А если собираешься в дальнейшем что-то добавлять/удалять/редактировать в таблице, то надо
> на до открыть фкладку ПРОЕКТ и выбрать там ИМПОРТ БИБЛИОТЕКИ
> ТИПОВ

там выбрать Microsoft Excel (там еще будет номер версии установленного у тебя Excel), и нажать там кнопку Create Unit. Тогда создастся файл Excel_TLB.pas, и он сам подключится к проекту.


 
feel ©   (2008-10-07 12:09) [22]

дописать сюда:
uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs;?


 
pavel_guzhanov ©   (2008-10-07 12:12) [23]


> Может есть что нибудь типа мастера форм


Ну хорошо, возьми новый проект, кинь на форму кнопку, измени ее Caption на "Создать файл Excel", и в событии ее OnClick вставь то, что я тебе написал в [17]. И еще объяви переменные var XLApp, Sheet, Colum:Variant;. По нажатию кнопки у тебя откроется книга Excel с рабочим листом.
Строку  Sheet.PageSetup.Orientation:=xlLandscape;
можешь не копировать, она задает ориентацию страницы.


 
feel ©   (2008-10-07 12:12) [24]

pavel, у тебя есть icq? Я думаю там бы ты мне быстрее объяснил.


 
pavel_guzhanov ©   (2008-10-07 12:13) [25]


> pavel, у тебя есть icq?


а в анкете посмотреть не судьба? :о)


 
feel ©   (2008-10-07 12:19) [26]

не знаю где её посмотреть:-(


 
pavel_guzhanov ©   (2008-10-07 12:22) [27]

рядом с ником в каждом ответе есть значок (с). Щелкни на нем мышкой:о)



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

Текущий архив: 2008.11.16;
Скачать: CL | DM;

Наверх




Память: 0.53 MB
Время: 0.014 c
15-1221812450
Slider007
2008-09-19 12:20
2008.11.16
С днем рождения ! 19 сентября 2008 пятница


2-1223446963
edk2
2008-10-08 10:22
2008.11.16
paradox отловить последние даты


2-1222942248
Сергей
2008-10-02 14:10
2008.11.16
индексы в базе dbf


4-1200030765
Михаил Макушев
2008-01-11 08:52
2008.11.16
Access violation prin вызове ф-ции CryptoAPI


2-1223020665
Int23
2008-10-03 11:57
2008.11.16
Сколько тиков в часе в Вин64