• Introduction
  • What is HAL?
  • Get Started
  • Language Reference
    • Declarations, assignments and statements
    • Keywords and operations
• Tutorials
  • Change a window
    • Find the window
    • Modify the window
  • Create a report
• HAL Primitives
• HAL Procedures/Functions
• HAL Discussions

Description:

Returns a character that corresponds to the numerical code defined with CharCode.

Parameters:
CharCode	Numerical code of a character.

procedure SkipToEOL(var LongInt pos)
BEGIN
  Boolean testf;
  string 1 c;
  
  testf = true;
  while (testf) begin
    c = ReadChar(pos);
    pos = pos + 1;
    if (c==chr(13)) then begin 
      c = ReadChar(pos);
      if (c==chr(10)) then begin pos = pos + 1; end;          
      testf = false;
    end;    
    if (TestEOF) then begin testf = false; end;
  end;
  RETURN;
END;

Related topics: