End

From Free Pascal wiki
Revision as of 22:14, 10 May 2006 by Rfc1394 (talk | contribs)
Jump to navigationJump to search

The end keyword closes a block of instructions started with the begin or case keyword, ends the declaration of fields of a record, or closes a try .. finally or try .. except construct. It is also used to close a unit having no initialization code.

For example:

 procedure Proc1;
 
 var a,b: integer;
 
 begin
   (..)
 end;

It is also used to end a pascal source file, in which case it is followed by a period rather than a semicolon (in the example below, the last semicolon is optional):

 program Proc2;
 var
   SL: TStrings;
 begin
   SL := TStringlist.Create;
   try
     (..)
   finally
     SL.Free;
   end;
 end.

For a UNIT which contains no initialization, END is used to indicate the end of the unit:

 unit detent;
 uses math;

 procedure delta(r:real);

 implementation

 procedure delta;
 begin

 ...

 end;

 ...

(* Note: No begin statement *)

 end.



Keywords: begindoelseendforifrepeatthenuntilwhile

An editor has declared this article to be a stub, meaning that it needs more information. Can you help out and add some? If you have some useful information, you can help the Free Pascal Wiki by clicking on the edit box on the left and expanding this page.