請問，我在某個子系統Package中放有好幾個Form 而其中 TForm001 為該Package 之主要表單 也有RegisterClass，但是他在跟同Package中的其他表單如TForm002互動時 雖然有uses 的關係，TForm001可以存取TForm002， 但是反過來卻不行，也就是TForm002存取TForm001時會出現Access Violation的訊息 我只能在Form001傳入給Form002的變數，真的只能這樣做嗎？ 還是有其他的方法可以達到？ LoadPackage(001.bpl) -> GetClass(TForm001) -> Create Form By TForm001 -> 在Form001中 Form002.Showmodal; -> Form002中如果有存取到Form001的變數時就有AV訊息 不知道有沒有先進可以指點一下

可以在Form002設一全域變數 如 str002:string;
procedure TForm001.Button1Click(Sender: TObject); 
var str001,restr001:string;
begin
    Form002 := TForm002.Create(self);
    try
      Form002.str002:=str001; //當打入Form002.時str002變數是不會被帶出來的,要自已打入 
    if Form002.ShowModal=mrOk then
      begin
         restr001:=form002.str002;
      end;
end;