IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

> типизированный файл
Алексей123
сообщение 20.05.2007 18:35
Сообщение #1





Группа: Пользователи
Сообщений: 1
Пол: Мужской

Репутация: -  0  +


ЗДРАСТВУЙТЕ!
у меня есть типизированный файл, в типе пара стринговых переменных и TPicture, но при сохранении переменной этого типа в файл, вместо картинки возвращаеться только её адрес в шестнадцатиричной форме...
что мне можо сделать для того что бы картинка хранилась в моем фале?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
Артемий
сообщение 20.05.2007 20:12
Сообщение #2


Помощник капитана
****

Группа: Пользователи
Сообщений: 601
Пол: Мужской
Реальное имя: Артем

Репутация: -  2  +


Пробуй 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;



--------------------
Dum spiro spero!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 23.06.2025 1:35
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"