Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 31.08.2009, 02:07   #11
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

Код:
i:=Length(Pic.Name);
Stream.WriteBuffer(i,4);
берем длинну строки в переменную...потому что пишем через буфер..и нам нужна явная переменная...имеющая адрес(длинна integer 4)
Код:
Stream.WriteBuffer(Pic.Name[1],i);
пишем начиная с первого символа строки на всю её длинну...
так как пишется с помощью указателя...то указав на первый символ и нужую длинны данных мы пишем аккурат весь массив(сам догадался случайно...вспомнил работу с указателями)
Pic.BM.SaveToStream(Stream);[/CODE]
ну и далее сохраняем нашу картинку...
Код:
Stream.ReadBuffer(i,4);
SetLength(Pic.Name,i);
читаю длинну нашей строки...и соответствено устанавливаю эту длинну для нее(через переменую по той же причине что и с записью)
Код:
Stream.ReadBuffer(Pic.Name[1],i);
по тому же принципу что писали в файл строку по такому же читаем из нее(о переполнении буфера не волнуюсь потому что длинна строки как раз равна i)
Код:
Pic.BM.LoadFromStream(Stream);
Image1.Picture.Bitmap.Assign(Pic.BM);
в картинку нашей записи грузим изображение и затем выводим в имейдж(я решил что картинка записи не должна простаивать)

вродь все

в общем вот...версия 0,5

если кому интерестно потом продолжу и выложу далее
(сейчас прога самостоятельно готова на 60-80%)
Вложения
Тип файла: rar MultiDataFile.rar (23.5 Кб, 56 просмотров)
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

Последний раз редактировалось Stilet; 31.08.2009 в 08:44.
Пепел Феникса вне форума Ответить с цитированием
Старый 31.08.2009, 08:45   #12
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

А не проще для этого СУБД задействовать?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 31.08.2009, 12:56   #13
spamer
Software Developer
Старожил
 
Аватар для spamer
 
Регистрация: 19.12.2008
Сообщений: 2,070
По умолчанию

Пепел Феникса спс.

Цитата:
А не проще для этого СУБД задействовать?
Stilet, возможно. Но это бы мене еще пришлось с БД разбираться. А задача не такая уж серьезная.
Будь проще и люди к тебе потянутся
spamer вне форума Ответить с цитированием
Старый 31.08.2009, 12:59   #14
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
Но это бы мене еще пришлось с БД разбираться.
Ну, хозяин то барин, но эта наука на будущее (на себе почувствовал) весьма хороша. Да и не так уж сложно и писанины не много дабы в БД файл пихнуть а рядом в поле строку...
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 31.08.2009, 13:05   #15
spamer
Software Developer
Старожил
 
Аватар для spamer
 
Регистрация: 19.12.2008
Сообщений: 2,070
По умолчанию

Stilet, если я правильно понял, то при помощи БД, допустим в моем случае, в одно поле можно записать картинку, а в другое имя. Правильно я понял?
Будь проще и люди к тебе потянутся
spamer вне форума Ответить с цитированием
Старый 31.08.2009, 13:48   #16
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
Правильно я понял?
Да. И это уже обсуждалось тут неоднократно
Вот для раздумий:http://www.programmersforum.ru/showt...highlight=BLOB
Вот (BLOB поля - [19]):
http://www.programmersforum.ru/showt...highlight=BLOB
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сохоанить, Сохранить как, Открыть несколько элементов в одном файле Polotenchik Общие вопросы Delphi 9 01.08.2009 13:37
Хранение БД в одном файле D_E_N БД в Delphi 3 18.07.2009 14:01
JPG и TXT в одном файле prizrak1390 Общие вопросы Delphi 9 19.04.2009 18:45
TWebBrowser - сохранить картинку Air Компоненты Delphi 7 16.01.2009 02:31