Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.27;
Скачать: CL | DM;

Вниз

Опять TStream -   Найти похожие ветки 

 
eSKey   (2002-05-17 12:53) [0]

Напомню, у меня такой метод, и в нем выполняется такие строки:
//iStream - внутренняя переменная треда типа TStream
constructor Create
(inStream:TStream; outStream:TStream);
...
iStream:=TStream.Create;
iStream.CopyFrom(inStream,HPos);


Тако вот, как видите он принимает как параметры 2 потока - вх. и выходной. Когда я передаю в качестве inStream поток ТМемориСтрим - все ОК, а вот когда ТФайлСтрим - на последней строчке эксепшн EAbstractException с сообщением "Abstract Error"... Бред какой-то, помогла замена типа iStream на ТМемориСтрим, но вопрос остался - какого чёрта? Я понимаю, в ТСтрим метод CopyFrom абстрактный, но ведь он есть и в Мемористрим, и в Файлстрим! Разъясните плиз, в чем дело?


 
Song ©   (2002-05-17 12:55) [1]

Сколько можно говорить что TSream это абстрактный класс для создания наследников. Вся функциональность класс заключается в TFileStream и TMemoryStream


 
Song ©   (2002-05-17 12:58) [2]

Извиняюсь, до конца вопрос не догрузился. Только сейчас увмдел суть.


 
Игорь Шевченко ©   (2002-05-17 13:05) [3]


iStream:=TStream.Create;
iStream.CopyFrom(inStream,HPos);

Что делает CopyFrom? (он не абстрактный):
....
WriteBuffer (...)
....

Что делает WriteBuffer (он не абстрактный):
вызывает Write

смотрим объявление метода Write в TStream:
function Write(const Buffer; Count: Longint): Longint; virtual; abstract;

Получили, что ожидали.

С уважением,

P.S. Любите отладчик - источник знаний.



 
MBo ©   (2002-05-17 13:10) [4]

iStream:=TStream.Create;
таким способом ведь создается объект с абстрактными методами, чего тогда удивляться
Song 12:55 прав


 
eSKey   (2002-05-17 13:24) [5]

Ну а как тогда делать правильно?


 
MBo ©   (2002-05-17 13:29) [6]

ну так замени на tmemorystream , как уже делал



Страницы: 1 вся ветка

Текущий архив: 2002.05.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
8-88567
tovSuhov
2001-12-28 11:13
2002.05.27
Возвращаясь к pmNotXor...


4-88674
OlegK
2002-03-26 14:03
2002.05.27
MapiSendMail


1-88546
-Jack-
2002-05-15 15:36
2002.05.27
Не пашет условие


6-88577
ATLANTIDO
2002-03-10 16:00
2002.05.27
Возможно средствами Делфи создать сетевой диск ...


14-88621
Natali
2002-04-19 15:40
2002.05.27
Excel