打开窗体文件出错(Error Reading Form)求救!(200分)

  • 主题发起人 主题发起人 yzqhorse
  • 开始时间 开始时间
Y

yzqhorse

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大虾:
我用的是Delphi7版本,朋友交给我一套程序让我维护,编译、运行OK。现在需要在界面上添加几个字段,但打开后标题显示:Error Reading Form,具体内容为List index out of bounds (0).Ignore the error and continue? Note:Ignoring the error may cause components to be deleted or property values to be lost.然后,我任意选择Ignore、Cancel、Ignore All按钮,都不能正确显示窗体界面。
请那位大虾给指点一下,万分感谢!
 
你打开的这个界面用了某个控件,你的Delphi里没装
 
是不是版本不同造成的
 
1:程序里有控件你没装;
2:你朋友修改了delphi控件的代码,(比如说修改了TEdit,从里面加了一个方法TEdit.aaa)
 
可能是程序中用到第三方控件你的Delphi上没有安装!~检查一下看是缺少哪些控件~装一下就可以了~
 
没有安装需要的三方控件经常会出现该提示。
 
在程序中有动态更改控件的某个属性,而更改的范围超出了范围.
 
首先感谢各位的帮忙,现在我把这个窗体文件的内容贴上来,请大虾指点:
inherited frmDD001_001: TfrmDD001_001
Left = 250
Top = 39
Width = 804
Height = 641
Caption = 'frmDD001_001'
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 13
inherited CoolBar1: TCoolBar
Width = 796
Bands = <
item
Break = False
Control = ToolBar1
ImageIndex = -1
MinHeight = 43
Width = 792
end>
inherited ToolBar1: TToolBar
Width = 779
inherited spprint: TToolButton
Action = nil
DropdownMenu = printdd
Style = tbsDropDown
end
inherited spquery: TToolButton
Left = 314
end
inherited spqitcaoz: TToolButton
Left = 357
Caption = #20986#36135
DropdownMenu = Jiaohuo
end
inherited spshenhe: TToolButton
Left = 413
DropdownMenu = shenhe
end
inherited ToolButton1: TToolButton
Left = 469
Action = nil
DropdownMenu = paic
Visible = True
end
inherited spfirst: TToolButton
Left = 525
end
inherited spproive: TToolButton
Left = 568
end
inherited spnext: TToolButton
Left = 611
end
inherited splast: TToolButton
Left = 654
end
inherited spquit: TToolButton
Left = 697
end
end
end
object PageControl: TcxPageControl [1]
Left = 0
Top = 45
Width = 796
Height = 569
ActivePage = cxTabSheet1
Align = alClient
LookAndFeel.Kind = lfUltraFlat
TabOrder = 1
OnChange = PageControlChange
ClientRectBottom = 569
ClientRectRight = 796
ClientRectTop = 23
object cxTabSheet1: TcxTabSheet
Caption = #35746#21333#21407#22987#20449#24687
ImageIndex = 0
object PageControldpb: TcxPageControl
Left = 0
Top = 263
Width = 796
Height = 283
ActivePage = cxTabSheet8
Align = alClient
TabOrder = 0
OnChange = PageControldpbChange
ClientRectBottom = 283
ClientRectRight = 796
ClientRectTop = 23
object cxTabSheet6: TcxTabSheet
Caption = #30005#38208
ImageIndex = 0
inline FrameJB001_0111: TFrameJB001_011
Left = 0
Top = 0
Width = 796
Height = 260
Align = alClient
TabOrder = 0
inherited Panel1: TPanel
Width = 796
Height = 260
inherited cxGrid1: TcxGrid
Width = 794
Height = 217
inherited cxGrid1DBTableView1: TcxGridDBTableView
DataController.Summary.FooterSummaryItems = <
item
Format = '0'
Kind = skCount
FieldName = 'c_diandbh'
Column = FrameJB001_0111.cxGrid1DBTableView1c_diandbh
end
item
Format = '0'
Kind = skSum
FieldName = 'n_diandsl'
Column = FrameJB001_0111.cxGrid1DBTableView1n_diandsl
end>
inherited cxGrid1DBTableView1n_diandsl: TcxGridDBColumn
Width = 69
end
end
end
inherited Panel2: TPanel
Top = 218
Width = 794
end
end
end
end
object cxTabSheet7: TcxTabSheet
Caption = #37197#20214
ImageIndex = 1
inline FrameJB001_0121: TFrameJB001_012
Left = 0
Top = 0
Width = 796
Height = 260
Align = alClient
TabOrder = 0
inherited Splitter1: TSplitter
Left = 449
Height = 219
end
inherited Panel1: TPanel
Width = 449
Height = 219
inherited cxGrid1: TcxGrid
Width = 447
Height = 217
inherited cxGrid1DBTableView1: TcxGridDBTableView
DataController.Summary.FooterSummaryItems = <
item
Format = '0'
Kind = skCount
FieldName = 'c_peijbh'
Column = FrameJB001_0121.cxGrid1DBTableView1c_peijbh
end
item
Format = '0'
Kind = skSum
FieldName = 'n_peijsl'
Column = FrameJB001_0121.cxGrid1DBTableView1n_peijsl
end>
end
end
end
inherited Panel2: TPanel
Left = 452
Width = 344
Height = 219
inherited cxGrid2: TcxGrid
Width = 342
Height = 217
end
end
inherited Panel3: TPanel
Top = 219
Width = 796
end
end
end
object cxTabSheet8: TcxTabSheet
Caption = #21253#35013#26041#24335
ImageIndex = 2
inline FrameJB001_0131: TFrameJB001_013
Left = 0
Top = 0
Width = 796
Height = 260
Align = alClient
TabOrder = 0
inherited Splitter1: TSplitter
Height = 219
end
inherited Panel1: TPanel
Height = 219
inherited cxGrid1: TcxGrid
Height = 217
inherited cxGrid1DBTableView1: TcxGridDBTableView
DataController.Summary.FooterSummaryItems = <
item
Format = '0'
Kind = skCount
FieldName = 'c_baozfsbh'
Column = FrameJB001_0131.cxGrid1DBTableView1c_baozfsbh
end
item
Format = '0'
Kind = skSum
FieldName = 'n_baozfssl'
Column = FrameJB001_0131.cxGrid1DBTableView1n_baozfssl
end>
end
end
end
inherited Panel2: TPanel
Width = 420
Height = 219
inherited cxGrid2: TcxGrid
Width = 418
Height = 217
end
end
inherited Panel3: TPanel
Top = 219
Width = 796
end
end
end
object cxTabSheet9: TcxTabSheet
Caption = #32972#27169
ImageIndex = 3
inline FrameJB001_0221: TFrameJB001_022
Left = 0
Top = 0
Width = 796
Height = 260
Align = alClient
TabOrder = 0
inherited Splitter1: TSplitter
Left = 462
Height = 219
end
inherited Panel1: TPanel
Top = 219
Width = 796
end
inherited Panel2: TPanel
Width = 462
Height = 219
inherited cxGrid1: TcxGrid
Width = 460
Height = 217
inherited cxGrid1DBTableView1: TcxGridDBTableView
DataController.Summary.FooterSummaryItems = <
item
Format = '0'
Kind = skCount
FieldName = 'c_beimbh'
Column = FrameJB001_0221.cxGrid1DBTableView1c_beimbh
end
item
Format = '0'
Kind = skSum
FieldName = 'n_beimsl'
Column = FrameJB001_0221.cxGrid1DBTableView1n_beimsl
end>
end
end
end
inherited Panel3: TPanel
Left = 465
Width = 331
Height = 219
inherited cxGrid2: TcxGrid
Width = 329
Height = 217
end
end
end
end
end
object Panel3: TPanel
Left = 0
Top = 0
Width = 796
Height = 263
Align = alTop
TabOrder = 1
object Label1: TLabel
Left = 20
Top = 12
Width = 52
Height = 14
Caption = #35746#21333#32534#21495
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label36: TLabel
Left = 20
Top = 38
Width = 72
Height = 13
Caption = #23458#25143#35746#21333#32534#21495
end
object Label43: TLabel
Left = 20
Top = 64
Width = 52
Height = 14
Caption = #23458#25143#21517#31216
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label37: TLabel
Left = 20
Top = 90
Width = 72
Height = 13
Caption = #21069#27425#35746#21333#32534#21495
end
object Label46: TLabel
Left = 20
Top = 116
Width = 24
Height = 13
Caption = #21787#22836
end
object Label3: TLabel
Left = 20
Top = 142
Width = 48
Height = 13
Caption = #19979#21333#26085#26399
end
object Label5: TLabel
Left = 20
Top = 169
Width = 52
Height = 14
Caption = #20132#36135#26085#26399
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 20
Top = 195
Width = 52
Height = 14
Caption = #35746#21333#25968#37327
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 20
Top = 221
Width = 24
Height = 13
Caption = #23610#23544
end
object Label13: TLabel
Left = 325
Top = 13
Width = 52
Height = 14
Caption = #24037#33402#31867#21035
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label32: TLabel
Left = 312
Top = 173
Width = 48
Height = 13
Caption = #22270#26679#21517#31216
end
object Lbimagecount: TLabel
Left = 311
Top = 198
Width = 72
Height = 13
Caption = #29616#26377#22270#26679' 0 '#24352
end
object Label15: TLabel
Left = 326
Top = 38
Width = 52
Height = 15
Caption = #20135#21697#21517#31216
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object c_cic: TcxButtonEdit
Left = 120
Top = 219
Width = 121
Height = 21
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = c_cicPropertiesButtonClick
TabOrder = 0
end
object n_dingdsl: TcxDBTextEdit
Left = 120
Top = 190
Width = 121
Height = 21
DataBinding.DataField = 'n_dingdsl'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 1
end
object d_jiaohrq: TcxDBDateEdit
Left = 120
Top = 164
Width = 121
Height = 21
DataBinding.DataField = 'd_jiaohrq'
DataBinding.DataSource = mastdate.ds_g_order
Properties.DateButtons = []
Properties.ReadOnly = False
Properties.SaveTime = False
TabOrder = 2
end
object d_xiadrq: TcxDBDateEdit
Left = 120
Top = 137
Width = 121
Height = 21
DataBinding.DataField = 'd_xiadrq'
DataBinding.DataSource = mastdate.ds_g_order
Properties.DateButtons = []
Properties.DateOnError = deToday
Properties.SaveTime = False
Properties.ShowTime = False
TabOrder = 3
end
object c_kerhh: TcxDBTextEdit
Left = 120
Top = 111
Width = 121
Height = 21
DataBinding.DataField = 'c_kerhh'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 4
end
object c_qiancddbh: TcxDBTextEdit
Left = 120
Top = 85
Width = 121
Height = 21
DataBinding.DataField = 'c_qiancddbh'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 5
OnKeyDown = c_qiancddbhKeyDown
end
object c_kehbh: TcxDBLookupComboBox
Left = 120
Top = 58
Width = 121
Height = 21
DataBinding.DataField = 'c_kehbh'
DataBinding.DataSource = mastdate.ds_g_order
Properties.KeyFieldNames = 'c_kehbh'
Properties.ListColumns = <
item
FieldName = 'c_kehjc'
end>
Properties.ListSource = mastdate.ds_r_keh
TabOrder = 6
end
object c_kehddbh: TcxDBTextEdit
Left = 121
Top = 32
Width = 121
Height = 21
DataBinding.DataField = 'c_kehddbh'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 7
end
object c_dingdbh: TcxDBTextEdit
Left = 121
Top = 6
Width = 121
Height = 21
DataBinding.DataField = 'c_dingdbh'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 8
OnExit = c_dingdbhExit
OnKeyDown = c_dingdbhKeyDown
end
object c_gongybh: TcxDBLookupComboBox
Left = 384
Top = 9
Width = 145
Height = 21
DataBinding.DataField = 'c_gongybh'
DataBinding.DataSource = mastdate.ds_g_order
Properties.KeyFieldNames = 'c_gongybh'
Properties.ListColumns = <
item
FieldName = 'c_gongymc'
end>
Properties.ListSource = mastdate.ds_r_gongy
TabOrder = 9
end
object cxDBImage1: TcxDBImage
Left = 331
Top = 62
Width = 205
Height = 101
DataBinding.DataField = 'i_tuy'
DataBinding.DataSource = mastdate.ds_g_image
Properties.Caption = #35746#21333#22270#29255
Properties.GraphicClassName = 'TJPEGImage'
Properties.PopupMenuLayout.MenuItems = []
Properties.Stretch = True
TabOrder = 10
OnDblClick = cxDBImage1DblClick
end
object cxDBTextEdit6: TcxDBTextEdit
Left = 368
Top = 169
Width = 121
Height = 21
DataBinding.DataField = 'c_beiz'
DataBinding.DataSource = mastdate.ds_g_image
TabOrder = 11
end
object cxButton2: TcxButton
Left = 396
Top = 194
Width = 20
Height = 21
Caption = '<'
TabOrder = 12
OnClick = cxButton2Click
end
object cxButton1: TcxButton
Left = 420
Top = 194
Width = 20
Height = 21
Caption = '>'
TabOrder = 13
OnClick = cxButton1Click
end
object cxButton3: TcxButton
Left = 320
Top = 219
Width = 63
Height = 25
Caption = #22686#21152#22270#26679
TabOrder = 14
OnClick = cxButton3Click
end
object cxButton4: TcxButton
Left = 389
Top = 219
Width = 63
Height = 25
Caption = #21024#38500#22270#26679
TabOrder = 15
OnClick = cxButton4Click
end
object cxButton6: TcxButton
Left = 461
Top = 219
Width = 63
Height = 25
Caption = #20445#23384#22270#26679
TabOrder = 16
OnClick = cxButton6Click
end
object FlatPanel5: TPanel
Left = 168
Top = 113
Width = 176
Height = 134
ParentColor = True
TabOrder = 17
Visible = False
object Label10: TLabel
Left = 7
Top = 13
Width = 12
Height = 13
Caption = #38271
end
object Label17: TLabel
Left = 7
Top = 35
Width = 12
Height = 13
Caption = #23485
end
object Label18: TLabel
Left = 7
Top = 57
Width = 12
Height = 13
Caption = #21402
end
object Label21: TLabel
Left = 154
Top = 30
Width = 12
Height = 26
Caption = #27627#31859
WordWrap = True
end
object Label22: TLabel
Left = 7
Top = 82
Width = 24
Height = 13
Caption = #23545#35282
end
object FlatButton1: TcxButton
Left = 60
Top = 111
Width = 47
Height = 19
Caption = #30830#23450'&C'
TabOrder = 0
TabStop = False
OnClick = FlatButton1Click
Layout = blGlyphTop
end
object c_cicc: TcxDBTextEdit
Left = 23
Top = 9
Width = 121
Height = 21
DataBinding.DataField = 'f_cicc'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 1
end
object c_cick: TcxDBTextEdit
Left = 24
Top = 33
Width = 121
Height = 21
DataBinding.DataField = 'f_cick'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 2
end
object c_cicg: TcxDBTextEdit
Left = 24
Top = 56
Width = 121
Height = 21
DataBinding.DataField = 'f_cicg'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 3
end
object c_duij: TcxDBTextEdit
Left = 32
Top = 79
Width = 121
Height = 21
DataBinding.DataField = 'f_duij'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 4
end
end
object c_canpbh: TcxDBLookupComboBox
Left = 385
Top = 34
Width = 145
Height = 21
DataBinding.DataField = 'c_canpbh'
DataBinding.DataSource = mastdate.ds_g_order
Properties.KeyFieldNames = 'c_canpbh'
Properties.ListColumns = <
item
FieldName = 'c_canpmc'
end
item
FieldName = 'c_canpbh'
end>
Properties.ListSource = mastdate.ds_r_canp
TabOrder = 18
end
end
end
object cxTabSheet2: TcxTabSheet
Caption = #19994#21153#22788#29702#20449#24687
ImageIndex = 1
object GroupBox1: TGroupBox
Left = 23
Top = 11
Width = 615
Height = 149
Caption = #35745#21010#20449#24687
TabOrder = 0
object Label27: TLabel
Left = 18
Top = 24
Width = 72
Height = 13
Caption = #35745#21010#29983#20135#20196#21495
end
object Label9: TLabel
Left = 23
Top = 120
Width = 48
Height = 13
Caption = #35745#21010#25968#37327
end
object Label4: TLabel
Left = 19
Top = 57
Width = 48
Height = 13
Caption = #24405#20837#26085#26399
end
object Label7: TLabel
Left = 283
Top = 52
Width = 48
Height = 14
Caption = #24320#21333#26085#26399
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 267
Top = 124
Width = 72
Height = 13
Caption = #35745#21010#23436#25104#26085#26399
end
object Label64: TLabel
Left = 255
Top = 27
Width = 84
Height = 13
Caption = #23458#25143#38656#26679#21697#25968#37327
end
object Label45: TLabel
Left = 18
Top = 90
Width = 48
Height = 13
Caption = #26679#21697#20301#32622
end
object Label35: TLabel
Left = 290
Top = 87
Width = 48
Height = 13
Caption = #27169#26495#20301#32622
end
object c_jihsclh: TcxDBButtonEdit
Left = 100
Top = 20
Width = 121
Height = 21
DataBinding.DataField = 'c_jihsclh'
DataBinding.DataSource = mastdate.ds_g_order
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = c_jihsclhPropertiesButtonClick
TabOrder = 0
end
object d_lurrq: TcxDBDateEdit
Left = 101
Top = 53
Width = 121
Height = 21
DataBinding.DataField = 'd_lurrq'
DataBinding.DataSource = mastdate.ds_g_order
Properties.SaveTime = False
Properties.ShowTime = False
TabOrder = 1
end
object d_kaidrq: TcxDBDateEdit
Left = 350
Top = 49
Width = 121
Height = 21
DataBinding.DataField = 'd_kaidrq'
DataBinding.DataSource = mastdate.ds_g_order
Properties.SaveTime = False
Properties.ShowTime = False
TabOrder = 2
end
object n_yangpsl: TcxDBTextEdit
Left = 350
Top = 20
Width = 121
Height = 21
DataBinding.DataField = 'n_yangpsl'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 3
end
object c_yangpwz: TcxDBMemo
Left = 100
Top = 77
Width = 153
Height = 38
DataBinding.DataField = 'c_yangpwz'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 4
end
object c_mobwz: TcxDBMemo
Left = 348
Top = 76
Width = 153
Height = 38
DataBinding.DataField = 'c_mobwz'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 5
end
object edtn_jihsl: TcxLabel
Left = 101
Top = 121
Width = 150
Height = 22
AutoSize = False
Style.BorderStyle = ebsUltraFlat
TabOrder = 6
end
object edtd_jihwcrq: TcxLabel
Left = 348
Top = 121
Width = 153
Height = 22
AutoSize = False
Style.BorderStyle = ebsUltraFlat
TabOrder = 7
end
end
object GroupBox2: TGroupBox
Left = 24
Top = 254
Width = 613
Height = 228
Caption = #21457#36135#20449#24687
TabOrder = 1
object Label14: TLabel
Left = 17
Top = 50
Width = 72
Height = 13
Caption = #23454#38469#23436#25104#26085#26399
end
object Label25: TLabel
Left = 17
Top = 108
Width = 48
Height = 13
Caption = #21457#36135#26085#26399
end
object Label26: TLabel
Left = 17
Top = 78
Width = 48
Height = 13
Caption = #21457#36135#25968#37327
end
object Label19: TLabel
Left = 17
Top = 26
Width = 48
Height = 13
Caption = #20132#36135#26041#24335
end
object Label20: TLabel
Left = 292
Top = 24
Width = 48
Height = 13
Caption = #20132#36135#22320#22336
end
object Label96: TLabel
Left = 293
Top = 88
Width = 48
Height = 13
Caption = #21457#36135#22791#27880
end
object Label97: TLabel
Left = 17
Top = 146
Width = 33
Height = 13
Caption = #33394' '#21495
end
object d_sijwcrq: TcxDBDateEdit
Left = 102
Top = 47
Width = 121
Height = 21
DataBinding.DataField = 'd_sijwcrq'
DataBinding.DataSource = mastdate.ds_g_order
Properties.SaveTime = False
Properties.ShowTime = False
TabOrder = 0
end
object d_fahrq: TcxDBDateEdit
Left = 102
Top = 105
Width = 121
Height = 21
DataBinding.DataField = 'd_fahrq'
DataBinding.DataSource = mastdate.ds_g_order
Properties.SaveTime = False
Properties.ShowTime = False
TabOrder = 1
end
object n_fahsl: TcxDBTextEdit
Left = 103
Top = 75
Width = 121
Height = 21
DataBinding.DataField = 'n_fahsl'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 2
end
object n_jiaohfsbh: TcxDBLookupComboBox
Left = 102
Top = 17
Width = 122
Height = 21
DataBinding.DataField = 'c_jiaohfsbh'
DataBinding.DataSource = mastdate.ds_g_order
Properties.KeyFieldNames = 'c_jiaohfsbh'
Properties.ListColumns = <
item
FieldName = 'c_jiaohfsmc'
end>
Properties.ListSource = mastdate.ds_r_jiaohfs
TabOrder = 3
end
object c_jiaohdz: TcxDBMemo
Left = 349
Top = 12
Width = 242
Height = 51
DataBinding.DataField = 'c_jiaohdz'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 4
end
object c_fahbz: TcxDBMemo
Left = 350
Top = 69
Width = 240
Height = 51
DataBinding.DataField = 'c_fahbz'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 5
end
object c_seh: TcxDBLookupComboBox
Left = 102
Top = 143
Width = 396
Height = 21
DataBinding.DataField = 'c_seh'
DataBinding.DataSource = mastdate.ds_g_order
Properties.DropDownListStyle = lsEditList
Properties.KeyFieldNames = 'c_sehmc'
Properties.ListColumns = <
item
FieldName = 'c_sehmc'
end>
Properties.ListSource = mastdate.ds_r_seh
TabOrder = 6
end
end
object GroupBox3: TGroupBox
Left = 23
Top = 167
Width = 614
Height = 76
Caption = #21333#25454#20449#24687
TabOrder = 2
object Label23: TLabel
Left = 17
Top = 49
Width = 48
Height = 13
Caption = #32039#24613#31243#24230
end
object Label2: TLabel
Left = 17
Top = 23
Width = 48
Height = 13
Caption = #21333#25454#31181#31867
end
object Label11: TLabel
Left = 300
Top = 46
Width = 36
Height = 13
Caption = #36319#21333#21592
end
object Label28: TLabel
Left = 288
Top = 17
Width = 48
Height = 13
Caption = #27169#20855#32534#21495
end
object c_dingdlbbh: TcxDBLookupComboBox
Left = 102
Top = 45
Width = 123
Height = 21
DataBinding.DataField = 'c_dingdlbbh'
DataBinding.DataSource = mastdate.ds_g_order
Properties.KeyFieldNames = 'c_dingdlbbh'
Properties.ListColumns = <
item
FieldName = 'c_dingdlbmc'
end>
Properties.ListSource = mastdate.ds_r_dingdlb
TabOrder = 0
end
object c_biaoz: TcxDBLookupComboBox
Left = 102
Top = 19
Width = 123
Height = 21
DataBinding.DataField = 'c_biaoz'
DataBinding.DataSource = mastdate.ds_g_order
Properties.KeyFieldNames = 'c_biaozbh'
Properties.ListColumns = <
item
FieldName = 'c_biaozmc'
end>
Properties.ListSource = mastdate.ds_r_biaoz
TabOrder = 1
end
object c_gendrxm: TcxDBTextEdit
Left = 346
Top = 43
Width = 121
Height = 21
DataBinding.DataField = 'c_gendrxm'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 2
end
object c_mojbh: TcxDBTextEdit
Left = 345
Top = 13
Width = 121
Height = 21
DataBinding.DataField = 'c_mojbh'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 3
end
end
end
object cxTabSheet3: TcxTabSheet
Caption = #20854#23427#20449#24687
ImageIndex = 2
object GroupBox4: TGroupBox
Left = 15
Top = 10
Width = 636
Height = 108
Caption = #24405#20837'/'#23457#26680#20449#24687
TabOrder = 0
object Label39: TLabel
Left = 16
Top = 29
Width = 60
Height = 13
Caption = #24405#20837#21592#24037#21495
end
object Label41: TLabel
Left = 16
Top = 61
Width = 48
Height = 13
Caption = #23457#26680#32534#21495
end
object Label40: TLabel
Left = 257
Top = 29
Width = 60
Height = 13
Caption = #24405#20837#21592#22995#21517
end
object Label42: TLabel
Left = 260
Top = 61
Width = 48
Height = 13
Caption = #23457#26680#22995#21517
end
object c_zibbh: TcxDBTextEdit
Left = 101
Top = 26
Width = 121
Height = 21
DataBinding.DataField = 'c_zibbh'
DataBinding.DataSource = mastdate.ds_g_order
Enabled = False
TabOrder = 0
end
object c_senhbh: TcxDBTextEdit
Left = 101
Top = 59
Width = 121
Height = 21
DataBinding.DataField = 'c_senhbh'
DataBinding.DataSource = mastdate.ds_g_order
Enabled = False
TabOrder = 1
end
object c_zibxm: TcxDBTextEdit
Left = 339
Top = 26
Width = 121
Height = 21
DataBinding.DataField = 'c_zibxm'
DataBinding.DataSource = mastdate.ds_g_order
Enabled = False
TabOrder = 2
end
object c_senhxm: TcxDBTextEdit
Left = 339
Top = 59
Width = 122
Height = 21
DataBinding.DataField = 'c_senhxm'
DataBinding.DataSource = mastdate.ds_g_order
Enabled = False
TabOrder = 3
end
end
object GroupBox5: TGroupBox
Left = 16
Top = 129
Width = 635
Height = 250
Caption = #20854#23427
TabOrder = 1
object Label16: TLabel
Left = 19
Top = 20
Width = 48
Height = 13
Caption = #23458#25143#35828#26126
end
object Label74: TLabel
Left = 21
Top = 89
Width = 72
Height = 13
Caption = #21253#35013#26041#24335#22791#27880
end
object Label38: TLabel
Left = 26
Top = 146
Width = 24
Height = 13
Caption = #22791#27880
end
object c_kehsm: TcxDBMemo
Left = 100
Top = 13
Width = 407
Height = 62
DataBinding.DataField = 'c_kehsm'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 0
end
object c_baozfsbz: TcxDBMemo
Left = 101
Top = 81
Width = 407
Height = 56
DataBinding.DataField = 'c_baozfsbz'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 1
end
object c_beiz: TcxDBMemo
Left = 101
Top = 142
Width = 409
Height = 63
DataBinding.DataField = 'c_beiz'
DataBinding.DataSource = mastdate.ds_g_order
TabOrder = 2
end
end
end
object cxTabSheet4: TcxTabSheet
Caption = #29983#20135#25490#31243
ImageIndex = 3
object PageControlpc: TcxPageControl
Left = 0
Top = 0
Width = 796
Height = 546
Align = alClient
TabOrder = 0
ClientRectBottom = 546
ClientRectRight = 796
ClientRectTop = 0
end
inline FrameDD002_0011: TFrameDD002_001
Left = 0
Top = 0
Width = 796
Height = 546
Align = alClient
TabOrder = 1
inherited cxDBTreeList2: TcxDBTreeList
Width = 796
Height = 546
OptionsData.Editing = False
end
inherited g_sengcpc: TADODataSet
inherited g_sengcpcd_jihwcrq: TDateTimeField
OnValidate = FrameDD002_0011g_sengcpcd_jihwcrqValidate
end
end
end
end
end
inherited DataSource: TDataSource
Left = 700
Top = 49
end
inherited ActionList: TActionList
Left = 568
Top = 118
end
inherited ImageList1: TImageList
Left = 644
Top = 55
end
object OPD: TOpenPictureDialog
DefaultExt = '*.jpg'
Filter = 'JPEG Image File (*.jpg)|*.jpg'
FilterIndex = 0
Left = 560
Top = 235
end
object Jiaohuo: TPopupMenu
Left = 488
Top = 47
object N1: TMenuItem
Caption = #26410#20132#36135
OnClick = N1Click
end
object N2: TMenuItem
Caption = #24050#20132#36135
OnClick = N2Click
end
end
object shenhe: TPopupMenu
Left = 535
Top = 49
object N3: TMenuItem
Caption = #23457#26680
OnClick = N3Click
end
object N4: TMenuItem
Caption = #21462#28040#23457#26680
OnClick = N4Click
end
end
object paic: TPopupMenu
Left = 676
Top = 128
object N9: TMenuItem
Caption = #26597#35810#26410#29983#25104#25490#31243#35746#21333
Visible = False
OnClick = N9Click
end
object N8: TMenuItem
Caption = #26597#35810#24050#29983#25104#25490#31243#35746#21333
Visible = False
OnClick = N8Click
end
object N5: TMenuItem
Caption = #29983#25104#25490#31243
OnClick = N5Click
end
object N6: TMenuItem
Caption = #20445#23384#25490#31243
OnClick = N6Click
end
object N12: TMenuItem
Caption = #21462#28040#20462#25913
Visible = False
OnClick = N12Click
end
object N7: TMenuItem
Caption = #21462#28040#20462#25913
OnClick = N7Click
end
object N10: TMenuItem
Caption = #21024#38500#25490#31243#24037#24207
Visible = False
OnClick = N10Click
end
object N11: TMenuItem
Caption = #32534#36753#25490#31243
OnClick = N11Click
end
end
object printdd: TPopupMenu
Left = 261
Top = 136
object N13: TMenuItem
Caption = #25171#21360#35746#21333
end
object N14: TMenuItem
Caption = #25171#21360#25490#31243
end
end
end
 
请高手指点,谢谢。
 
themars说:
你打开的这个界面用了某个控件,你的Delphi里没装
==>应该不会吧,编译、执行都没有问题呀?

李翔鹏说:
是不是版本不同造成的
==>不是,朋友与我都是Delphi7版本。

whatdelphi说:
1:程序里有控件你没装;
2:你朋友修改了delphi控件的代码,(比如说修改了TEdit,从里面加了一个方法TEdit.aaa)
==>应该不会吧,编译、执行都没有问题呀?

kfp说:
可能是程序中用到第三方控件你的Delphi上没有安装!~检查一下看是缺少哪些控件~装一下就可以了~
==>应该不会吧,编译、执行都没有问题呀?

雾锁长河说:
没有安装需要的三方控件经常会出现该提示。
==>应该不会吧,编译、执行都没有问题呀?

guanyue7613说:
在程序中有动态更改控件的某个属性,而更改的范围超出了范围.
==>窗体文件已经贴出,请帮忙看看。
 
List index out of bounds (0). 应该是越界错误,就好比用ListBox,当ListBox.Count = 10时,程序中调用了 ListBox1.Items.Strings[10]就会出现上面错误

既然编译通过,窗体文件应该没有问题,是程序运行起来后,手工操作才引发了这个错误,所以,看看你所加的字段部分的控件,取字段值的时候是不是出现 >= count情况,或者没有加一个判断,例如: if 控件.count < 1 then exit;
 
wino:
你好!
我在用Delphi7打开工程文件后,想打开看看其中一个窗体(如上所帖)DFM文件时,报出这样的错误,不是在运行时报错。如下图所示:
error1.jpg
 
看来找不到高人了?!
 
自己顶一下!
 
是你的第三方控件造成的,
你看看里面有些什么消息,
可能和你Delphi里装的控件有冲突
我也遇到过和你一模一样的问题。
 
发这么长!!??

娘子,快点出来看上帝。。。。。。

估计就这个原因:
1、控件没装;
2、超过边界;
 
后退
顶部