paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-05 01:18:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

carbon: moved used units from implementation to interface section

Browse Source 
git-svn-id: trunk@21493 -
This commit is contained in:
dmitry 2009-08-31 09:17:45 +00:00
parent 6bd45cf1f1
commit 85fdf65c87
1 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/carbon/carbonmenus.pp
View File

@ -37,7 +37,7 @@ uses
LMessages, LCLMessageGlue, LCLProc, LCLType, Graphics, Controls, Forms, LMessages, LCLMessageGlue, LCLProc, LCLType, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls, Menus, Dialogs, StdCtrls, ComCtrls, Menus,
// LCL Carbon // LCL Carbon
CarbonDef, CarbonGDIObjects; CarbonDef, CarbonGDIObjects, CarbonProc, CarbonDbgConsts;
type type
@ -82,9 +82,6 @@ function CheckMenu(const Menu: HMENU; const AMethodName: String; AParamName: Str
implementation implementation
uses
CarbonProc, CarbonDbgConsts;
{------------------------------------------------------------------------------ {------------------------------------------------------------------------------
Name: CheckMenu Name: CheckMenu
Params: Menu - Handle of menu Params: Menu - Handle of menu