サイト:www.jschina.com.cn IStream と TStream 間の相互変換

procedure TForm1.Button1Click(Sender: TObject);
var
memoStream:TStream;
begin
image1.Picture:=nil;
//最初の写真を表示します
image1.Picture.LoadFromFile('c:logo.bmp');
memoStream := TmemoryStream.Create;
//写真を TmemoryStream として保存します
memoStream.Position: =0;
//TmemoryStream を IStream に変換します
stream:=TStreamAdapter.Create(memoStream);
//IStream を TOleStream に変換します ==TmemoryStream
OleStream:= TOleStream.Create(Stream); (OleStream);
最後に
OleStream.Free
///////////// ///
; uses
................................AxCtrls,ActiveX; //これら 2 つのユニットを追加する必要があります
以上、site:www.jschina.com.cn の内容を含め、IStream と TStream 間の相互変換について紹介しました。PHP チュートリアルに興味のある友人の役に立てれば幸いです。