Skip comment lines beginning with a slash

diff --git a/SVG.dpr b/SVG.dpr
index 50218c4..7d2c7ff 100644 (file)
--- a/SVG.dpr
+++ b/SVG.dpr
@@ -167,6 +167,8 @@ begin
   try
     for i := 1 to Lines.Count-1 do // 1\8ds\96Ú\82Í"SVG"\82Ì\95¶\8e\9a\97ñ
     begin
+      if System.Pos('/', Lines[i]) = 1 then // \83R\83\81\83\93\83g\8ds\82ð\82Æ\82Î\82·
+        Continue;
       ParseKeyVal(Lines[i], Key, Val);
       if SameText(Key, 'sakura') then
       begin