Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Нужна помощь новичку в описании своего формата файла!!! [D5, Win95/98]


ZLoy ©   (2002-01-16 19:44:00) 

Господа помогите пожалста.....нужно описать свой формат файла таким образом:
1.Заголовок
2.Сама картинка
3.ключ - разделитель
и так несколько раз.......помогите пожалуйста решить проблему!!!!


Владимир Васильев   (2002-01-17 19:02:00) [1]

Формат,например, такой :

Заголовок : String : 4 byte

Размер названия картинки : byte : 1 byte

Название картинки : string : размер см. выше

Size потока куда
предварительно
загрузил Bitmap : integer : 4 Byte

Данные потока : : Size см. выше

и т.д ........

Размер названия картинки : byte : 1 byte

Название картинки : string : размер см. выше

Size потока куда
предварительно
загрузил Bitmap : integer : 4 Byte

Данные потока : : Size см. выше
.................

Работает это всё так : Создаёшь FileStream и в него последовательно пишешь свои данные.

Как записать в поток другой поток или числа, надеюсь, объяснять не надо.

На всякий случай - как писать в поток String и читать:

procedure WriteStr(S: String; Stream: TStream);
var
i:word;
begin
i:=length(s);
stream.Write(i,sizeof(i));
stream.write(pchar(s)^,i);
end;


function ReadStr(Stream: TStream): string;
var
i:word;
s:string;
begin
stream.Read(i,sizeof(i));
setlength(s,i);
stream.Read(pchar(s)^,i);
result:=s;
end;

При желании поток с картинкой можно и шифрануть.


Ura   (2002-01-17 17:43:00) [2]

Попробуй XML


gek   (2002-01-17 11:33:00) [3]

Надо использовать типизированные файлы
file of...


Kirill   (2002-01-17 10:48:00) [4]

Что значит несколько раз?
Поподробнее напиши, пожалуйста.


Наверх

Титульная страница Поиск, карта сайта Написать письмо