Changeset 31 for branches/Analyzátor gramatiky/UMainForm.pas

Timestamp:

Nov 11, 2009, 1:43:47 PM (15 years ago)

Author:

george

Message:

• Opraveno: Chyby v inicializaci objektů.

File:

• branches/Analyzátor gramatiky/UMainForm.pas (modified) (1 diff)

branches/Analyzátor gramatiky/UMainForm.pas

@@ -627 +627 @@
       if Assigned(SourceProgram.Items[I]) then
       //TreeView1.Items.AddChild(TreeNode, IntToStr(I))
-      ShowProgramNode(TreeNode, TProgramItem(SourceProgram.Items[I]))
+      ShowProgramNode(TreeNode, SourceProgram.Items[I])
       else TreeView1.Items.AddChild(TreeNode, 'x');
   end else begin