> それで質問ですみませんが、デバッグはShowDlg()関数を使えばいいんでしょうか。
他にもありますので、ヘルプをご覧ください。 プログラム実行中に、変数の名前と値を表示します。 Procedure DebInt(v:Integer); // 整数専用 Procedure DebFloat(v:Double); // 実数専用 Procedure DebStr(v:String); // 文字専用
> あとif文てelse節はないのかな。
当然あります。サンプルの属性変更.pasの一部です。 if pen > 0 then SetAttrib(id, GetSysLineType(), pen, GetSysLineWidth()) else MsgBox('ペン番号をAUTO以外に設定してください。');
elseの前の行末には;を付けてないでください。
|