Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2007.01.28;
Скачать: [xml.tar.bz2];

Вниз

Покритикуйте программу, Self-loader   Найти похожие ветки 

 
kaZaNoVa ©   (2007-01-06 13:57) [0]

program Project1;

uses
Windows,sysutils;

{$R *.res}

begin

if LoadLibrary(Pchar(ExtractFilePath(Paramstr(0))+"Syslib.dll"))=0 then
 begin
   MessageBox(0,"Error Load program module","SysError",0);
   Halt(1);
 end;

While (true) do sleep (57);

end.


 
Чапаев ©   (2007-01-06 14:18) [1]

Тут не критиковать, тут именем революционнго трибунала расстреливать надо... :-D


 
kaZaNoVa ©   (2007-01-06 14:20) [2]

Чапаев ©   (06.01.07 14:18) [1]
зачем так жестоко?


 
Virgo_Style ©   (2007-01-06 14:22) [3]

Что это, Бэрримор


 
Чапаев ©   (2007-01-06 14:23) [4]

> [2] kaZaNoVa ©   (06.01.07 14:20)
Ну а что ЭТО делать должно?

if LoadLibrary(Pchar(ExtractFilePath(Paramstr(0))+"Syslib.dll"))=0 then -- гадость. Хэндл библиотеки не сохраняется, после использования её из памяти не выгрузишь. (Нет, система, конечно, выгрузит, но программисту такому руки отрывать.)

While (true) do sleep (57); -- "зависание" до конца работы программы. В чём смысл?


 
kaZaNoVa ©   (2007-01-06 14:24) [5]

Virgo_Style ©   (06.01.07 14:22) [3]
программа самозагрузки длл в память

Чапаев ©   (06.01.07 14:23) [4]
так она по задумке должна работать вечно


 
Чапаев ©   (2007-01-06 14:25) [6]

> [5] kaZaNoVa ©   (06.01.07 14:24)
что значит "само"-загрузка?


 
Чапаев ©   (2007-01-06 14:26) [7]

> [5] kaZaNoVa ©   (06.01.07 14:24)
Почему слип именно на 57 миллисекунд? Почему не на 42? В 42 хоть есть глубокий философский смысл... (Привет Дугласу Адамсу! ;-) )


 
kaZaNoVa ©   (2007-01-06 14:29) [8]

Чапаев ©   (06.01.07 14:25) [6]
ну по смыслу сама она  так умеет))

Чапаев ©   (06.01.07 14:26) [7]
Почему слип именно на 57 миллисекунд? Почему не на 42? В 42 хоть есть глубокий философский смысл... (Привет Дугласу Адамсу! ;-) )

57 в нумерологии есть сентенция великого числа 5 -символа отлично и 7- удачи)


 
самое лучшее   (2007-01-06 21:26) [9]

Self-loader- самая последняя разработка, писк моды в сфере высокотехнологичного программирования!
сочетает в себе высокую надежность при абсолютной простоте реализации ...
доступна массам и несекретна)
имееет еще сотни достоинств!)


 
Чапаев ©   (2007-01-06 21:27) [10]

> [9] самое лучшее   (06.01.07 21:26)
Открытые исходные коды гарантируют отсутствие закладок. ;-)


 
Virgo_Style ©   (2007-01-06 21:31) [11]

а что, трава и зимой растет?


 
Anatoly Podgoretsky ©   (2007-01-06 21:31) [12]

> Чапаев  (06.01.2007 21:27:10)  [10]

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


 
kaZaNoVa ©   (2007-01-06 21:38) [13]

Virgo_Style ©   (06.01.07 21:31) [11]
а что, трава и зимой растет?

неа, но всегда есть старые запасы!

предлагаю запантентовать Программу!


 
isasa ©   (2007-01-06 22:07) [14]

Патент не пойдет.
Название  Project1, а грузит Syslib. Название не соответствует выполняемой функции. Надо SysLoader.



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

Форум: "Прочее";
Текущий архив: 2007.01.28;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.036 c
15-1167335262
Real
2006-12-28 22:47
2007.01.28
Что мешает Гуглу реализовать внутрифайловый поиск?


8-1149254008
djrevers
2006-06-02 17:13
2007.01.28
bass.pas


2-1168521483
greengeneral
2007-01-11 16:18
2007.01.28
Как сделать так чтобы при открытии одного файла открывался и др.


2-1168113814
Officeman
2007-01-06 23:03
2007.01.28
TCPClient > TCPServer


2-1168169514
mike-d
2007-01-07 14:31
2007.01.28
Проверка имени создаваемого файла





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский