Мастера DELPHI, Delphi programming community Рейтинг@Mail.ru Титульная страница Поиск, карта сайта Написать письмо 
| Новости |
Новости сайта
Поиск |
Поиск по лучшим сайтам о Delphi
FAQ |
Огромная база часто задаваемых вопросов и, конечно же, ответы к ним ;)
Статьи |
Подборка статей на самые разные темы. Все о DELPHI
Книги |
Новинки книжного рынка
Новости VCL
Обзор свежих компонент со всего мира, по-русски!
|
| Форумы
Здесь вы можете задать свой вопрос и наверняка получите ответ
| ЧАТ |
Место для общения :)
Орешник |
Коллекция курьезных вопросов из форумов
KOL и MCK |
KOL и MCK - Компактные программы на Delphi
Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / rsdn.org

 
Чтобы не потерять эту дискуссию, сделайте закладку « предыдущая ветвь | форум | следующая ветвь »
Страницы: 1 2 3 4 5 6

Версия 3.10 [Delphi]


Dufa ©   (21.02.11 18:27[40]

Версия конечно зачёт :D
Есть два пожелания:

1) В функции Str2Extended заменить:

   '.': if not Pt then Pt := TRUE else break;

на

   '.', ',': if not Pt then Pt := TRUE else break;


Чтобы работало вот такое:

 MsgOK(Extended2Str(KOL.Str2Extended('0.1')));
 MsgOK(Extended2Str(KOL.Str2Extended('0,1')));


2) Чтобы не падало вот такое:
StrSatisfy('stoka', '');

Добавить проверку на пустую маску


Vladimir Kladov ©   (21.02.11 18:44[41]

Хорошо, KOL 3.14159265, MCK не менялся. У меня работает, не сломалось :).
Когда версию зафиксирую, буду ссылаться как на версию "пи" (стабильно).


Vladimir Kladov ©   (21.02.11 18:52[42]

У меня на сайте лежит старый достаточно уже Zoomer, он сделан с Grush (режим dual). Можете его запстить - упадет или нет, на той же машине? Просто интересно. Вдруг дело все-таки в версии KOL, и тогда что-то было устойчивее.


user   (24.02.11 01:28[43]

А где можно найти файл с утилтиами KOLUtils06.pas ?


Jon ©   (24.02.11 03:26[44]


> А где можно найти файл с утилтиами KOLUtils06.pas ?


http://files.mail.ru/UA2GBZ


awkward ©   (24.02.11 16:07[45]

Кстати.... скачал последнюю версию KOL.
Delphi 7 компилирует "на ура"
Delphi 5 выдает ошибку
kol.pas(26878) Fatal: Internal error: C1093

Может, тут и не сама библиотека виновата..... но все же. Что это может быть? версия от 20го февраля компилировалась нормально.


awkward ©   (24.02.11 16:34[46]

дополню: если определить {$DEFINE DATE0_0001}
компиляция в пятой дельфи проходит нормально


user   (24.02.11 17:53[47]

>http://files.mail.ru/UA2GBZ
Спасибо!


Vladimir Kladov ©   (24.02.11 18:14[48]

Я пока выложил именно такое исправление: для Delphi5 и раньше по умолчанию старый код с DATE0_0001, с Delphi6 и выше по умолчанию новый. Неправильно TRUNC работает в D5. С теми же входными значениями выдает другие выходные. Internal error у него на преобразование в INT64. В общем, новый код намного короче, но, увы, не для старых Delphi.

Заодно в версии на сайте исправлен ParamCount (асм-версия).


awkward ©   (24.02.11 18:41[49]

спасибо за пояснение, просто

{$IFDEF _D2orD3}
           {$DEFINE DATE0_0001}
{$ENDIF _D2orD3}

про дельфи версий 4 и 5 - ни слова


Vladimir Kladov ©   (24.02.11 19:04[50]

Что-то не та версия. Я только что выложил 3.14159265358, до этого выкладывал без 8. Там было {$IFNDEF _D6orHigher}.
Сейчас я сделал, что для D5 тоже работает, чуть-чуть больше кода требуется, байт на 80. Не умеет сразу получить int64 из числа удвоенной точности. Пришлось лишние операции делать. Так что сейчас в том месте {$IFnDEF _D5orHigher}


Jon ©   (24.02.11 20:59[51]

KOL.pas has exceeded 2MB - I remember that there were some issues with the file size of .pas files, should we be concerned?


Vladimir Kladov ©   (24.02.11 21:22[52]

Problem is only in setting breakpoints after 65535th line but this is a problem for Delphi 5 and earlier. May be D6 too, but there are no problems in D7. In D5, if do not stop after that line it works ok.

Next time I'll move some new asm code to kol_asm to make smaller lines in pascal part.


Dufa ©   (25.02.11 09:47[53]

Вот такая штука тут всплыла.. Если использовать Extended2Str (а так же несколько других функций в PAS версиях) то к коду добавляется мусор из за


Assert( Result[ 1 ] = '0', 'error!' );


Предлагаю все ассерты экранировать {$IFDEF DEBUG} ... {$ENDIF}


SPeller ©   (25.02.11 17:53[54]

Номера версий конечно оригинальные ))))


Vladimir Kladov ©   (25.02.11 20:18[55]

Этот Assert вообще закомментарю. Не помню, зачем я его оставил. Может, просто забыл. Но вообще, все ассерты убираются одним крыжиком в опциях проекта. Они как бы для этого и пишутся, чтобы их можно было этим крыжиком включать или выключать. Это уже как бы {$IFDEF}.


Vladimir Kladov ©   (26.02.11 08:51[56]

На сайте KOL 3.141592653589. В принципе, ничего особенного не менял, только вынес ассемблерные части в KOL_asm.inc и KOL_ASM_NOUNICODE.inc (новый), чтобы опять втиснуться в прокрустовы 65535 строк. Очень не хотелось плодить еще один inc-файл, так как усложняется поиск различий методом льва в коробке, теперь надо синхронные правки делать уже в 3х файлах, но видимо уже ничего не поделаешь). Теперь есть резерв в 4000 строк.

С ассертами я все-таки сделал как Dufa предложил. Оно обычно ни на что по-сути не влияет, а кому-то может понадобится такая штука, чтобы в KOL все assert'ы выключить, а прочие оставить. Сразу не подумал о такой возможности, извиняюсь.

Ждем еще неделю, и фиксируем Пи-версию.


Dufa ©   (26.02.11 15:06[57]

Ассерты нормально теперь, а про галочку кстати совсем забыл..

В Str2Extended потеряли:
   '.', ',': if not Pt then Pt := TRUE else break;

Локальная асм версия DateTime2SystemTime приводит к падению.. не разбирался почему. ПАС версия работает.

И напомните какие функции относятся к ASM_NOUNICODE или наоборот к ASM_UNICODE


Vladimir Kladov ©   (26.02.11 16:16[58]

Исправил, 7 на конце.

Всегда не-UNICODE. Ассемблеря я для UNICODE делал для очень небольшого числа функций, в них используется просто {$IFDEF ASM_VERSION}. Если {$IFDEF ASM_UNICODE}, это значит, что асм отключится для UNICODE_CTRLS для этой функции. Вообще, в начале файла написано kol_asm_nounicode.inc


Dufa ©   (26.02.11 17:29[59]

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

Еще такое предложение: в DefFont изменить Name: 'Tahoma' (для уникода уже он стоит UNICODE_CTRLS); и Height: -11;
Вроде дефолтный шрифт и дефолтный размер..


Страницы: 1 2 3 4 5 6 версия для печати

Написать ответ

Ваше имя (регистрация  E-mail 







Разрешается использование тегов форматирования текста:
<b>жирный</b> <i>наклонный</i> <u>подчеркнутый</u>,
а для выделения текста программ, используйте <code> ... </code>
и не забывайте закрывать теги! </b></i></u></code> :)


Наверх

  Рейтинг@Mail.ru     Титульная страница Поиск, карта сайта Написать письмо