» прикладное программирование и не только оно...

XPerformer
Мою версию бинарника не вычислить похоже. Собственная тулза undeb32 делает её нераспознаваемой. Умолял в андеграунде взломать свою прогу надо было. Отказались.

исходники, не в качестве рекламы есть на ru-board форум, типо тут наверно,
"C:\Program Files (x86)\Google\Chrome\Application\chrome.exe" http://forum.ru-board.com/topic.cgi?forum=33&topic=8142&start=1620#19

delover
Вы бы не могли пояснить смысл вашего сообщения?
не уловил связь хрома со ссылкой

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

Добавлено:
Хроме это программа которой я смотрю бинарь вы отстали (от сути беседы) я дал линк.

Товарищи, нужна помощь по Делфи.
Я хочу чтобы моя программа проверяла свою контрольную сумму. Есть процедура MD5File, но если подсунуть ей уже запущенную программу, то будет ошибка. Как правильно это реализовать?

Ichigo2
спроси в "вопросах по дельфи":
http://forum.ru-board.com/topic.cgi?forum=33&topic=11215#1
там этого добра навалом...

Кстати вопрос (возможно он эстетический) ответ на который трудно подобрать.
- Зачем делать десять кнопок если можно сделать одну?
Ну чтоб более понятен стал вопрос приведу пример - в кассе есть 3 кнопки
1.Возврат товарной позиции
2.Возврат товарной позиции из закрытой смены
3.Возврат б/н (платёжной картой) товарной позиции
а вот
4.Возврат б/н (платёжной картой) товарной позиции из закрытой смены - такой кнопки нету.

У кого есть идей - скока кнопок правильнее делать?

delover
Три, разве это не очевидно?
Деньги в кассе обладают, так сказать, свойством однородности
Чего не скажешь о платежной карте

XPerformer
Ну для меня не очевидно. Вы забываете что кнопок может быть восемь. Первые 4 кнопки проводят по терминалу, а вторые 4 кнопки проводят без терминала. При этом седьмая кнопка делает типо этого:

Код:
if Reegistry_PROC1_executed=1 then exit;
for 10
case
msgdlg(confirm, 'Вы хотите нажать кнопку Вызов Заведующей', YesNo)
of
yes: msgdlg(info, 'Правильно', OK);
no: msgdlg(info, 'Неправильно', OK);
else
msgdlg(info, 'Вы не ответили', OK);
end;
forend;

Смотрите что я придумал насчет уменьшения размера программы.
Операция инкримента находится в модуле system.pas, и при компиляции весь этот модуль компелируется. А что если создать свой инкремент и отцепить этот модуль system, размер программы уменьшится?

Ichigo2
system.pas не отцепляется. Там помимо инкремента очень много чего содержится, без чего нельзя обойтись.

Ichigo2
См. здесь как подменить system.pas на свою версию меньшего размера, наверное, можно оставить только инкремент при желании
http://qunpack.ahteam.org/?p=42

не знаю куда обратится хотело бы поставить гаджет Foreca НА рабочий стол на офф сайте вот это что с этим делать если можно подробнее спасибо
http://corporate.foreca.com/ru/uploads/images/images/namefeed-xml-abridged.gif

XPerformer
Спасибо за ссылку.
Правда уже поздно. Программа написана, и переделывать под KOL нет желания. Косяки как грибы после дождя повылазят!

У меня программировать не получается. Хочу плавающее число округлить до типа CHAR. Но похоже этот тип такой круглый, что даже функция ROUND не помогает. Может кто уже округлял?

delover
то есть? :)

double f = 64.12345;
char c = (char)f;

так?

d: double = 64.12345;
c: char;
c := char(round(d));

или так?

akaGM
Надо чтобы round - округление.

Цитата:

d: double = 64.12345;
c: char;
c := round(d);

Один программист сказал что не получается потому что число Pi не совсем точное. Наверно надо так
c := round(d, Точное_Pi);
ж)

delover
хрен тебя поймёшь...


Цитата:

Надо чтобы round - округление.

а это что, не округление?

d: double = 64.12345;
c: char;
c := char(round(d));

writeln(c); // выводит @ = сhar(64)

Добавлено:
может тебе byte нужен, а не char?

akaGM
char а по русски ШАР мне нужно округление до ШАРА. Преобразование до байте даёт не правильный результат - это не то чего я хотель. Шара нет всё как то не весело и ящик надувных шариков на балансе с отрицательным значением.

хотель до байте, а получилось до шарайте...

хоть бы раз себя перед отправкой прочитал: а что я за фигню несу?

akaGM
Так вы что округление по Pi не учили чтоли? Банковское округление знаете а по Pi не учили.

не учили мы пи-пи, не учили, дремучие мы, неучёные...

Я ещё думаю TRUNC неправильно работает потому что обрезание по Pi должно быть процедурой, потому что не надо ничего возвращать.

Цитата:

обрезание по Pi должно быть процедурой

да, в каких-то случаях/странах/национальностях это уже процедура...

akaGM
Я придумал не банковское округление без Pi. Это то же самое банковское округление, только цифра 5 округляется в другую сторону. А нужно такое округление чтобы выяснить потери по отношению к мат округлению. С небольшой скидкой могу продать патент.

в свою очередь я могу продать тебе SuperPi со скидкой...

akaGM
Если суперPi со скидкой впишется в BCD число, то я пожадуй уже начну в кармане пальчиками денюфку перебирать.

Теряем то что объединяло людей потому что арифметиеа неудалась и свесили лапки.

Добавлено:

---

akaGM
Вернулся. Хочу осведомить - есть систюма Линюкс! Там блин тоже типы встречаются полюбас!


Добавлено:
А что вы думали?

[censored]

Кстати хочу стать Рекламным лидером конторы BCD чисел. Имногда именно этот тип данных является наиболее верным для контекста задачи. Первый метод - условное умножение Currency на ноль. Ни один хакер не дагодается.