{ $Id$} { ***************************************************************************** * QtWSGrids.pp * * ------------ * * * * * ***************************************************************************** ***************************************************************************** * * * This file is part of the Lazarus Component Library (LCL) * * * * See the file COPYING.modifiedLGPL, 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 QtWSGrids; {$mode objfpc}{$H+} interface uses // Bindings {$ifdef USE_QT_4_2} qt42, {$else} qt4, {$endif} qtwidgets, // LCL LCLType, LCLProc, Controls, Grids, // Widgetset WSGrids, WSLCLClasses; type { TQtWSStringCellEditor } TQtWSStringCellEditor = class(TWSStringCellEditor) private protected public end; { TQtWSCustomGrid } TQtWSCustomGrid = class(TWSCustomGrid) private protected public end; { TQtWSDrawGrid } TQtWSDrawGrid = class(TWSDrawGrid) private protected public end; { TQtWSStringGrid } TQtWSStringGrid = class(TWSStringGrid) private protected public end; implementation initialization //////////////////////////////////////////////////// // I M P O R T A N T //////////////////////////////////////////////////// // To improve speed, register only classes // which actually implement something //////////////////////////////////////////////////// // RegisterWSComponent(TStringCellEditor, TQtWSStringCellEditor); // RegisterWSComponent(TCustomGrid, TQtWSCustomGrid); // RegisterWSComponent(TDrawGrid, TQtWSDrawGrid); // RegisterWSComponent(TStringGrid, TQtWSStringGrid); //////////////////////////////////////////////////// end.