成人AV在线无码|婷婷五月激情色,|伊人加勒比二三四区|国产一区激情都市|亚洲AV无码电影|日av韩av无码|天堂在线亚洲Av|无码一区二区影院|成人无码毛片AV|超碰在线看中文字幕

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