如在的delphi中gride中加入下拉框,等等就象pb那样?

[borlandsoftware]

[shiboq]

使用Picklist须注意，要用onGetText和onSetText来存储和显示数据！

[kofxdm]

>> 使用Picklist须注意，要用onGetText和onSetText来存储和显示数据！
楼上的，给个例子看看。

[arrow_gx]

onGetText 是显示

onSetText是实际数字

[Snakeguo]

设置DBGrid的PickList属性

[bluetooth_2001]

加入column后，选择
设置DBGrid.column[n].PickList属性

[chen_weiping]

//在窗体上任意放置dbgrid（strgrid）和dbcombobox1（combobox1）
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
begin
if (gdfocused in state) then
begin
begin
DBCombobox1.Left := Rect.Left + DBGrid1.Left;
DBCombobox1.Top := Rect.Top + DBGrid1.top;
DBCombobox1.Width := Rect.Right - Rect.Left;
DBCombobox1.Height := Rect.Bottom - Rect.Top;
DBCombobox1.Visible := True;
end;
end;