求AdvStrgrid高手!关于edEditBtn可编辑按钮的事!
我在form1的AdvStrgrid1中的cells[1,1]单元格添加了EditBtn可编辑按钮!点击这个按钮会弹出另一个窗体Form2,上面也有一个AdvStrgrid1。 现在我想在关闭Form2的时候返回一个计算结果给form1.AdvStrgrid1.cells[1,1]。
例如:
form2的Onclose事件里写:
form1.AdvStrgrid1.cells[1,1]:=inttostr(strtoint(form2.AdvStrgrid1.cells[5,5])+
strtoint(form2.AdvStrgrid1.cells[4,5]));
我是这样去做的,但是在关闭Form2后,窗体1的AdvStrgrid1的单元格cells[1,1]里不会显示结果!是不是有EditBtn类型的单元格赋值语句不是这样写的???求教!!万分感谢了!!!小弟分不多,就这么点了。
[解决办法]
在onEllipsClick事件里写:
procedure TForm1.AdvStringGrid1EllipsClick(Sender: TObject; ACol,
ARow: Integer; var S: String);
begin
if acol=1 then
begin
form2.ShowModal;
S:=form2.advstringgrid1.Cells[1,1];
end;
end;