爲什麼在使用TStream類時會出現「抽象錯誤」？

Question

當我嘗試運行下面簡單的代碼序列中，我得到了Abstract Error錯誤消息：

type 
    TForm1 = class(TForm) 
    Image1: TImage; 
    Button1: TButton; 
    procedure Button1Click(Sender: TObject); 
    private 
    { Private declarations } 
    public 
    { Public declarations } 
    end; 

procedure TForm1.Button1Click(Sender: TObject); 
var 
    ImageStream: TStream; 
begin 
    ImageStream := TStream.Create; 
    Image1.Picture.Bitmap.SaveToStream(ImageStream); 
    ... 
end; 

我需要提取的TBitmap稍後處理的流...我在做什麼錯？

Answer 1

TStream class是一個抽象類，是所有流的基礎。

T流是基類類型，可以從讀取或寫入各種存儲介質，如磁盤文件，動態存儲器，等等流對象。

使用專門的流對象來讀取，寫入或複製存儲在特定介質中的信息。

您可能需要使用TMemoryStream或TFileStream，其中，顧名思義，存儲在內存中的數據流內容或系統文件。

procedure TForm1.Button1Click(Sender: TObject); 
var 
    ImageStream: TMemoryStream; 
begin 
    ImageStream := TMemoryStream.Create; 
    try 
    Image1.Picture.Bitmap.SaveToStream(ImageStream); 
    ... 
    finally 
    ImageStream.Free; 
    end; 
end;