چرا از این کد اشکال میگیره و کار نمیکنه ؟

[ali_mohamadi8928]

اگه میشه دوستان مشکل این کد رو بگن ؟؟؟؟ :متفکر:


procedure TForm1.Button1Click(Sender: TObject);
var bb:TStringList;
buff : char;
rr: TStream;
begin
bb:=TStringList.Create;
rr:= TStream.Create;
bb.LoadFromFile('C:\Mod.txt');
bb.SaveToStream(rr);
rr.Read(buff,sizeof(buff));
ShowMessage(buff);
bb.Free;
rr.Free;
end;

با تشکر ...

[حمیدرضاصادقیان]

دوست عزیز متد read و write در کلاس TStream به صورت Abstract می باشد.یعنی در اون کلاس پیاده سازی نشده و شما خودت باید یک کلاس از اون مشتق کنی و خودت اونو پیاده سازی کنی.به خاطر همین خطا میگیره.اگر سورس TStream رو نگاه کنی میبینی که اونو پیاده سازی نکرده و Abstract می باشد.اگه اشتباه نکنم باید از کلاس ThandleStream استفاده کنی.
چون خود این کلاس از Tstream مشتق شده و این توابع درون اون پیاده سازی شده است.

[ali_mohamadi8928]

ممنون ولی فکر نکنم این ThandleStream برای این کار مناسب باشه !!! هست ؟

یه چیزی میخوام که read و write رو داشته باشه و بشه از TStringList مقدار بهش داد مثل همون کد بالا .


bb.SaveToStream(rr);

ایا همچین چیزی هست ؟؟

[JAFO_IRAN]

سلام

TStringStream

ارادت

[Mahmood_M]

هدفتون از این کار چیه ؟
می خواهید یک فایل متنی رو مقدار دهی و بعد مقادیرش رو بازیابی کنید ؟

اگه هدفتون اینه چرا از TextFile استفاده نمی کنید ؟

...