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

Вниз

как открыть в 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.51 MB
Время: 0.006 c
2-1223399808
MZG
2008-10-07 21:16
2008.11.16
Помогите пожалуйста с запросом


2-1223361774
feel
2008-10-07 10:42
2008.11.16
Написание БД на Delphi6 с нуля.


2-1223370793
Gurd
2008-10-07 13:13
2008.11.16
kaCtrls


15-1221096677
Дуб
2008-09-11 05:31
2008.11.16
Игорь Шевченко - С Днем Рождения, дружище!


2-1223026415
Развёртка
2008-10-03 13:33
2008.11.16
Развернуть досовское окноий экран программы на весь экран





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский