掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
次行に制御が移るのを防ぐには？ (ID：30089)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
procedure TForm1.FormCreate(Sender: TObject); var S:widestring; begin S:=''; if S='' then begin showmessage('コード指定がありません'); application.Terminate;end; ADOQuery1.SQL.Clear; ADOQuery1.SQL.add('Select * from y_yakuhin where コード='+S); ADOQuery1.open; ・・・ ADOQuery1.close; end; 上記を実行しますと「コード指定がありません」を表示後、 「OK」でダイアログボックスを消すと、ADOQuery1.openでエラーになります。 つまりapplication.Terminateが実行されません(if〜then〜elseで囲むとOKです。) なぜでしょうか？
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.