国产成人毛片视频|星空传媒久草视频|欧美激情草久视频|久久久久女女|久操超碰在线播放|亚洲强奸一区二区|五月天丁香社区在线|色婷婷成人丁香网|午夜欧美6666|纯肉无码91视频

advstringgrid delphi ADVStringGrid怎么顯示下拉列表?

delphi ADVStringGrid怎么顯示下拉列表?讓ADVStringGrid組件顯示下拉列表,其步驟如下:1、設(shè)置DefaultEditor屬性為 edComboList,或者 設(shè)置Edit

delphi ADVStringGrid怎么顯示下拉列表?

讓ADVStringGrid組件顯示下拉列表,其步驟如下:

1、設(shè)置DefaultEditor屬性為 edComboList,或者 設(shè)置EditorType為edComboList。

2、提供列表選項。即給ADVStringGrid的Combobox.Items屬性賦值。示例代碼如下:procedure TfrmGroupUp.grdGetEditorType(Sender: TObject ACol, ARow: Integer var AEditor: TEditorType)begin case ACol of 4: //第5列 begin AEditor := edComboList //下拉列表 grd.Combobox.Items := cbbFangShi.Items //動態(tài)設(shè)置下拉列表選項 end endend

DELPHI中,怎么把Stringgrid中的數(shù)據(jù)存到數(shù)據(jù)庫里?

for i:=0 to stringgrid1.rowcount-1 do

begin

adoquery1.append

adoquery1.fieldbyname("字段名").asstring:=stringgrid1.cells[1,i]

........

adoquery1.post

end