求 DBGRID 内实现 ONROW CHANGE 方法

Question

本人是delphi 极新手.onrow change 包括用mouse click 或上下箭嘴.event 发生后想call 一个procedure 或 click 一个按鈕也可以.(delphi 7)网上找到在dataset 层面有 afterscroll event, 但怎樣call form 的 procedure ?

Answer 1

procedure TForm1.ADOQuery1AfterScroll(DataSet: TDataSet);
begin
  Button1.Click;
end;

Answer 2

你得挂上afterscroll事件啊，ADOQuery的属性中有个事件的标签，从哪里找到后双击

Answer 3

我想问一下，button1这个控件加了吗?

Answer 4

procedure TMainForm.Button1Click(Sender: TObject);
begin
edit1.Text := Data.ADOQ_SGMRAA.FieldByName('RAA001').AsString;
 with Data.ADOQ_SGMRAB do
.
.
.
.
.
.
.
.

Answer 5

双墼afterscroll event 出的:procedure TData.ADOQ_SGMRAAAfterScroll(DataSet: TDataSet);
begin
TMainForm.Button1Click(nil);

Answer 6

如果 用 button1.click
[Error] DM.pas(57): Undeclared identifier: 'Button1'如果 用 TMainForm.Button1.click[Error] DM.pas(57): Method identifier expected