Changeset 11 for platform/trunk/ULDPlatform.pas

Timestamp:

Apr 27, 2014, 1:49:43 PM (10 years ago)

Author:

chronos

Message:

• Added: Some new concept forms and actions.

File:

• platform/trunk/ULDPlatform.pas (modified) (2 diffs)

platform/trunk/ULDPlatform.pas

@@ -15 +15 @@
     Core: TCore;
     procedure Show;
+    constructor Create(AOwnere: TComponent); override;
+    destructor Destroy; override;
   published
   end;
@@ -29 +31 @@
 { TLDPlatform }
 
-procedure TLDPlatform.Show;
+constructor TLDPlatform.Create(AOwnere: TComponent);
 begin
+  inherited;
   Core := TCore.Create(Self);
 end;
 
+destructor TLDPlatform.Destroy;
+begin
+  inherited;
+end;
+
+procedure TLDPlatform.Show;
+begin
+end;
+
 end.