Tidak berhasil! saya coba sbb:
var
Test : real;
begin
try
Test := 78/0;
except
on E:Exception do ShowMessage( E.Message );
end;
end
NOTHING happened!!! Yang saya harapkan muncul pesan eror system yaitu "Error
device by Zero ... bla..bla"
Catatan: yg saya maksudkan bukan pakai:
on EZeroDivide do HandleZeroDivide
on EOverflow do HandleOverflow;
on EMathError do HandleMathError;
..... lanjutkan dengan ratusan daftar error di sini !!! ......
Di sini saya asumsikan bahwa program saya tidak tahu errornya apa tetapi
setiap error yg muncul akan diberitahukan.
----- Original Message -----
From: "Bambang P" <[EMAIL PROTECTED]>
To: "Willliam IT" <[EMAIL PROTECTED]>
Sent: Saturday, January 11, 2003 10:01 AM
Subject: Re: [Delphindo] Error Handling
> On Friday, January 10, 2003, 9:58:21 AM, Willliam IT wrote:
>
> > Lalu dimana Error Descriptionnya? Saya ingin mengambil
> > Err.Description dari system (bukan buatan sendiri).
>
> Err.Message
>
> Contoh:
> try
> raise 'Fake error :)';
> except
> on E:Exception do ShowMessage( E.Message );
> end;
>
> --
> Bambang
> http://bpranoto.tripod.com
> Let's win quizzes!! http://www.itpaystolearn.com/default.asp?ref_id=ADY095
>
> Borrow money from pessimists, they don't expect it back.
>
>
>
> Berlangganan: [EMAIL PROTECTED]
> Stop Berlangganan: [EMAIL PROTECTED]
> Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Flexible Keyboard is the ideal accessory for PDA users that are on the move.
http://us.click.yahoo.com/dCBVZC/WnCFAA/xGHJAA/i7folB/TM
---------------------------------------------------------------------~->
Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/