mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-28 20:43:20 +02:00
105 lines
4.0 KiB
PHP
105 lines
4.0 KiB
PHP
{%MainUnit win32int.pp}
|
|
{ $Id$ }
|
|
{******************************************************************************
|
|
All GTK interface communication implementations.
|
|
Initial Revision : Sun Nov 23 23:53:53 2003
|
|
|
|
|
|
!! Keep alphabetical !!
|
|
|
|
Support routines go to win32proc.inc
|
|
|
|
******************************************************************************
|
|
Interface
|
|
******************************************************************************
|
|
|
|
*****************************************************************************
|
|
* *
|
|
* This file is part of the Lazarus Component Library (LCL) *
|
|
* *
|
|
* See the file COPYING.LCL, included in this distribution, *
|
|
* for details about the copyright. *
|
|
* *
|
|
* This program is distributed in the hope that it will be useful, *
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
|
|
* *
|
|
*****************************************************************************
|
|
}
|
|
|
|
//##apiwiz##sps## // Do not remove
|
|
|
|
procedure DrawArrow(Arrow: TComponent; Canvas: TPersistent); override;
|
|
|
|
function GetAcceleratorString(const AVKey: Byte; const AShiftState: TShiftState): String; override;
|
|
function GetControlConstraints(Constraints: TObject): boolean; override;
|
|
function GetListBoxIndexAtY(ListBox: TComponent; y: integer): integer; override;
|
|
|
|
function MenuItemSetCheck(BaseMenuItem: TComponent): Boolean; override;
|
|
function MenuItemSetEnable(BaseMenuItem: TComponent): Boolean; override;
|
|
function RightJustifyMenuItem(BaseMenuItem: TComponent): Boolean; override;
|
|
|
|
//##apiwiz##eps## // Do not remove, no wizard declaration after this line
|
|
|
|
{ =============================================================================
|
|
|
|
$Log$
|
|
Revision 1.17 2005/05/21 15:58:44 mattias
|
|
implemented right justification for menuitems for winapi intf from Martin Smat
|
|
|
|
Revision 1.16 2005/02/23 01:12:47 marc
|
|
+ Added RemoveProp winapi call
|
|
* Some maintenace on winapi/lclintf files
|
|
|
|
Revision 1.15 2004/10/16 10:15:45 micha
|
|
cleanup statusbar methods in lcl interfaceobject
|
|
fix statusbar recursive call issue
|
|
|
|
Revision 1.14 2004/03/19 00:53:34 marc
|
|
* Removed all ComponentCreateHandle routines
|
|
|
|
Revision 1.13 2004/02/27 00:42:41 marc
|
|
* Interface CreateComponent splitup
|
|
* Implemented CreateButtonHandle on GTK interface
|
|
on win32 interface it still needs to be done
|
|
* Changed ApiWizz to support multilines and more interfaces
|
|
|
|
Revision 1.12 2004/02/23 08:19:04 micha
|
|
revert intf split
|
|
|
|
Revision 1.10 2004/02/20 19:52:18 micha
|
|
fixed: tarrow crash in win32
|
|
added: interface function DrawArrow to draw themed arrow
|
|
|
|
Revision 1.9 2004/02/05 13:53:38 mattias
|
|
fixed GetConstraints for win32 intf
|
|
|
|
Revision 1.8 2004/02/02 16:56:44 micha
|
|
implement GetControlConstraints for combobox
|
|
|
|
Revision 1.7 2004/01/12 08:36:34 micha
|
|
statusbar interface dependent reimplementation (from vincent)
|
|
|
|
Revision 1.6 2004/01/11 16:38:29 marc
|
|
* renamed (Check|Enable)MenuItem to MenuItemSet(Check|Enable)
|
|
+ Started with accelerator nameing routines
|
|
* precheckin for createwidget splitup
|
|
|
|
Revision 1.5 2004/01/09 20:03:13 mattias
|
|
implemented new statusbar methods in gtk intf
|
|
|
|
Revision 1.4 2004/01/03 11:57:48 mattias
|
|
applied implementation for LM_LB_GETINDEXAT from Vincent
|
|
|
|
Revision 1.3 2003/11/27 23:02:30 mattias
|
|
removed menutype.pas
|
|
|
|
Revision 1.2 2003/11/26 21:55:15 mattias
|
|
fixed win32 TBaseMenuitem
|
|
|
|
Revision 1.1 2003/11/26 00:23:47 marc
|
|
* implemented new LCL(check|enable)Menuitem functions
|
|
* introduced the lclintf inc files to win32
|
|
|
|
}
|