![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
типизированные файлы [D7, XP]
Dicot © (2006-06-06 15:06:00)Уважаемые мастера. Объясните пожалуйста, можно ли в типизированном файле сохранить объект типа TPicture и если можно, то как? Процедура Write записывает в файл что-то непонятное...
PVOzerski (2006-06-06 17:12:00) [1]Если во что бы то ни стало надо реализовать сабж - создаем какой-нибудь TMemoryStream, далее TGraphic SaveToStream, далее - из потока побайтно в file of byte. Будет весьма медленно, но в точности как в сабже.
StriderMan (2006-06-06 16:58:00) [2]
> Ega23
> TPicture не компонент
Да, правда, .. надо же... :))
значитTPicture.Graphic.SaveToFileилиTPicture.Graphic.SaveToStream
Eraser (2006-06-06 15:54:00) [3]
> Dicot (06.06.06 15:42) [9]
потому что идентификатор экземпляра класса это ни что иное, как указатель на этот экземпляр, длина которого 4 байта.
Ega23 (2006-06-06 15:54:00) [4]
> А почему так нельзя?
А ты попробовал?
Dicot (2006-06-06 15:42:00) [5]А почему так нельзя?
var f :File of TPicture;
p :TPicture;
Begin
AssignFile(f, 'MyFile.myf');
p:=TPicture.Create;
p.LoadFromFile('my.bmp');
Rewrite(f);
Write(f, p);
CloseFile(f);
p.Free;
End;
Ega23 (2006-06-06 15:31:00) [6]
> Джо © (06.06.06 15:29) [6]
:-)
Ega23 (2006-06-06 15:30:00) [7]
> TFileStream.WriteComponent...
>
TPicture, вообще-то, не компонент...
Джо (2006-06-06 15:29:00) [8]> [5] StriderMan © (06.06.06 15:27)
> TFileStream.WriteComponent...
TPicture не компонент.
StriderMan (2006-06-06 15:27:00) [9]TFileStream.WriteComponent...
Ega23 (2006-06-06 15:24:00) [10]
> У TPicture нет "процедуры Write"
При чём тут TPicturre? Есть просто процедура Write
Ega23 (2006-06-06 15:23:00) [11]
> Уважаемые мастера. Объясните пожалуйста, можно ли в типизированном
> файле сохранить объект типа TPicture и если можно, то как?
> Процедура Write записывает в файл что-то непонятное...
>
Чем record от class отличается знаешь?
StriderMan (2006-06-06 15:07:00) [12]лучше всего TFileStream использовать, ИМХО
Сергей М. (2006-06-06 15:07:00) [13]У TPicture нет "процедуры Write"