pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

new component - TRxDBColorBox

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1618 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2011-05-07 21:43:52 +00:00
parent 0b046f8abd
commit b3928335d7
12 changed files with 259 additions and 62 deletions
Download Patch File Download Diff File Expand all files Collapse all files

148
components/rx/Demos/RxDBGrid/RxDBGridDemo.lpi
View File

@@ -4,7 +4,6 @@
<Version Value="9"/>
<General>
<Flags>
<AlwaysBuild Value="False"/>
<LRSInOutputDirectory Value="False"/>
</Flags>
<MainUnit Value="0"/>
@@ -55,7 +54,7 @@
<MinVersion Major="1" Release="18" Build="56" Valid="True"/>
</Item4>
</RequiredPackages>
<Units Count="63">
<Units Count="64">
<Unit0>
<Filename Value="RxDBGridDemo.lpr"/>
<IsPartOfProject Value="True"/>
@@ -397,8 +396,8 @@
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
<WindowIndex Value="0"/>
<TopLine Value="1216"/>
<CursorPos X="48" Y="1240"/>
<TopLine Value="2001"/>
<CursorPos X="1" Y="2015"/>
<UsageCount Value="16"/>
<Bookmarks Count="3">
<Item0 X="3" Y="2250" ID="3"/>
@@ -523,10 +522,12 @@
<Unit59>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<UnitName Value="Grids"/>
<EditorIndex Value="2"/>
<WindowIndex Value="0"/>
<TopLine Value="3153"/>
<CursorPos X="27" Y="3167"/>
<TopLine Value="3866"/>
<CursorPos X="1" Y="3891"/>
<UsageCount Value="13"/>
<Loaded Value="True"/>
</Unit59>
<Unit60>
<Filename Value="../../../../../../wine/1/1/rx.diff"/>
@@ -552,32 +553,141 @@
<CursorPos X="1" Y="569"/>
<UsageCount Value="10"/>
</Unit62>
<Unit63>
<Filename Value="/usr/local/share/lazarus/lcl/include/canvas.inc"/>
<EditorIndex Value="3"/>
<WindowIndex Value="0"/>
<TopLine Value="1116"/>
<CursorPos X="1" Y="1132"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit63>
</Units>
<JumpHistory Count="5" HistoryIndex="4">
<JumpHistory Count="30" HistoryIndex="25">
<Position1>
<Filename Value="rxdbgridmainunit.pas"/>
<Caret Line="161" Column="14" TopLine="148"/>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="2046" Column="1" TopLine="2031"/>
</Position1>
<Position2>
<Filename Value="rxdbgridmainunit.pas"/>
<Caret Line="8" Column="73" TopLine="1"/>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3141" Column="1" TopLine="3126"/>
</Position2>
<Position3>
<Filename Value="rxdbgridmainunit.pas"/>
<Caret Line="9" Column="12" TopLine="1"/>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3142" Column="1" TopLine="3126"/>
</Position3>
<Position4>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="43" Column="11" TopLine="37"/>
<Caret Line="3354" Column="1" TopLine="3339"/>
</Position4>
<Position5>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="1231" Column="29" TopLine="1216"/>
<Caret Line="3359" Column="1" TopLine="3339"/>
</Position5>
<Position6>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3378" Column="1" TopLine="3363"/>
</Position6>
<Position7>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3380" Column="1" TopLine="3363"/>
</Position7>
<Position8>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3381" Column="1" TopLine="3363"/>
</Position8>
<Position9>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3382" Column="1" TopLine="3363"/>
</Position9>
<Position10>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3388" Column="1" TopLine="3363"/>
</Position10>
<Position11>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3366" Column="1" TopLine="3360"/>
</Position11>
<Position12>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3866" Column="1" TopLine="3861"/>
</Position12>
<Position13>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3868" Column="1" TopLine="3861"/>
</Position13>
<Position14>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3869" Column="1" TopLine="3861"/>
</Position14>
<Position15>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3871" Column="1" TopLine="3861"/>
</Position15>
<Position16>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3873" Column="1" TopLine="3861"/>
</Position16>
<Position17>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3878" Column="1" TopLine="3861"/>
</Position17>
<Position18>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3880" Column="1" TopLine="3861"/>
</Position18>
<Position19>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3882" Column="1" TopLine="3861"/>
</Position19>
<Position20>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3884" Column="1" TopLine="3861"/>
</Position20>
<Position21>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3887" Column="1" TopLine="3862"/>
</Position21>
<Position22>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3888" Column="1" TopLine="3863"/>
</Position22>
<Position23>
<Filename Value="/usr/local/share/lazarus/lcl/include/canvas.inc"/>
<Caret Line="1131" Column="1" TopLine="1116"/>
</Position23>
<Position24>
<Filename Value="/usr/local/share/lazarus/lcl/include/canvas.inc"/>
<Caret Line="1132" Column="1" TopLine="1116"/>
</Position24>
<Position25>
<Filename Value="/usr/local/share/lazarus/lcl/grids.pas"/>
<Caret Line="3891" Column="1" TopLine="3866"/>
</Position25>
<Position26>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="2046" Column="1" TopLine="2031"/>
</Position26>
<Position27>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3358" Column="1" TopLine="3343"/>
</Position27>
<Position28>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3359" Column="1" TopLine="3343"/>
</Position28>
<Position29>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3358" Column="1" TopLine="3343"/>
</Position29>
<Position30>
<Filename Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Caret Line="3359" Column="1" TopLine="3343"/>
</Position30>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>
<Version Value="9"/>
<Version Value="10"/>
<Target>
<Filename Value="RxDBGridDemo"/>
</Target>
@@ -602,12 +712,6 @@
</Other>
</CompilerOptions>
<Debugging>
<BreakPoints Count="1">
<Item1>
<Source Value="/usr/local/share/lazarus/components/rxnew/rxdbgrid.pas"/>
<Line Value="1043"/>
</Item1>
</BreakPoints>
<Watches Count="6">
<Item1>
<Expression Value="rxTit.FCaption"/>

52
components/rx/Demos/RxDBGrid/rxdbgridmainunit.lfm
View File

@@ -1,19 +1,19 @@
object RxDBGridMainForm: TRxDBGridMainForm
Left = 325
Height = 786
Top = 177
Top = 84
Width = 1012
ActiveControl = Panel1
Caption = 'RxDBGrid Demo'
ClientHeight = 761
ClientHeight = 759
ClientWidth = 1012
Menu = MainMenu1
OnCreate = FormCreate
LCLVersion = '0.9.29'
LCLVersion = '0.9.31'
object RxDBGrid1: TRxDBGrid
Left = 0
Height = 692
Top = 69
Height = 695
Top = 64
Width = 1012
TitleButtons = True
AutoSort = True
@@ -54,6 +54,7 @@ object RxDBGridMainForm: TRxDBGridMainForm
end
item
Title.Alignment = taCenter
Title.Caption = 'Developer'
Title.Orientation = toHorizontal
Width = 136
FieldName = 'Developer'
@@ -109,6 +110,7 @@ object RxDBGridMainForm: TRxDBGridMainForm
end
item
Title.Alignment = taCenter
Title.Caption = 'DEVELOPER_ID'
Title.Orientation = toHorizontal
Width = 141
FieldName = 'DEVELOPER_ID'
@@ -156,6 +158,8 @@ object RxDBGridMainForm: TRxDBGridMainForm
FooterRowCount = 1
OnFiltred = RxDBGrid1Filtred
Align = alClient
Color = clWindow
DrawFullLine = True
FocusColor = clRed
SelectedColor = clHighlight
GridLineStyle = psSolid
@@ -169,22 +173,22 @@ object RxDBGridMainForm: TRxDBGridMainForm
end
object Panel1: TPanel
Left = 0
Height = 69
Height = 64
Top = 0
Width = 1012
Align = alTop
AutoSize = True
ClientHeight = 69
ClientHeight = 64
ClientWidth = 1012
TabOrder = 1
object Label1: TLabel
AnchorSideLeft.Control = Button2
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1
Left = 260
Left = 269
Height = 18
Top = 7
Width = 36
Width = 37
BorderSpacing.Around = 6
Caption = 'Mode'
ParentColor = False
@@ -193,9 +197,9 @@ object RxDBGridMainForm: TRxDBGridMainForm
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Panel1
Left = 7
Height = 29
Height = 27
Top = 7
Width = 84
Width = 86
Action = actCalcTotal
AutoSize = True
BorderSpacing.Around = 6
@@ -205,10 +209,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
AnchorSideLeft.Control = Button1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1
Left = 97
Height = 29
Left = 99
Height = 27
Top = 7
Width = 157
Width = 164
Action = actOptimizeColumnsWidthAll
AutoSize = True
BorderSpacing.Around = 6
@@ -219,10 +223,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CheckBox2
AnchorSideTop.Side = asrBottom
Left = 489
Left = 498
Height = 22
Top = 35
Width = 81
Width = 84
BorderSpacing.Left = 6
Caption = 'Use filter'
OnChange = CheckBox1Change
@@ -232,8 +236,8 @@ object RxDBGridMainForm: TRxDBGridMainForm
AnchorSideLeft.Control = Label1
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
Left = 266
Height = 31
Left = 275
Height = 25
Top = 31
Width = 217
BorderSpacing.Around = 6
@@ -252,10 +256,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
AnchorSideLeft.Control = ComboBox1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1
Left = 489
Left = 498
Height = 22
Top = 7
Width = 129
Width = 133
BorderSpacing.Around = 6
Caption = 'Auto fill columns'
OnChange = CheckBox2Change
@@ -265,10 +269,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
AnchorSideLeft.Control = CheckBox2
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1
Left = 624
Left = 637
Height = 22
Top = 7
Width = 117
Width = 121
BorderSpacing.Around = 6
Caption = 'Show indicator'
Checked = True
@@ -281,10 +285,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CheckBox3
AnchorSideTop.Side = asrBottom
Left = 624
Left = 637
Height = 22
Top = 35
Width = 114
Width = 116
BorderSpacing.Around = 6
Caption = 'Show headers'
Checked = True