Random file generator 0.1 by AlexTheC0d3r

Random file generator 0.2 by AlexTheC0d3r - ОБНОВЛЕНИЕ

Random file generator v 0.2 by AlexTheC0d3r ОБНОВЛЕНИЕ!
Язык программирования - Delphi

Скриншот:



Функционал:

Создает файл с любым именем и расширением в папку с программой (Предупреждение: Если такой файл уже существует, то программа перезапишет файл)

Скорость работы стала во много раз быстрее!!!
Если первый билд создавал гигабайтный файл минут 60, то этот справится меньше минуты!!!

Использовал WinAPI функции)

Необходимо доработать:

Возможность создание файла с произвольной иконкой, кто хочет помочь -http://forum.antichat.ru/showthread.php?p=1849415#post1849415

Начинаю разбираться в чем проблемы...но пока еще все глубоко...


Скачивание:

http://slil.ru/28547178

http://www.rapidshare.ru/1350034

 

и зачем?

 

Для тех кому лень в консоли набрать
fsutil file createnew файл размер

 

не хватает web 2.0-дизайна и синхронизации с twitter и facebook

 

эмм... не уловил идеи..

 

да, и ещё добавь сплэш с последним багтраком, погодой и новостями в мире кино.....
тем не менее, лучше что-то, чем ничего. Все когда-то этим страдали.

 

Что-то как-то не воткнул смысл проги. Да и вопрос, а если ты задащь размер ехе в 1 байт?)) Каким образом это выйдет? Да и вообще расскажи алгоритм генерации ехе, толи ты его нупами забиваешь, толи мусором из апи. Если бть честным, то мне это не актуально, а вот молодёже было бы интересненько почитать

 

А для работы с ресурсами используй madRes.pas или PJResFile.pas

 

Забиваю файл я WORDами, размер которых соответственно 2 байта...

 

Ипануться. Науя? Это реально жесть.
Прогу можно сделать в стрко 10 отсилы.
При том что конструкция:
for i:=1 to ((StrToInt(edt2.text) div 2) + (StrToInt(edt2.text) mod 2)) do
Это полный здец. Да и использовать функции встроенные для работы с файлами - это не гуд.
А вот допустим если мне нужно создать файл на 16 гигов, то сколько времени она будет создавать его? Сутки или больше? И вообще врядли создаст потому как как 100% все значения dword

Вообще такие вешь делаются черзе апишки
CreateFile + WriteFile
Причем запись желательно делать по размеру кластера. Хотя 4096 байт самый раз.
Типа выделил блок памяти в 4096 байт. Посчитал сколько блоков нужно таких.
Гонешь цикл, забиваешь буфер мусором, а потом записываешь, и так далее.
Затем остаток байт просто дописываешь но уже с укороченным размером буфера.

 

2 slesh ты что не видишь "best regards to Antichat" вот именно такие "хакеры" в разделе кодинга (да и в остальных) на этом форуме.

"Это печально" (c) Угонщик из ролика

 

Согласен

 

Да ладно вам, не гнобите человека - он название, зато, звучное для проги придумал...

 

у меня возможно нет столько опыта в winapi процедурах сколько у тебя...

в будущем возможно сделаю все намного лучше и быстрее...

 

Когда увидел строку
for i:=1 to ((StrToInt(edt2.text) div 2) + (StrToInt(edt2.text) mod 2)) do
хотел поругать, но слеш уже все написал как нельзя лучше )))
Давайте обьясним почему это плохо. Потому что за каждый проход цикла делается команда StrToInt(edt2.text) div 2. Вместо этого можно было создать переменную и сделать так:

Code:

n := StrToInt(edt2.text) div 2;
m := StrToInt(edt2.text) mod 2;
for i:=1 to n+m do

Ну а вообще слеш уже все обьяснил.

 

Лучше похорони идею

 

слу, займись лучше чем-нибудь полезным... напиши очередной инвайтер в группы/проги и т.п.
и ниипи мозг больше таким полезным софтом, я до сих пор пытаюсь придумать, где его заюзать можно

 

Палю тему.
Есть партнерки, с софтом, который создает запароленые архивы.
Чтобы открыть архив, нужно отправить смс.
Дальше сам додумаешь?

ЗЫ
Это одно из применений.
Так же, порой бывает необходимо проверить софт(i.e лоадер) на стабильность работы...

 

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

 

Нет, для себя я все-таки хочу добить эту идею, до качественной программы...

плюсы: для меня опыт, где пригодиться может - в болталке тоже писал...