Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Вниз

хранение изображение в текстовом файле....   Найти похожие ветки 

 
SNV-Soft   (2004-08-28 09:21) [0]

Ув. знатоки, как сохранить изборажение из TImage в текстовый файл. Звучит конечно глупо, но задача стоит следующая:
На форме лежат разные компоненты, включая Timage с загруженной
в нее картинкой. Задача сохранить все параметры компонентов в текстовый файл чтобы потом можно было открыть этот файл и восстановить все компоненты на новой форме!...
Проблема как сохранить картинку, чтобы потом загрузить ее.
PS.
Все параметры должны храниться в одном файле, т.е. хранить отдельно картинку не приветствуется!


 
GuAV ©   (2004-08-28 14:52) [1]


> Задача сохранить все параметры компонентов в текстовый файл
> чтобы потом можно было открыть этот файл и восстановить
> все компоненты на новой форме!...

Хм... а TFileStream.WriteComponent(Form1) не пробовал? Не текстовый файл зато куда проще. или TFileStream.WriteComponent(Image1) и все остальные.

Хочешь тхт - или TBase64stream, или сам с typinfo возись или каждуй компонент руками.


 
SNV-Soft   (2004-08-28 15:31) [2]

Спасибо!!!
Я про WriteComponent(Form1) не знал..думаю это то что надо )


 
GuAV ©   (2004-08-28 17:38) [3]

На всякий случай:
Чтобы потом прочитать нужно CreateNew новую создавать, а не Create:
var F: Tform1;
begin
 F:=TForm1.CreateNew(Application);
 with TFileStream.Create("c:\test.bin",fmOpenRead) do
 try
   ReadComponent(F);
 finally
   Free;
 end;
end;


 
SNV-Soft   (2004-08-29 06:30) [4]

Спасибо, как раз кстати!



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

Форум: "Media";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.037 c
3-1098267203
GanibalLector
2004-10-20 14:13
2004.11.28
решение проблемы обрыва коннекта в IBX


1-1100350228
redlord
2004-11-13 15:50
2004.11.28
как узнать сколько занял файл на диске


3-1098950525
}|{yk
2004-10-28 12:02
2004.11.28
Сделать запрос - распарсить комментаний


1-1100171574
Max Ivanych
2004-11-11 14:12
2004.11.28
Как определить номер выделенного узла в TreeView?


4-1097946522
Viper
2004-10-16 21:08
2004.11.28
Мышь





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский