Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Создание таблицы в Excel [D7, WinXP]


bva ©   (2005-10-02 00:00:00) 

Как создать таблицу в Excel с помощью ADO программно. Как работать с готовой знаю, а необходимо создать новую.
Если можно примерчик.


sniknik   (2005-10-07 15:16:00) [1]

> вопрос несколько не корректен
с помощью ADO
procedure TForm1.Button1Click(Sender: TObject);
begin
 with TADOConnection.Create(nil) do begin
   ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Tttest.xls;Extended Properties=Excel 8.0;Persist Security Info=False';
   LoginPrompt:= false;
   Execute('Create table Table1(id integer)');
   Close;
 end;  
end;


bva   (2005-10-07 14:49:00) [2]

Спасибо за ответы. Прав Sashka вопрос несколько не корректен. Именно границы ячеек. ADO воспринимает столбцами только ячейки с границами.


Sashka   (2005-10-02 13:11:00) [3]


> Если отчет с постоянным и известным количеством столбцов,
>  то я делаю шаблон и заношу туда данные.
> А вот необходимо сделать отчет с плавающим и не известным
> количеством столбцов. Как нарисовать программно эти столбцы.
>

На листе excel'я (по крайней мере 2000-го) всегда 256 столбцов и это не изменишь, хоть ты тресни... (Может я и ошибаюсь, никогда не считал себя знатоком excel'я, тогда буду рад если меня кто-нибудь поправит :)) Можно, конечно, попытаться поправить код excel'я, но, думаю, это не того, чего ты хочешь. Если ты имеешь в виду границы ячеек, то http://www.delphimaster.ru/cgi-bin/forum.pl?id=1126739002&n=8


YurikGL   (2005-10-02 13:00:00) [4]


> elysee ©   (02.10.05 11:48) [7]


> И где здесь ADO ?


isasa   (2005-10-02 11:55:00) [5]

elysee ©   (02.10.05 11:48) [7]
Такое впечатление, что с 1 октября отменили OleVariant


elysee   (2005-10-02 11:48:00) [6]

procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.ExcelApplication1.Workbooks.Add(ExtractFilePath(Application.ExeName)+'wwww',0);
Form1.ExcelWorkbook1.ConnectTo(Form1.ExcelApplication1.ActiveWorkbook);
Form1.ExcelApplication1.Visible[0]:=true;
end;


злобная танька   (2005-10-02 11:24:00) [7]


> YurikGL ©   (02.10.05 11:01) [3]

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


YurikGL   (2005-10-02 11:09:00) [8]


> bva ©   (02.10.05 11:03) [4]


ADOCommand1.CommandText:='Create table Table1(id integer)';
ADOCommand1.Execute;


bva   (2005-10-02 11:03:00) [9]

Спасибо за ответ.
Если отчет с постоянным и известным количеством столбцов, то я делаю шаблон и заношу туда данные.
А вот необходимо сделать отчет с плавающим и не известным количеством столбцов. Как нарисовать программно эти столбцы.


YurikGL   (2005-10-02 11:01:00) [10]


> злобная танька   (02.10.05 10:44) [2]

И где здесь ADO ?


злобная танька   (2005-10-02 10:44:00) [11]

чиста сохранить созданную а-ля

Excel.Workbooks[1].SaveAs(filename, xlWorkbookNormal, '', '', False, False, xlNoChange, xlLocalSessionChanges, true, 0, 0, 0, LCID);
если вам это поможет..


злобная танька   (2005-10-02 10:37:00) [12]

создать таблицу эксел с помощью ADO? вы шутите? или всё же создать таблицу и переписать туда данные из базы данных?


Наверх

Титульная страница Поиск, карта сайта Написать письмо