蓝
蓝蒙
Unregistered / Unconfirmed
GUEST, unregistred user!
var
I,j :Integer;
T :Integer;
begin
try
I :=2;
j :=0;
T :=i div j;
except
showmessage('cuowu');
end;
end;
运行程序时,怎么不做try 到end的过程??
I,j :Integer;
T :Integer;
begin
try
I :=2;
j :=0;
T :=i div j;
except
showmessage('cuowu');
end;
end;
运行程序时,怎么不做try 到end的过程??