Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Como causar um erro no sistema. Encontre agências semelhantes


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

Можно ли из собственной программы вызвать системную ошибку
"Программа выполнила недопустимую операцию"?



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


var
i : integer
begin
i := i/0
end.

или нужен генератор ошибок по выбору ?



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

ExceptObjProc:=nil;
PInteger(nil)^:=0;



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

> Andrey Senchenko
А сам проверял?



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

var
s: string;
p: Pointer;
começar
s := "Exception";
p := nil;
Move(s,p,9);



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

var Obj:TLabel;//любой компонентный тип
//нигде не вызывается конструктор Obj!
começar
//обращение к несозданому объекту
Obj.Caption := "Exception! Ha-ha dva raza!";
end;





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

Человек просил недопустимую операцию - а вы ему access violation хором предлагаете :)

Priveleged instruction:

asm
hlt
end;


А это чисто недопустимая операция

asm
lock nop
end





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

Абсолютно согласен с <Алексей Петров>



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

Попробывал последний вариант.
Ошибка External Exception и в 98 и в 2к
É isso aí.



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

External Exception - Это Delphi-йская обертка над всеми неведомыми для Delphi исключениями.
А код соответствует, как раз, процессорному исключению "неверный код операции".



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

Замечательно, но эта обработка высвечивается в сообщении, а как сделать чтобы было четко написано: Программа выполнила......
Как в wind`е обычно.



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;

Resultado:
Исключение unknown software exception и т.д.
Затем следующее:
Runtime error 255 at ....




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

asm
cli
final
repetição
until false



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima









Memória: 0.85 MB
Hora: 0.039 c
1-22121
stalin
2001-12-18 00:20
2002.01.08
Novo problema: + (


3-21963
szap
2001-12-05 11:53
2002.01.08
velocidade


3-21948
andre_polt
2001-12-04 16:22
2002.01.08
DB


7-22422
savva
2001-09-19 12:42
2002.01.08
Uma tarefa interessante ... Como você pode trabalhar com um celular através de uma porta COM para torná-lo


7-22427
KLM
2001-09-20 06:34
2002.01.08
Proteção contra cópia





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russa sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol