lazarus/lcl/interfaces/qt/qtwscomctrls.pp
mattias 116c988455 added RTTI controls
git-svn-id: trunk@5687 -
2004-07-16 21:49:00 +00:00

190 lines
4.5 KiB
ObjectPascal

{ $Id$}
{
*****************************************************************************
* QtWSComCtrls.pp *
* --------------- *
* *
* *
*****************************************************************************
*****************************************************************************
* *
* 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 QtWSComCtrls;
{$mode objfpc}{$H+}
interface
uses
////////////////////////////////////////////////////
// I M P O R T A N T
////////////////////////////////////////////////////
// To get as little as posible circles,
// uncomment only when needed for registration
////////////////////////////////////////////////////
// ComCtrls,
////////////////////////////////////////////////////
WSComCtrls, WSLCLClasses;
type
{ TQtWSStatusBar }
TQtWSStatusBar = class(TWSStatusBar)
private
protected
public
end;
{ TQtWSTabSheet }
TQtWSTabSheet = class(TWSTabSheet)
private
protected
public
end;
{ TQtWSPageControl }
TQtWSPageControl = class(TWSPageControl)
private
protected
public
end;
{ TQtWSCustomListView }
TQtWSCustomListView = class(TWSCustomListView)
private
protected
public
end;
{ TQtWSListView }
TQtWSListView = class(TWSListView)
private
protected
public
end;
{ TQtWSProgressBar }
TQtWSProgressBar = class(TWSProgressBar)
private
protected
public
end;
{ TQtWSCustomUpDown }
TQtWSCustomUpDown = class(TWSCustomUpDown)
private
protected
public
end;
{ TQtWSUpDown }
TQtWSUpDown = class(TWSUpDown)
private
protected
public
end;
{ TQtWSToolButton }
TQtWSToolButton = class(TWSToolButton)
private
protected
public
end;
{ TQtWSToolBar }
TQtWSToolBar = class(TWSToolBar)
private
protected
public
end;
{ TQtWSToolButton }
TQtWSToolButton = class(TWSToolButton)
private
protected
public
end;
{ TQtWSToolBar }
TQtWSToolBar = class(TWSToolBar)
private
protected
public
end;
{ TQtWSTrackBar }
TQtWSTrackBar = class(TWSTrackBar)
private
protected
public
end;
{ TQtWSCustomTreeView }
TQtWSCustomTreeView = class(TWSCustomTreeView)
private
protected
public
end;
{ TQtWSTreeView }
TQtWSTreeView = class(TWSTreeView)
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(TCustomStatusBar, TQtWSStatusBar);
// RegisterWSComponent(TCustomTabSheet, TQtWSTabSheet);
// RegisterWSComponent(TCustomPageControl, TQtWSPageControl);
// RegisterWSComponent(TCustomListView, TQtWSCustomListView);
// RegisterWSComponent(TCustomListView, TQtWSListView);
// RegisterWSComponent(TCustomProgressBar, TQtWSProgressBar);
// RegisterWSComponent(TCustomUpDown, TQtWSCustomUpDown);
// RegisterWSComponent(TCustomUpDown, TQtWSUpDown);
// RegisterWSComponent(TCustomToolButton, TQtWSToolButton);
// RegisterWSComponent(TCustomToolBar, TQtWSToolBar);
// RegisterWSComponent(TCustomToolButton, TQtWSToolButton);
// RegisterWSComponent(TCustomToolBar, TQtWSToolBar);
// RegisterWSComponent(TCustomTrackBar, TQtWSTrackBar);
// RegisterWSComponent(TCustomTreeView, TQtWSCustomTreeView);
// RegisterWSComponent(TCustomTreeView, TQtWSTreeView);
////////////////////////////////////////////////////
end.