Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Файлы в файле, Помогите... 
:(
    Опции темы
Dante13
  Дата 28.3.2008, 08:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 23.3.2008

Репутация: нет
Всего: нет



Доброе время суток. Подскажите пожалуйста как можно сохранить в одном файле например:картинку и текст и соответственно потом этот файл открыть??
PM MAIL   Вверх
SlaUr
Дата 28.3.2008, 08:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 408
Регистрация: 18.9.2003

Репутация: 3
Всего: 5



Записываем в файл сначала картинку ,потом вставляем строку(разделитель) например "$myText$" и записываем текст.Думаю что записать такой файл не составит труда.

Вот мой пример извлечения информации  из подобных файлов (может не самый удачный код)
unit
там разделитель "SlaUr" ,Сначала идет картинка,потом звук,потом текст.
PM MAIL   Вверх
THandle
Дата 28.3.2008, 09:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 65
Всего: 372



SlaUr, твой пример у меня не грузится. Ведь есть же прикрепляемые файлы размером в один мб...



Dante13, делай примерно так:

1. Создаешь ты некий TFileStream;
2. Пишешь дину текста.
3. Пишешь сам текст.
4. Пишешь размер картинки картинки.
5. Ну и наконец пишешь саму картинку.

Читаешь точно так же, сначала размер, потом текст и тд.
 
PM   Вверх
Riply
Дата 28.3.2008, 10:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Комодератор
Сообщений: 572
Регистрация: 27.3.2007
Где: St. Petersburg

Репутация: 3
Всего: 32



Цитата(Dante13 @  28.3.2008,  08:06 Найти цитируемый пост)
Доброе время суток. Подскажите пожалуйста как можно сохранить в одном файле например:картинку и текст и соответственно потом этот файл открыть?? 


type
 PMyData = ^TMyData;
 TMyData = packed record
   DataType: DWord;
   DataLength: DWord; // Int64;
   Data: array[0..0] of Byte;
 end;

PM MAIL   Вверх
Poseidon
Дата 28.3.2008, 10:23 (ссылка) |    (голосов:2) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133



Цитата(Dante13 @  28.3.2008,  08:06 Найти цитируемый пост)
Подскажите пожалуйста как можно сохранить в одном файле например:картинку и текст и соответственно потом этот файл открыть??
Используй ресурсы. Вот для примера стандартный shell32.dll. Там и картинки, и иконки, и текст и чего там только нету smile. И все в ресурсах.



--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
VICTAR
Дата 28.3.2008, 12:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник
Сообщений: 1108
Регистрация: 6.10.2006

Репутация: 37
Всего: 80



Не совсем то, но может подойдет

PM MAIL   Вверх
Dante13
  Дата 28.3.2008, 22:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 23.3.2008

Репутация: нет
Всего: нет



Спасибо всем) 
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0674 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.