关于设置变量的一个很菜的问题！！！！！

Question

你的方法是可以的//其实设置成Form2的属性要和理一点
//New
Form2.Tag:=1;
Form2.show;//Insert
Form2.Tag:=2;
Form2.show;//Form2里代码：
if Tag=2 then 
begin
  //删除该项数据
end;
  //增加数据

Answer 1

/////
type
  TForm2 = class(TForm)
  //.........
    FEditStatus: Integer;
  public
    property EditStatus: Integer read FEditStatus write FEditStatus;
  end;
//New
Form2.EditStatus:=1;
Form2.show;//Insert
Form2.EditStatus:=2;
Form2.show;//Form2里代码：
if EditStatus=2 then 
begin
  //删除该项数据
end;
  //增加数据