![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Создание таблицы в 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? вы шутите? или всё же создать таблицу и переписать туда данные из базы данных?