{/***************************************************************************
                          vclglobals.pp
                          -------------
    begin                : Tue Apr 6 1999

 ***************************************************************************/

 *****************************************************************************
 *                                                                           *
 *  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.                     *
 *                                                                           *
 *****************************************************************************
 }

unit VCLGlobals;

{$mode objfpc}{$H+}

interface

const

  {These should be moved to the correct area eventually}
  WS_EX_CLIENTEDGE = $200;
  WS_HSCroll = $100000;
  WS_VSCroll = $200000;
  WS_BORDER = $800000;
  WS_CLIPCHILDREN = $2000000;
  {}

  csNone = 0;
  csAlignment = 1;
  csBox = 2;
  csButton = 3;
  csComboBox = 4;
  csCheckbox = 5;
  csEdit = 6;
  csForm= 7;
  csLabel = 8;
  csgtkTable = 9;
  csScrollBar = 10;
  csListView = 11;
  csMainForm = 12;
  csMemo = 13;
  csMainMenu = 14;
  csMenuBar = 15;
  csMenuItem = 16;
  csNotebook = 17;
  csFileDialog = 18;
  csRadioButton = 19;
  csScrolledWindow= 20;
  csSpinedit = 21;
  csStatusBar = 22;
  csTable = 23;
  csToggleBox = 24;
  //csVScrollBar = 25;
  csFrame = 26;
  csButtonBox = 27;
  csCanvas = 28;
  csGroupBox = 29;

  csFont = 30;
  csPen = 31;
  csBrush = 32;
  //csTimer = 33;
  csPage = 34;

  csColorDialog = 35;
  csListBox = 36;
  csFontDialog = 37;
  csProgressBar = 38;
  csTrackBar = 39;
  csFixed = 40;
  csImage = 41;
  csToolbar = 42;
  csToolButton = 43;
  csBitBtn = 44;
  csCListBox = 45;
  csSpeedButton = 46;
  csPopupMenu = 47;
  csHintWindow = 48;

  csCalendar = 49;

  csArrow = 50;
  csPanel = 51;

type

//TODO: check this against lcllinux

  TgComponentStyle = LongInt;
  AnsiChar = Char;  //Should be moved
  WideChar = Char;
  Short = SmallInt;
  HFont = LongWord;
  THAndle = Integer;
  hwnd    = THandle;
  TCaption = string;
  //TMessage = Pointer;
  HMENU = type LongWord;
  HPEN = type LongWord;
  HBitmap = type LongWord;
  HPalette = type LongWord;

  HDC = type LongWord;
  HBRUSH = type LongWord;

const
  {Mouse message key states}
  MK_LBUTTON  = 1;
  MK_RBUTTON = 2;
  MK_SHIFT = 4;
  MK_CONTROL = 8;
  MK_MBUTTON = $10;


{ Generic Key names }
{$I hkeys.inc}

implementation

initialization
//writeln('vclglobals.pp - initialization');

finalization
//writeln('vclglobals.pp - finalization');

end.