Changeset 290 for trunk/Packages/CevoComponents/ButtonA.pas

Timestamp:

Feb 26, 2021, 11:56:48 PM (4 years ago)

Author:

chronos

Message:

• Modified: Use FreeAndNil instead of Free as defensive measure.
• Modified: Use ihnerited without same method name specification.

File:

• trunk/Packages/CevoComponents/ButtonA.pas (modified) (1 diff)

trunk/Packages/CevoComponents/ButtonA.pas

@@ -35 +35 @@
 constructor TButtonA.Create(aOwner: TComponent);
 begin
-  inherited Create(aOwner);
+  inherited;
   FCaption := '';
   SetBounds(0, 0, 100, 25);