Unit53.dfm

<< Click to Display Table of Contents >>

Navigation:  Demos > XIV > Delphi > DBGridControls >

Unit53.dfm

object IWForm53: TIWForm53

 Left = 0

 Top = 0

 Width = 1026

 Height = 600

 RenderInvisibleControls = True

 AllowPageAccess = True

 ConnectionMode = cmAny

 OnCreate = IWAppFormCreate

 Background.Fixed = False

 HandleTabs = False

 LeftToRight = True

 LockUntilLoaded = True

 LockOnSubmit = True

 ShowHint = True

 XPTheme = True

 DesignLeft = 8

 DesignTop = 8

 object IWDBGrid1: TIWDBGrid

 Left = 25

 Top = 24

 Width = 658

 Height = 361

 RenderSize = False

 StyleRenderOptions.RenderSize = False

 StyleRenderOptions.RenderFont = False

 StyleRenderOptions.RenderAbsolute = False

 BorderColors.Color = clNone

 BorderColors.Light = clNone

 BorderColors.Dark = clNone

 BGColor = clNone

 BorderSize = 1

 BorderStyle = tfDefault

 Caption = 'IWDBGrid1'

 CellPadding = 0

 CellSpacing = 0

 Font.Color = clNone

 Font.Size = 10

 Font.Style = []

 FrameBuffer = 40

 Lines = tlAll

 OnRenderCell = IWDBGrid1RenderCell

 UseFrame = False

 UseSize = False

 ScrollToCurrentRow = False

 Columns = <

 item

 Alignment = taLeftJustify

 BGColor = clNone

 DoSubmitValidation = True

 Font.Color = clNone

 Font.Size = 10

 Font.Style = []

 Header = False

 Height = '0'

 ShowHint = True

 VAlign = vaMiddle

 Visible = True

 Width = '0'

 Wrap = False

 RawText = False

 Css = ''

 BlobCharLimit = 0

 CompareHighlight = hcNone

 Title.Alignment = taCenter

 Title.BGColor = clNone

 Title.DoSubmitValidation = True

 Title.Font.Color = clNone

 Title.Font.Size = 10

 Title.Font.Style = []

 Title.Header = False

 Title.Height = '0'

 Title.ShowHint = True

 Title.VAlign = vaMiddle

 Title.Visible = True

 Title.Width = '0'

 Title.Wrap = False

 Title.RawText = True

 end

 item

 Alignment = taLeftJustify

 BGColor = clNone

 DoSubmitValidation = True

 Font.Color = clNone

 Font.Size = 10

 Font.Style = []

 Header = False

 Height = '0'

 ShowHint = True

 VAlign = vaMiddle

 Visible = True

 Width = '150'

 Wrap = False

 RawText = False

 Css = ''

 BlobCharLimit = 0

 CompareHighlight = hcNone

 DataField = 'Field1'

 Title.Alignment = taCenter

 Title.BGColor = clNone

 Title.DoSubmitValidation = True

 Title.Font.Color = clNone

 Title.Font.Size = 10

 Title.Font.Style = []

 Title.Header = False

 Title.Height = '0'

 Title.ShowHint = True

 Title.Text = 'Field1'

 Title.VAlign = vaMiddle

 Title.Visible = True

 Title.Width = '0'

 Title.Wrap = False

 Title.RawText = True

 end

 item

 Alignment = taLeftJustify

 BGColor = clNone

 DoSubmitValidation = True

 Font.Color = clNone

 Font.Size = 10

 Font.Style = []

 Header = False

 Height = '0'

 ShowHint = True

 VAlign = vaMiddle

 Visible = True

 Width = '150'

 Wrap = False

 RawText = False

 Css = ''

 BlobCharLimit = 0

 CompareHighlight = hcNone

 DataField = 'Field2'

 Title.Alignment = taCenter

 Title.BGColor = clNone

 Title.DoSubmitValidation = True

 Title.Font.Color = clNone

 Title.Font.Size = 10

 Title.Font.Style = []

 Title.Header = False

 Title.Height = '0'

 Title.ShowHint = True

 Title.Text = 'Field2'

 Title.VAlign = vaMiddle

 Title.Visible = True

 Title.Width = '0'

 Title.Wrap = False

 Title.RawText = True

 end>

 DataSource = DataSource1

 FooterRowCount = 0

 FriendlyName = 'IWDBGrid_1'

 FromStart = True

 HighlightColor = clNone

 HighlightRows = False

 Options = [dgShowTitles]

 RefreshMode = rmAutomatic

 RowLimit = 0

 RollOver = False

 RowClick = False

 RollOverColor = clNone

 RowHeaderColor = clNone

 RowAlternateColor = clNone

 RowCurrentColor = clNone

 TabOrder = -1

 end

 object ClientDataSet1: TClientDataSet

 Aggregates = <>

 FieldDefs = <

 item

 Name = 'Field1'

 DataType = ftString

 Size = 20

 end

 item

 Name = 'Field2'

 DataType = ftString

 Size = 20

 end>

 IndexDefs = <>

 Params = <>

 StoreDefs = True

 Left = 48

 Top = 420

 object ClientDataSet1Field1: TStringField

 FieldName = 'Field1'

 end

 object ClientDataSet1Field2: TStringField

 FieldName = 'Field2'

 end

 end

 object DataSource1: TDataSource

 DataSet = ClientDataSet1

 Left = 120

 Top = 420

 end

end