paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-06 07:47:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

fix case of argument

Browse Source 
git-svn-id: trunk@8359 -
This commit is contained in:
micha 2005-12-23 20:35:38 +00:00
parent 72ffab3f78
commit bc9cefe2d0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/forms.pp
View File

@ -962,7 +962,7 @@ type
procedure ControlDestroyed(AControl: TControl); procedure ControlDestroyed(AControl: TControl);
Procedure BringToFront; Procedure BringToFront;
procedure CreateForm(InstanceClass: TComponentClass; var Reference); procedure CreateForm(InstanceClass: TComponentClass; var Reference);
procedure QueueAsyncCall(AMethod: TDataevent; Data: PtrInt); procedure QueueAsyncCall(AMethod: TDataEvent; Data: PtrInt);
procedure ReleaseComponent(AComponent: TComponent); procedure ReleaseComponent(AComponent: TComponent);
function ExecuteAction(ExeAction: TBasicAction): Boolean; override; function ExecuteAction(ExeAction: TBasicAction): Boolean; override;
function UpdateAction(TheAction: TBasicAction): Boolean; override; function UpdateAction(TheAction: TBasicAction): Boolean; override;