Home > Back-end >  Urgent urgent urgent appeal for help
Urgent urgent urgent appeal for help

Time:09-21

The two form
A form1, a form2
First in a dbgrideh form1
Results from the database query, assigned to the dbgrideh form2,
Always will pop up a box is an assignment is successful, points ok assignment successfully cancel assignment failure,
Can not show this window,

The code is
Procedure TForm1. DBGridEh1EditButtonClick (Sender: TObject);
The begin
With Form2. Sp1 do
The begin
//Close;
ProcedureName:='a2';
The Parameters. Refresh;
Parameters. ParamByName (' @ bm) Value:=trim (DBGrideh1. Columns. The Grid. The fields [0], Value);
ExecProc;
The Open;
//Form2. Show;
end;

end;

CodePudding user response:

Can you see the code is posted
  • Related