掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
関数名を引数とする関数？ (ID：148607)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
質問が不明瞭になって申し訳ありません。 func1がFDQuery1を使っている関数(FDQuery2を使っているfunc2を含む)のとき、 procedure TForm1.Main; var S:string; begin FDQuery1.SQL.clear; FDQuery1.open('select * from [tabalename]'); while not FDQuery1.eof do begin ・ S:=func1; ・ ・ FDQuery1.next; end; FDQuery1.close end; この時、S:=func1; でFDQuery1はcloseされていますので、procedure Mainはエラーを返します。 これを避けるために、func1でFDQuery1,FDQuery2が使われていることを、Main側でopen前に知りたいという訳です。 take様、十分な質問能力の不備を反省しております。 不明瞭な質問に対して示唆に富むsuggestionと解決への方向をご教示下さいまして、 ありがとうございます。 >TFDQueryの管理を共通クラスを使って管理させる～ >「関数」ではなく「クラス」にして関数を呼び出す時にSelfを引数にすれば～ 「クラス」は理解の及んでいない領域ですので、これまでペストのように避けて通ってきましたが(笑)、 そうも言っていられないようです。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.