我想解决的问题是：如何使用户输入的信息，在我的下一页链接中进行回显！就如同demo/phonetics customer profiler/中，当用户在main form中输入个人信息后，可直接把edit中的信息放入name中， procedure TformMain.butnNextClick(Sender: TObject); begin   with TPCPSession(WebApplication.Data) do begin     Name := Trim(editName.Text);     Address1 := Trim(editAddress1.Text);     Address2 := Trim(editAddress2.Text);     City := Trim(editCity.Text);     State := Trim(editState.Text);     Zip := Trim(editZip.Text); 这个TPCPSession(WebApplication.Data)在哪里里定义的，如何去定义， 我找不到答案！who can tell me how to do it? thanks a lot!   end;   TformQuestion1.Create(WebApplication).Show;   Release; end;

TPCPSession 定義在該專案的 ServerController.pas 單元中 如下:

  TPCPSession = class(TComponent)
  public
    Name: string;
    Address1: string;
    Address2: string;
    City: string;
    State: string;
    Zip: string;
    //
    PlanLD: Boolean;
    Phone: string;
    //
    CreditUnion: string;
    PromoCode: string;
    //
    Plan: string;
    PeakMins: Integer;
    OffPeakMins: Integer;
  end;

--- 每個人都是一本書

谢谢您的回帖，请问有没有相关的session方面的文章，我看程序看的一头雾水，还是不能明白他的真正含义，谢谢，如果有的话，请您推荐给我！表示感谢！！！

小弟對 Session 也是一不知半不解 --- 每個人都是一本書< src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=9549643&CC=213577">

没关系，让我们大家共同努力吧！！！ 非常感谢你的帮助！！！

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.