在DBGRID中如何象DELPHI属性设置拦中,选定一Cell时,在旁边出现一个小的选择按钮? 以打开不同的项目? 在DBGRID中如何象DELPHI属性设置拦中,选定一Cell时,在旁边出现一个小的选择按钮? 以打开不同的项目? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 //参考如下代码~~procedure TForm1.DBGrid1EditButtonClick(Sender: TObject);begin Caption := DBGrid1.Columns[DBGrid1.SelectedIndex].FieldName;end;procedure TForm1.Table1AfterOpen(DataSet: TDataSet);begin DBGrid1.Columns[0].ButtonStyle := cbsEllipsis; //可以在设计期间设置~~ DBGrid1.Columns[1].ButtonStyle := cbsEllipsis; DBGrid1.Columns[2].ButtonStyle := cbsEllipsis;end; dbgrid1.Columns[0].PickList.Add('item1'); dbgrid1.Columns[0].PickList.Add('item2'); 同意 zswangII(伴水清清)(职业清洁工) procedure TForm1.Table1AfterOpen(DataSet: TDataSet);begin DBGrid1.Columns[0].ButtonStyle := cbsEllipsis; //可以在设计期间设置~~ DBGrid1.Columns[1].ButtonStyle := cbsEllipsis; DBGrid1.Columns[2].ButtonStyle := cbsEllipsis;end;以上也行,也可以在程序设计是静态设置该属性 好像有LookUpCombobox的功能吧?? 窗体事件执行顺序问题 就剩20分了,DBComboBox1 初始化一般放在Form的哪个事件里,我放在Create里,结果老鼠标移开,DBComboBox1里选中的值就没了 没事做....散分..... 请教如何将Excel,Access导入到ClientDataSet中? 焦点转换问题,请教!谢! 网络收发中,写硬盘来不及! 我用query想显示第150条-200条记录怎么写SQL语句呢?怎么实现记录翻页? 请问怎么样清除treeview一个项的所有子项 delphi能否这样理解 使用tdatabase的时候,应包含怎样的文件? 怎么手动加载TtreeView数据? 请问如何获得键值
procedure TForm1.DBGrid1EditButtonClick(Sender: TObject);
begin
Caption := DBGrid1.Columns[DBGrid1.SelectedIndex].FieldName;
end;procedure TForm1.Table1AfterOpen(DataSet: TDataSet);
begin
DBGrid1.Columns[0].ButtonStyle := cbsEllipsis; //可以在设计期间设置~~
DBGrid1.Columns[1].ButtonStyle := cbsEllipsis;
DBGrid1.Columns[2].ButtonStyle := cbsEllipsis;
end;
dbgrid1.Columns[0].PickList.Add('item2');
begin
DBGrid1.Columns[0].ButtonStyle := cbsEllipsis; //可以在设计期间设置~~
DBGrid1.Columns[1].ButtonStyle := cbsEllipsis;
DBGrid1.Columns[2].ButtonStyle := cbsEllipsis;
end;
以上也行,
也可以在程序设计是静态设置该属性