4873
社区成员
- 全部
- 语言基础/算法/系统设计
- 数据库相关
- 图形处理/多媒体
- 网络通信/分布式开发
- VCL组件开发及应用
- Windows SDK/API
- 问答
如在的delphi中gride中加入下拉框,等等就象pb那样?
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
chen_weiping 2001-12-31
//在窗体上任意放置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;
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;
bluetooth_2001 2001-12-31
加入column后，选择
设置DBGrid.column[n].PickList属性
设置DBGrid.column[n].PickList属性
Snakeguo 2001-12-31
设置DBGrid的PickList属性
arrow_gx 2001-12-31
onGetText 是显示
onSetText是实际数字
onSetText是实际数字
kofxdm 2001-12-31
>> 使用Picklist须注意，要用onGetText和onSetText来存储和显示数据！
楼上的，给个例子看看。
楼上的，给个例子看看。
shiboq 2001-12-31
使用Picklist须注意，要用onGetText和onSetText来存储和显示数据！
