掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
try 〜 except 文について (ID：14364)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんにちは こんな感じのプログラムを ----------------------------------- try ： if ・・・ then <<エラー処理>> if ・・・ then <<エラー処理>> ： except <<エラー処理>> end; ----------------------------------- ↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓ 実際にはコンパイルすらできませんが ↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓ ----------------------------------- label ErrorProcess; begin try ： if ・・・ then goto ErrorProcess; if ・・・ then goto ErrorProcess; ： except ErrorProcess: <<エラー処理>> end; ： end; ----------------------------------- 要するに同じエラー処理の部分は 一つにまとめたいというものなんですけど 初歩的なことですみません。 以下の様に無理やり例外発生させれば可能ですが、 すっきりいかなくって・・・ ----------------------------------- var a,b: Integer; try a := 0; ： if ・・・ then b := b / a; if ・・・ then b := b / a; ： except <<エラー処理>> end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.