我參考這一篇文章，文中 ha0009 大大提供了兩個 FUNCTION 可將物件轉換成文字，及將文字轉換成物件。    (如何使用TIdTCPClient來傳送物件??)http://delphi.ktop.com.tw/topic.php?topic_id=33865    但是我測試的結果，在底下程式碼紅色的那一行執行時會發生錯誤，錯誤訊息為    

"Class TButton not found"

function StringToComponent(Value: string): TComponent;
var
  StrStream:TStringStream;
  BinStream: TMemoryStream;
begin
  StrStream := TStringStream.Create(Value);
  try
    BinStream := TMemoryStream.Create;
    try
      ObjectTextToBinary(StrStream, BinStream);
      BinStream.Seek(0, soFromBeginning);
      Result := BinStream.ReadComponent(nil);        finally
      BinStream.Free;
    end;
  finally
    StrStream.Free;
  end;
end;

想請問，到底是怎麼回事？ -------------------------------- 給我一個支點，我可以撐起整個地球

你是不是沒註冊,如下: RegisterClasses([TButton]); 記得放在initialization裡

嘿嘿~ 果真如 change.jian 大大所言，加上去就好了，真是太感激了。 但是額外想問一下，為什麼需要在 initialization 裡加上 RegisterClasses 呢？有人可以幫忙解釋一下嗎？ -------------------------------- 給我一個支點，我可以撐起整個地球