おっと、書き忘れ。
Delphiでは、コンパイラ指令で、短絡⇔完全を変更するので、
Adaほど融通は利かないです。