ANTICHAT — форум по информационной безопасности, OSINT и технологиям

Тебе мало что даст по нормальному сжатие изображений.
А вот если ты перегонишь картинку в 256 оттенков серого, а потом сожмешь ей любым методом. Вот тогда будет очень быстро, да и никто не обидится на серый цвет )
Притом что перекодировку если реализовать через память и на асме, то можно хоть в реалтайме кодить без тормазов. А на счет сжатия. Самгое простое попробуй - RLE
Если влом чтото самому писать или критически важен размер кода то можно заюзать виндовые функции сжатие из ntdll а именно RtlCompressBuffer и RtlDecompressBuffer

P.S. функции эти есть только в NT-видных системах

Есть ли компоненты на делфи или какой нить способ, чтобы флешка .swf помещённая в .RES файл и приаттаченная, проигрывалась в программе???

Можно конечно использовать широкие возможности FlashPlayerControl for Delphi . Но он не бесплатен=(

Как альтернативный вариант можно конвертировать swf в avi и использовать имеющийся в Delphi TMediaPlayer , для того чтобы его проиграть

Component - Import ActiveX Control
ShockWave Flash

потом добавляешь в uses ShockwaveFlashObjects_TLB
и создаешь компонент типа TShockWave Flash

и, думаю, надо вытащить во временный файл из ресурса ролик

Так же можно юзать OLE-объект. Сильно это не фтыкал (ибо не надо), но в реале и дельфя должна поддерживать.

хочу создать документ (ну вписать туда команды а потом поменять расширение с тхт на exe, cmd, ну или какое надо) для :отключения компа или вылазило сообщение ну или картинка а можно всё
открыл любопытный а ему сообщение на весь экран ну или комп просто вырубился
подскажите какие команды надо прописывать?
у меня Windows 7

ребят подскажите пожалуйста буквально пару вопросов я просто найти их не могу я знаю что они уже задавались тут (на дельфи разумеется)

1) Как сделать чтобы при нажатии на кнопку Button1 воспроизводился звук mp3 но не повторялся звуки лежат в каталоге с программой в папке sounds мне желательно прямо самый простой скрипт ненада усложнять
2) Как убрать из окна программы _ [ ] X тоесть панель которая закрывает сворачивает разворачивает программу !
3) Как сделать чтобы программа остановилась на своих размерах и их нельзя было больше поменять

заранее благодарю !

1) юзай функцию из модуля mmsystem - PlaySound
2) В объек инспекторе в настройках формы BorderIcons
3) В объек инспекторе в настройках формы BorderStyle = bsSingle

Ещё вопрос, при выполнении CMD команд через shellexecute или winexec есть ли способ вывести ответ в Memo ???
К примеру команда:
ShellExecute(0,'open','cmd.exe','dir','',0);
и чтобы листинг был в memo