具体的なアプリケーション開発

 

データモジュールの設定と初期処理実行
受注登録画面の設定
社員検索
- Tableを使って
受注明細画面の
呼び出し
単価検索
- SQLを使って
商品検索
- CALL400を使って
カレンダーの利用
メニューを作成
別EXEを呼び出す
Excelに出力
商品検索 - CALL400を使って 9/12
9/12

FormのOnCloseQueryイベントで次のように記述します。

(画面の呼び出しと商品コード・商品名の設定)

 

procedure TfrmShohin.FormCloseQuery(Sender: TObject;
var CanClose: Boolean);
begin
  if  ModalResult =  mrOK then
  begin
    with  qryWSMHP  do
    begin
      sCD := FieldbyName('WPNO').AsInteger;
      sNm := FieldbyName('WNAME').AsString;
    end;
  end;
end;

 

9/12