Internet










 

 

Try ... Except ...

:

var
      number, zero :Integer;
begin
  Try
       zero := 0;
       number := 1 div zero;
       ShowMessage('number / zero = '+IntToStr(number));
  Except
      ShowMessage(' ');
  end;
end;


 
     
   
 


!
  >>>
 

, !
  >>>
 

!
  >>>
 

!
  >>>
 

!
  >>>
 


...

 


Subscribe.Ru