form3中:
procedure TForm3.Button1Click(Sender: TObject);
begin
......
form3.Previous;
form3.Close;
end;
问题是每次form3执行的时候,form1已经执行完,怎么解决?
procedure TForm3.Button1Click(Sender: TObject);
begin
......
form3.Previous;
form3.Close;
end;
问题是每次form3执行的时候,form1已经执行完,怎么解决?
begin
ADOTable3.Append;
form3.ShowModal;//添加数据
form3.Free;
end;
就是怎样从form2返回到form1?