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

Вниз

контейнер для хранения GIF   Найти похожие ветки 

 
временный Чайник   (2007-07-27 01:45) [0]

В моей программе используется 500 картинок GIF.. все они хранятся в папке..

мне бы хотелось както их защитить от пользователя (чтобы сам не удалил, или не отредактировал их )

в общем может быть есть контейнер для хранения GIF?


 
{RASkov} ©   (2007-07-27 05:05) [1]

> [0] временный Чайник   (27.07.07 01:45)

в архив с паролем или.... свой формат и все их туда... в один файл....
В заголовке файла массив смещений на нужную позицию очередного гифа и его размер...
Можно в БД с Блобами... можно и еще какнить....


 
SlymRO ©   (2007-07-27 05:45) [2]

В ресурс их скомпилируй (res), или в dll...
Телепатирую следующий вопрос...
"Как загрузить GIF из моего архива в компаненту TxxxImage без сохранения в файл..."


 
временный Чайник   (2007-07-27 10:13) [3]


> Телепатирую следующий вопрос...


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

зы..теперь осталось понять как их закинуть в рес или длл :)


 
SlymRO ©   (2007-07-27 10:33) [4]

делаем файл Gifs.rc
smile GIF smile.gif
crazy GIF crazy.gif

компилируем в dll:
library Gifs;
{$R "Gifs.res" "Gifs.rc"}
begin
end.

пользуем:
hLib:=LoadLibrary("Gifs.dll");
Stream:=TResourceStream.Create(hLib,"smile","GIF")
try
 Stream.SaveToFile("smile.gif");
finally
 Stream.Free;
end;


 
SlymRO ©   (2007-07-27 10:50) [5]

таки правильней...
hLib:=LoadLibraryEx("Gifs.dll",0,LOAD_LIBRARY_AS_DATAFILE);


 
SpellCaster   (2007-07-27 16:24) [6]

Да уж легче действительно в бинарный файл всё свалить... ибо в ресурсы можно элементарно залезть.



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
1-1181524266
Yus
2007-06-11 05:11
2007.08.19
Помогите с RichEdit


2-1185296308
WFS
2007-07-24 20:58
2007.08.19
Нужно сохранить данные из DBGrida в файл.


2-1184848479
Новичеек
2007-07-19 16:34
2007.08.19
из Vb в Delphi


2-1184669268
Ivolg
2007-07-17 14:47
2007.08.19
Путь


2-1185565559
sproot
2007-07-27 23:45
2007.08.19
как сделать две равноправные формы?