diff --git a/components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi b/components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi index a2a74bb38..f85547c0a 100644 --- a/components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi +++ b/components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi @@ -105,8 +105,8 @@ - - + + @@ -847,123 +847,123 @@ - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - - + + - - + + - + - - + + - - + + - + - + diff --git a/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm b/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm index cf338a775..9a46312fa 100644 --- a/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm +++ b/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm @@ -28,7 +28,7 @@ object RxDBGridMainForm: TRxDBGridMainForm Width = 50 FieldName = 'DEVELOPER_ID' Constraints.MinWidth = 50 - Constraints.MaxWidth = 0 + Constraints.MaxWidth = 150 ImageList = ImageList1 KeyList.Strings = ( '1=0' diff --git a/components/rx/trunk/rxdbgrid.pas b/components/rx/trunk/rxdbgrid.pas index 342e1b093..bf6acb171 100644 --- a/components/rx/trunk/rxdbgrid.pas +++ b/components/rx/trunk/rxdbgrid.pas @@ -169,8 +169,8 @@ type public constructor Create(AOwner: TPersistent); published - property MinWidth:integer read FMinWidth write SetMinWidth; - property MaxWidth:integer read FMaxWidth write SetMaxWidth; + property MinWidth:integer read FMinWidth write SetMinWidth default 0; + property MaxWidth:integer read FMaxWidth write SetMaxWidth default 0; end; { TRxDBGridFooterOptions } @@ -941,12 +941,14 @@ type procedure TRxDBGridCollumnConstraints.SetMaxWidth(AValue: integer); begin if FMaxWidth=AValue then Exit; + if (FMinWidth<>0) and (AValue<>0) and (AValue < FMinWidth) then exit; FMaxWidth:=AValue; end; procedure TRxDBGridCollumnConstraints.SetMinWidth(AValue: integer); begin if FMinWidth=AValue then Exit; + if (FMaxWidth<>0) and (AValue<>0) and (AValue > FMaxWidth) then exit; FMinWidth:=AValue; end; @@ -4771,6 +4773,9 @@ begin inherited ColumnChanged; if Assigned(FConstraints) and (FConstraints.MinWidth <> 0) and (FConstraints.MinWidth > Width) then Width:=FConstraints.MinWidth; + + if Assigned(FConstraints) and (FConstraints.MaxWidth <> 0) and (FConstraints.MaxWidth < Width) then + Width:=FConstraints.MaxWidth; end; constructor TRxColumn.Create(ACollection: TCollection);