* Added comment support (starting with #)

This commit is contained in:
Andreas Schneider 2015-09-17 16:25:43 +02:00
parent a808f949ab
commit 6033ea1046
1 changed files with 4 additions and 1 deletions

View File

@ -306,8 +306,11 @@ begin
while not EOF(data) do while not EOF(data) do
begin begin
ReadLn(data, line); ReadLn(data, line);
if commandMode and (line <> '') and not ProcessCommand(line) then if commandMode and (line <> '') and (line[1] <> '#') and
not ProcessCommand(line) then
begin
commandMode := False; commandMode := False;
end;
if not commandMode then if not commandMode then
content.Add(line); content.Add(line);