Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Paradox в Excel [D5, Paradox]

and_sp © (2002-12-03 09:32:00)
Подскажите, пожалуйста, как преобразовать базу Paradox в файл Excel?
Заранее благодарен!

Jeka (2002-12-08 16:16:00) [1]
А вот еще, откопал в старых конспектах
короче на форме ставиш компонент табле, датасерс, дбгрид, кнопку и ExcelApplication
со страници Servers. Все соеденяеш кроме ExcelApplication
патом на батонклик пишеш:
procedure TForm1.SpeedButton1Click(Sender: TObject);
var
RangeE:Excel2000.Range;
I, Row:Integer;
Bookmark:TBookmarkStr;
begin
ExcelApplication1.Visible[0]:=True;
ExcelApplication1.Workbooks.Add(NULL,0);
RangeE:=ExcelApplication1.ActiveCell;
for I:=0 to Table1.Fields.Count - 1 do
begin
RangeE.Value:=Table1.Fields [I].DisplayLabel;
RangeE:=RangeE.Next;
end;
try
Bookmark:=Table1.Bookmark;
try
Table1.First;
Row:=2;
while not Table1.Eof do
begin
RangeE:=ExcelApplication1.Range["A"+
IntToStr(Row), "A"+ IntToStr(Row)];
for I:=0 to Table1.Fields.Count - 1 do
begin
RangeE.Value:=Table1.Fields[I].AsString;
RangeE:=RangeE.Next;
end;
Table1.Next;
Inc(Row);
end;
finally
Table1.Bookmark:=Bookmark;
end;
finally
Table1.EnableControls;
end;
RangeE:=ExcelApplication1.Range["A1","E"+ IntToStr (Row-1)];
RangeE.AutoFormat(3,NULL,NULL,NULL,NULL,NULL,NULL);
end;
у меня это работает.

Jeka (2002-12-08 15:53:00) [2]
короче есть прога Т2Т вроде на http://bubble.pdc.ru
она копирует db в dbf и наоборот короче как захочеш.
dbf открывается при помоще excelя

NetKnight (2002-12-05 12:39:00) [3]
А если Записей больше 1000 ? То Оле или рухнет или будет это делать таааак долго.. Я уже пробовал..

sniknik (2002-12-03 15:53:00) [4]
почему не подходит? слишком просто? можно придумать посложнее см. хотя бы up -> Arhelon © (03.12.02 15:24)
но не зная чего ты хочеш и для чего невозможно давать конкретные советы на неопределенные вопросы, одному, тут помошник требуется с высшим телепатическим образованием.
а давать тебе вариант за вариантом пока тебе не попрет, влом, ты уж извини.

Arhelon (2002-12-03 15:24:00) [5]
Открываешь свою базу потом через оле ентот датасет пихаешь построчно в эксел потом ентому оле объекту (эеселю) говоришь сохрани мол там то и все.
Есть ещё куча халявных компонент которые берут датасет и заполняют им эксель.
Или Тебе вообще влом что-то самому делать, думать и тд ???

and_sp (2002-12-03 15:15:00) [6]
Не, такой вариант мне не подходит...

Geka (2002-12-03 11:48:00) [7]
А потом сохранить как и в путь...

and_sp (2002-12-03 11:41:00) [8]
Дело в том что нужен именно файл *.xls...

sniknik (2002-12-03 10:31:00) [9]
нашол тоже проблему, сам Excel понимает Paradox файлы, открыть там выбери все файлы *.* и выбирай свою базу. (офис 2000, за < не ручаюсь)

Наверх

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