Raise/fi

Varattua sanaa raise käytetään poikkeuksen "heittämiseen". Raise lauseke pysäyttää ohjelman normaalin suorittamisen ja siirtää ohjauksen poikkeuksen käsittelijälle.

Lyhyt yhteenveto

• Kuuluu olio-ohjelmointiin
• Aiheuttaa poikkeuksen

Esimerkki

program Example1;
uses sysutils;

function titleread(a_title:string):string;
var
  answer:string;
begin
  writeln ( a_title);
  readln(answer);

  if answer = '' then raise Exception.Create('Variable has no value');
  result := answer;
end;

var
  firstname,lastname:string;

begin
  firstname := titleread( 'Write your first name:');
  lastname := titleread( 'Write your last name:');
  writeln ('your name is ', firstname, ' ', lastname);
  readln;
end.

Katso myös

• Try..finally lohko.
• try..except lohko.
• on
• run-time error

From the Free Pascal wiki, page "Raise/fi", as it stood on 2022-08-06 after a change by Kai Burghardt, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.