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

Вниз

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

 
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 вся ветка

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

Наверх




Память: 0.45 MB
Время: 0.037 c
6-1096011322
Alexander_PK
2004-09-24 11:35
2004.11.28
Как програмно открыть досупт на папку в сети


4-1097862326
Viper
2004-10-15 21:45
2004.11.28
Файлы


14-1099969001
Думкин
2004-11-09 05:56
2004.11.28
С днем рождения! 9 ноября


14-1100354736
Piter
2004-11-13 17:05
2004.11.28
Нашел одну вещь в Delphi


14-1100107401
lipskiy
2004-11-10 20:23
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский