| ■No3392に返信(ONnojiさんの記事) > 2008/01/18(Fri) 16:15:51 編集(投稿者) > 2008/01/18(Fri) 16:15:03 編集(投稿者) > > > > test.wfm > test.cmd ← これを実行 > > サンプルは桐ver.8 のファイルです。桐ver.9でも動作しますよ。
ONnijiさん。ありがとうございました。 参考にさせていただき出来るようになりました。私も空のフォームを作ったところまでは良かったのですが、そこにテキストを作成しなくても、cmdの中に書けば表示されると思っていたのが間違いの一歩でした。昔"d-Base"やBasicで組んだときはそんなこともあったと思い, その思いこみが失敗のもとでした。ありがとうございました。 一部ですが、以下のように参考にさせていただきました。
変数宣言 固有,文字列{ &gMsg,&表示文字[14] = { " S- 初期設定中"," 1- エクセル読込中",\ " 1.1- 人事管理1excel.tbl 属性変更処理中"," 2- 人事管理1excel.tbl 計算項目追加中",\ " 2.1- 人事管理1excel.tbl 年月日修正中"," 2.2- 人事管理1excel.tbl 学校・会社 入出分離中",\ " 3- 人事管理1excel.tbl 項目連番計算中"," 4- 人事管理1excel.tbl 項目制限行数超過処理中",\ " 5- 人事管理1excel.tbl 複写処理中"," 6- copy人事管理1excel.tbl 名付け処理中",\ " 7- 項目連番再計算中"," 8- 人事管理1.tbl 枠作成中"," 9- 人事管理1.tbl 書き込み中",""} } * ===== Main ========
ウィンドウ作成 "f_人事管理1画面.wfm",ハンドル = &hWnd,編集表=しない ** S--- 起動時設定 --- * --- "人事管理1項目属性.tbl"再計算 --- &gMsg=&表示文字[1] メソッド呼び出し ハンドル=&hWnd,@フォーム.変数変更() 手続き実行 起動時設定1()
** 1--- エクセル読み込み --- * --- "人事管理1.xls" を "人事管理1excel.tbl"へ読み込む --- &gMsg=&表示文字[2] メソッド呼び出し ハンドル=&hWnd,@フォーム.変数変更() 手続き実行 エクセル読み込み()
** 1.1--- "人事管理1excel.tbl" 属性変更処理 --- * --- "人事管理1excel.tbl" の属性を"人事管理1項目属性.tbl"の属性にする --- &gMsg=&表示文字[3] メソッド呼び出し ハンドル=&hWnd,@フォーム.変数変更() 手続き実行 人事管理1excel属性変更処理() ・・・・・ ・・・・・
|