開啟資料庫OR資料表，非得用TABLE,QUERY元件嗎？有沒有直接一點的方式？ 因為有時只是要開一個小小資料表來取得基本資料，或簡單比對，但是卻也要 拉一個TABLE元件，不打緊，還要設定連絡等等，很不方便，有沒有像 USE TABLENAME這類或其他方式，方便一點的？請高手來解答一下，新手白吃問 ，多包涵～  ~*呂政全*~

------
~*呂政全*~

您好!    當然是需要有資料集元件(如Table, Query, ADOTable, ADOQuery等等)來擷取資料表啊! 無論是再小的資料庫, 只要是對其有擷取, 異動, 存儲的動作, 皆要使用資料集元件.    參考看看!    ===================== 努力,相信會獲得美麗! 忻晟

------
忻晟

感謝解答，看了三本書，都沒有給我驚喜的地方 即然篤定如此，那就不必再找了，乖乖拉物件吧 想到之前寫VFP，遇到問題沒人解答，網路討論人少 問題放到最後沒人理，相對這裡真是溫馨，感動唷€€ ~*呂政全*~

------
~*呂政全*~

引言: 開啟資料庫OR資料表，非得用TABLE,QUERY元件嗎？有沒有直接一點的方式？ 因為有時只是要開一個小小資料表來取得基本資料，或簡單比對，但是卻也要 拉一個TABLE元件，不打緊，還要設定連絡等等，很不方便，有沒有像 USE TABLENAME這類或其他方式，方便一點的？請高手來解答一下，新手白吃問 ，多包涵～ ~*呂政全*~ < face="Verdana, Arial, Helvetica"> 早期使用DOS DATABASE 沒有物件觀念, 所以一切都是以 COMMAND 來實現, 到 了WINDOW時代, OOP, 物件導向, 事件驅向行為取代了原有DOS的做法, 所以都要 以物件來處理, 但並不一定要拉一個物件才可以讀檔, 你還是可以寫程式來做 其實如果你去查 USE 的用法(INCLUDE 宣告), USE 也不是一行指令完成的, 所 以你可以把開檔的程式寫成一個FUNCTION, 以下是一個沒有直接在FORM上建立 TTable, TDataSoruce 可以開檔的範例(但仍是引用BDE的功能) 1.建一個 DBGRID1, 及兩個BUTTON

unit Unit1;    interface    uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Db, Grids, DBGrids, DBTables;    type
  TForm1 = class(TForm)
    DBGrid1: TDBGrid;
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
    newTable: TTable;
    newDSource: TDataSource;
  public
    { Public declarations }
  end;    var
  Form1: TForm1;    implementation    {$R *.DFM}    procedure TForm1.Button1Click(Sender: TObject);
begin
     newTable:= TTable.Create(self);
     newDSource:= TDataSource.Create(self);
     newDSource.DataSet:= newTable;
     DBGrid1.DataSource:= newDSource;
     newTable.DatabaseName:= 'D:\DELPHI\MOTOAIR';
     newTable.TableName:= 'OTHERSYS.DB';
     newTable.Open;
end;    procedure TForm1.Button2Click(Sender: TObject);
begin
     newTable.Close;
end;    procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
     newTable.Free;
end;    end.    

你可以應用這樣的方式, 把TTable變成一個function來call, 提供你參考

嗯嗯～～怎麼沒想到€～真是受用€～再次感謝€～

------
~*呂政全*~