Помощь - Поиск - Пользователи - Календарь
Полная версия: типизированный файл
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Делфи
Алексей123
ЗДРАСТВУЙТЕ!
у меня есть типизированный файл, в типе пара стринговых переменных и TPicture, но при сохранении переменной этого типа в файл, вместо картинки возвращаеться только её адрес в шестнадцатиричной форме...
что мне можо сделать для того что бы картинка хранилась в моем фале?
Артемий
Пробуй TMemoryStream:

procedure TForm1.Button2Click(Sender: TObject);
var
S: TMemoryStream;
begin
try
S := TMemoryStream.Create;
S.LoadFromFile('1.bmp');
S.SaveToFile('Stream.dat');
finally
S.Free;
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
S: TMemoryStream;
begin
S := TMemoryStream.Create;
S.LoadFromFile('Stream.dat');
Image1.Picture.Bitmap.LoadFromStream(S);
end;

Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.