mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 12:49:09 +02:00
* fixed compile
This commit is contained in:
parent
3a505c44ad
commit
2b860db51d
@ -19,7 +19,7 @@ unit contnrs;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
Classes;
|
SysUtils,Classes;
|
||||||
|
|
||||||
Type
|
Type
|
||||||
|
|
||||||
@ -271,7 +271,7 @@ end;
|
|||||||
|
|
||||||
Function TComponentList.Add(AComponent: TComponent): Integer;
|
Function TComponentList.Add(AComponent: TComponent): Integer;
|
||||||
begin
|
begin
|
||||||
Inherited Add(AComponent);
|
Result:=Inherited Add(AComponent);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
destructor TComponentList.Destroy;
|
destructor TComponentList.Destroy;
|
||||||
@ -505,7 +505,10 @@ end.
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.7 2004-12-22 12:05:41 michael
|
Revision 1.8 2004-12-22 15:33:24 peter
|
||||||
|
* fixed compile
|
||||||
|
|
||||||
|
Revision 1.7 2004/12/22 12:05:41 michael
|
||||||
+ Fixed bug 3461
|
+ Fixed bug 3461
|
||||||
|
|
||||||
Revision 1.6 2002/09/07 15:15:24 peter
|
Revision 1.6 2002/09/07 15:15:24 peter
|
||||||
|
Loading…
Reference in New Issue
Block a user