如何在dbgrid2得到下拉框呀????????
还有一个问题就是:
var i:integer;
procedure TForm1.FormCreate(Sender: TObject);
begin
i:=0;
end;
procedure tform1.timer1timer
begin
inc(i);
end;
procedure TForm1.ApplicationEvents1ActionExecute(Action: TBasicAction;
  var Handled: Boolean);
begin
if (i mod 2)=0 then
showmessage('ljlj');
end;
这样为什么不能出现对话框呀

解决方案 »

  1.   

    第一个问题,听说如果使用lookup的字段可以是dbgrid自动出现下拉框,我没有试过,也不知道具体的做法,以前的帖子里有。
    第二个问题:怎么触发的ApplicationEvents1ActionExecute?
      

  2.   

    DBGrid的字段里面每个Column有picklist,
    你可以直接在程序里面添加
      

  3.   

    DBGrid连接上数据库以后,双击Dbgird,会出现一个Editing Dbgird1.COlumns,击右键,选Add all fields,然后选择你要出现下拉的列的名字,在其属性picklist里面添加下拉的内容,执行就ok啦!不行的话联系:23974048,记得给分哦!!
      

  4.   

    自己添加一个DDLB,然后手工控制显示位置,以前用过