Changeset 71 for Generics/TemplateGenerics/Demo/UMainForm.pas

Timestamp:

Oct 28, 2010, 2:23:49 PM (14 years ago)

Author:

george

Message:

• Moved: Reorganized file structure.

File:

• Generics/TemplateGenerics/Demo/UMainForm.pas (modified) (3 diffs)

Generics/TemplateGenerics/Demo/UMainForm.pas

@@ -17 +17 @@
     ButtonStringList: TButton;
     MemoOutput: TMemo;
-    TreeView1: TTreeView;
     procedure ButtonIntegerListClick(Sender: TObject);
     procedure ButtonStringListClick(Sender: TObject);
@@ -62 +61 @@
     WriteLn('First: ' + IntToStr(First));
     WriteLn('Last: ' + IntToStr(Last));
+    MoveItems(3, 2, 3);
+    WriteLn('Implode: ' + Implode(',', IntToStr));
   finally
     Free;
@@ -88 +89 @@
     WriteLn('First: ' + First);
     WriteLn('Last: ' + Last);
+    MoveItems(2, 3, 3);
+    WriteLn('Implode: ' + Implode(',', StrToStr));
   finally
     Free;