Скачать: CL | DM;

Выгрузка Grid - а в Excel   Найти похожие ветки 

← →
Elena999   (2006-01-12 14:54) [0]

Где взять компонент OpToExcel для выгрузки Grid-а в Excel?
В каком это наборе RX, EhLib, Raise, AppControl ?? Мне срочно нужно для 7-ки Подскажите plizzzz...

---

← →
Ega23 ©   (2006-01-12 15:06) [1]

Есть несколько юнитов, которые экспортируют грид в экселевский файл. Если на машине ексель не установлен - просто создаёт xls файл.
Могу поделиться.
Писал не я, это шеф откуда-то притащил.
Мыло - в анекте.

---

← →
by ©   (2006-01-12 15:14) [2]

У EhLib есть экспорт грида.
var
 exportClass: TDBGridEhExportClass;
 ext: string;
begin
 // Экспорт данных грида
 Screen.Cursor := crHourGlass;
 try
   SaveDialog.FileName := Caption;
   if (ActiveGrid.Selection.SelectionType = gstNon) then
     ActiveGrid.Selection.SelectAll;
   if SaveDialog.Execute then
   begin
     case SaveDialog.FilterIndex of
       1:
         begin
           exportClass := TDBGridEhExportAsText;
           ext := "txt";
         end;
       2:
         begin
           exportClass := TDBGridEhExportAsCSV;
           ext := "csv";
         end;
       3:
         begin
           exportClass := TDBGridEhExportAsHTML;
           ext := "htm";
         end;
       4:
         begin
           exportClass := TDBGridEhExportAsRTF;
           ext := "rtf";
         end;
       5:
         begin
           exportClass := TDBGridEhExportAsXLS;
           ext := "xls";
         end;
     else
       exportClass := nil;
       ext := "";
     end;
     if exportClass <> nil then
     begin
       if UpperCase(Copy(SaveDialog.FileName, Length(SaveDialog.FileName) -
         2, 3)) <> UpperCase(ext) then
         SaveDialog.FileName := SaveDialog.FileName + "." + ext;
       SaveDBGridEhToExportFile(exportClass, ActiveGrid,
         SaveDialog.FileName, False);
     end;
   end;
   if (ActiveGrid.Selection.SelectionType = gstAll) then
     ActiveGrid.Selection.Clear;
 finally
   Screen.Cursor := crDefault;
 end;

В uses включить DBGridEhImpExp

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.074 c