掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TQueryの再利用 (ID：17002)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ちょっとやってみました。 MySQLが無いので、InterBaseとAccessをそれぞれ BDEに設定して DataBase1にInterBaseをDataBase2にAccessを設定しました。 どちらもConnectはTrueです。 問題なく動きます。 procedure TForm1.Button2Click(Sender: TObject); begin with Query1 do begin Close; DatabaseName := Database1.DatabaseName; with SQL do begin Clear; Add('SELECT FIRST_NAME, LAST_NAME'); Add('FROM EMPLOYEE'); end; Open; end; end; procedure TForm1.Button3Click(Sender: TObject); begin with Query1 do begin Close; DatabaseName := Database2.DatabaseName; with SQL do begin Clear; Add('SELECT *'); Add('FROM T_コースマスタ'); end; Open; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.