DBGrid的一个使用问题，急！！！！

[aflash]

怎样把一个值赋给DBGRID的一个单元格，而不是通过手工输入。
比如：
　　当单击一个单元格时，弹出一个对话框让用户选择一个值，但是，这个值应该怎样在DBGRID中马上显示出来呢。
　　请高手帮忙！！！

[hzb]

以下是DBGrid的OnCellClick事件的代码
procedure TForm1.DBGrid1CellClick(Column: TColumn);
var
s:string;
begin
with dbgrid1 do begin

在此处显示对话框让用户选择一个值,将这个值赋给s

DataSource.DataSet.Edit;//如果dbgrid连接的Query或者table已经处于编辑状态，则不需要这句话.
DataSource.DataSet.FieldByName(Column.FieldName).AsString:=s;
end;
end;

[aflash]

var
s:string;
begin
form2.showmodal;//我要SHOW的不是一个对话框，而是另一个FORM！！！
s:=form2.edit1.text;
end;
但是，当执行了第一行就不再往下执行了，除非再单击一下，但这不是我所需要的。
请高手指点。这可怎么办呢！！！

[hzb]

showmodal出来的form当然要关闭以后才能往下执行，你想达到什么目的？

[ghz2000]

你在from2的edit1.onexit中
from1中你把s放在from1
的public定义

procedure TForm2.Edit1Exit(Sender: TObject);
begin
from1.s:=edit1.text;
close;
end;

[ghz2000]

其实你可以不用再建一个新的窗体的，

你用一下InputQuery试试

[ghz2000]

其实你可以不用再建一个新的窗体的，

你用一下InputQuery试试

[newcsdn]

其实你完全可以不用再建一个新的窗体,或者弹出一个什么对话框什么的!!!
反正你的目的就是让用户选一个值,就象下拉框那样的!!!
dbgrid 有这样的功能:
在dbgrid 的columns属性中有picklist(Tstringlist类型)提供
你试一下就知道了!!!!