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.86 MB
Hora: 0.043 c
4-22476
reino
2001-11-02 19:42
2002.01.08
Ajuda, UpdateResource não funciona com arquivos BPL!


14-22365
Ketmar
2001-10-16 06:22
2002.01.08
Aqui é interessante: de Simferopol, estou aqui sozinho?


3-21953
VariK
2001-12-05 15:14
2002.01.08
Про Записи


1-22044
Eduard
2001-12-10 10:09
2002.01.08
quadro


14-22328
Principiante
2001-11-02 14:48
2002.01.08
Eu já zadolbalsya !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!





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 Russian 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