uexpexcel.pas

查詢oracle數據表導出為excel表

unit Uexpexcel;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ComCtrls, DB, DBTables, Mask, DBCtrls, Buttons,
  ExtCtrls, Grids, DBGrids,QuickRpt, QRCtrls, Spin,ADODB,winsock,ComObj
  ,WinInet;

type
  exp = class(TThread)
  private
    { Private declarations }
  protected
    procedure Execute; override;
  end;

implementation
uses
frm_exp;



procedure exp.Execute;
begin
  { Place thread code here }
   
   //Caption:=frmMenu.TreeView.Selected.Text+' ['+Name+']';
end;

end.