システムエラーの発生方法。

← →
Andrewv (2001-12-18 14:14) [0]

自分のプログラムからシステムエラーを引き起こすことは可能ですか？
「プログラムは無効な操作を実行しましたか？」

← →
Андрей Сенченко (2001-12-18 14:25) [1]

var i：整数始める i：= i / 0 終わり。
または、カスタムエラージェネレータが必要ですか？

← →
Dimka Maslov (2001-12-18 17:26) [2]

ExceptObjProc：= nil;
PInteger（nil）^：= 0;

← →
Pat (2001-12-18 17:45) [3]

>アンドレイセンチェンコ
自分で確認しましたか？

← →
panov (2001-12-18 17:56) [4]

VAR
s：文字列
p：ポインター。
始まる
s：= "例外";
p：= nil;
移動（s、p、9）;

← →
Дремучий (2001-12-18 21:59) [5]

var Obj：TLabel; //任意のコンポーネントタイプ
//コンストラクタObjが呼び出される場所はありません！
始まる
//未作成のオブジェクトへのアクセス
Obj.Caption：= "例外！Ha-ha dva raza！";
終わり

← →
Алексей Петров (2001-12-19 08:46) [6]

男は容認できない操作を求めました-そして、あなたは彼に一斉にアクセス違反を提供します:)

Priveleged命令：
asm hlt 終わり;

そして、これは純粋に受け入れられない操作です
asm ロックノップ終わり

← →
Digitman (2001-12-19 08:55) [7]

<アレクセイ・ペトロフ>には絶対に同意します

← →
Bizon (2001-12-19 10:05) [8]

最後のオプションを試しました。
98と2の両方での外部例外エラー
それだけです。

← →
Алексей Петров (2001-12-19 10:20) [9]

外部例外-これは、Delphiにとって未知のすべての例外に対するDelphiラッパーです。
また、コードはプロセッサ例外「無効な操作コード」に正確に対応しています。

← →
Bizon (2001-12-19 10:26) [10]

すばらしいですが、この処理はメッセージに表示されますが、それを明確にする方法：プログラムが完了しました......
通常風のように。

← →
Dimka Maslov (2001-12-19 10:36) [11]

Delphiでは、ExceptObjProc例外ハンドラのアドレスが定義されています;定義されている場合、システムエラーが発生すると例外が発生します。そうでない場合-「プログラムが無効な操作を実行しました」

← →
Bizon (2001-12-19 10:41) [12]

わかった判明した。

← →
handra (2001-12-19 14:34) [13]

ニフィガ：
ExceptObjProc：= nil;
asm lock nop end;

結果：
不明なソフトウェア例外など
その後、次のようにします。
ランタイムエラー255 ....

← →
Big_Hart (2001-12-19 14:53) [14]

ASM
クリ
終わり
繰り返す
偽になるまで