View Full Version : چرا از این کد اشکال میگیره و کار نمیکنه ؟
ali_mohamadi8928
یک شنبه 23 دی 1386, 13:58 عصر
اگه میشه دوستان مشکل این کد رو بگن ؟؟؟؟ :متفکر:
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;
با تشکر ...
حمیدرضاصادقیان
یک شنبه 23 دی 1386, 14:39 عصر
دوست عزیز متد read و write در کلاس TStream به صورت Abstract می باشد.یعنی در اون کلاس پیاده سازی نشده و شما خودت باید یک کلاس از اون مشتق کنی و خودت اونو پیاده سازی کنی.به خاطر همین خطا میگیره.اگر سورس TStream رو نگاه کنی میبینی که اونو پیاده سازی نکرده و Abstract می باشد.اگه اشتباه نکنم باید از کلاس ThandleStream استفاده کنی.
چون خود این کلاس از Tstream مشتق شده و این توابع درون اون پیاده سازی شده است.
ali_mohamadi8928
یک شنبه 23 دی 1386, 15:03 عصر
ممنون ولی فکر نکنم این ThandleStream برای این کار مناسب باشه !!! هست ؟
یه چیزی میخوام که read و write رو داشته باشه و بشه از TStringList مقدار بهش داد مثل همون کد بالا .
bb.SaveToStream(rr);
ایا همچین چیزی هست ؟؟
JAFO_IRAN
یک شنبه 23 دی 1386, 16:32 عصر
سلام
TStringStream
ارادت
Mahmood_M
دوشنبه 24 دی 1386, 22:07 عصر
هدفتون از این کار چیه ؟
می خواهید یک فایل متنی رو مقدار دهی و بعد مقادیرش رو بازیابی کنید ؟
اگه هدفتون اینه چرا از TextFile استفاده نمی کنید ؟
...
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.