Cross Ref > Statements

Use a try..except..end block to trap and process errors.

Delphi also offers a try...finally where code will execute in the finally section no matter what. It's common to put a try..except inside a try..finally.

var
  y : Double;
begin
  try
    y := 0;
    y := (1/y);
    ShowMessage(FloatToStr(y));
  except
    ShowMessage('You cannot divide by zero.');
  end;
end;

Syntax template:

if (expression) {

  expression1_true_code;

} else if (expression2) {

  expression2_true_code;

} else {

  otherwise_code;

}

if ((.1 + .1 + .1) == 0.3) {
  System.out.println("Correct");
} else {
  System.out.println("Not correct");
}

Notice in the more complete example that the semicolon for the begin..end block after end is not included. That tells the compiler something else is coming (the statement is not finished). Also note the semicolon is missing right before the final "else" statement.

Note: The following example uses floating point literals. In Delphi, to specify a fractional floating point literal between 1 and -1, you preceed the decimal with a 0; otherwise, you will get a compiler error (i.e. .1 + .1 does not work).

if (0.1 + 0.1 + 0.1) = 0.3 then
  ShowMessage('Correct')
else
  ShowMessage('Not correct');

//Complete example:
if x = true then
begin 

  ShowMessage('x is true');

end

Else If y = 'Mike' Then 

  ShowMessage('hello mike')

Else 

  ShowMessage('last option');

 Delphi If Statement (If..Else If..Else)