Changeset 6 for trunk/Forms/UItemView.pas

Timestamp:

Dec 25, 2010, 9:31:21 PM (14 years ago)

Author:

george

Message:

• Activated generation of language files.
• Added: Full screen mode.

File:

• trunk/Forms/UItemView.pas (modified) (2 diffs)

trunk/Forms/UItemView.pas

@@ -86 +86 @@
 
     for I := Panel1.ControlCount - 1 downto 0 do
-      Panel1.Controls[I].Destroy;
+      Panel1.Controls[I].Free;
 
     // Load column names
@@ -114 +114 @@
     Properties.Destroy;
   end else ShowMessage('Objekt nenalezen');
-  ObjectInfo.Destroy;
+  ObjectInfo.Free;
 end;