If you ignore the case statements you are calling begin, without an end.

if InputIsCDG then
begin
  ...
else
  ...
end;

What you need is either:

if InputIsCDG then
  ...
else
  ...

or 

if InputIsCDG then
begin
  ...
end  
else
  ...
end;

Stacey
---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"

Reply via email to