-
-
-
> вроде. что ещё у него могло быть?
Что могло быть знает Гость. ... были же и более ранние, которые после не выкладывались. через https://web.archive.org не найти потому, что для web.archive.org это единичные сохранения. В отличие от http://kolmck.ru > http://kolmck.net/ > Saved 114 times between ноября 16, 2006 and мая 11, 2016. > PLEASE DONATE TODAY. Your generosity preserves knowledge for future > generations. Thank you.
-
Что-то пытаюсь отправить сообщение - и не выходит. Молча открывается корень ветки и всё... Не понятно из-за чего... Так, а если ток последние два предложения... На данный момент входить надо по такой ссылке: http://web.archive.org/web/20161206042443/http://kolmck.ru/index.htmlЯ основные страницы уже сохранил, остальное не знаю как автоматом делать, руками будет долго и с ошибками...
-
У кого есть доступ для правок к https://sourceforge.net/p/kolmck/code/HEAD/tree/?В TBitmap.RLESaveToFile в функции WriteBitmap надо исправить утечку: Buffer := AllocMem( Width ); for y := Height-1 downto 0 do begin Line := ScanLine[y]; x := 0; while x < Width do begin Buffer[x] := Line^ shr 4; inc( x ); if x >= Width then break; Buffer[x] := Line^ and 15; inc( x ); inc( Line ); end; MS.Write( Buffer^, Width ); end; MS.WriteVal( 0, 2 ); FreeMem( Buffer ); <--- без этой строки - утечка
-
kolmck.ru - это свежевыложенное зеркало, для доступа к нему не нужна машина времени. Старая версия - это kolmck.net.
-
Выложенный код на sourceforge не компилируется под FPC 3.0. Для работоспособности в KOLDEF.inc надо сделать изменения:
{$IFDEF FPC} {$MODE DELPHI} <------------------------ добавить {$ASMMODE INTEL} <--------------------- добавить {$DEFINE PAS_ONLY} {$DEFINE USE_OLD_FLAGS} //size of set type in fpc is 4 bytes {------------------------------------ by Thaddy de Koning:
FPC version 2.1.1 is very compatible with Delphi and kol now. You can simply use the $(DELPHI)\source\rtl\win\*.pas files from Delphi 4/5 instead of the prepared files that were needed for FPC1.X
That is all to have full compatibility. ------------------------------------} {$DEFINE PAS_VERSION} //{$IFDEF VER2} <------------------------ отключить {$DEFINE _D3orHigher} {$DEFINE _D4orHigher} {$DEFINE _D5orHigher} {$DEFINE _D6orHigher} {$DEFINE _D7} {$DEFINE _D7orHigher} //{$ENDIF} <----------------------------- отключить {$ENDIF FPC}
После правок код рабочий в 32/64.
-
-
Dimaxx, А как лучше то? Не использую фпц, нет возможности проверить
-
В варианте Thaddy можно использовать и старые версии FPC. Ток в вышенаписанном мною забыл добавить после {$DEFINE _D7orHigher} строки
{$DEFINE _D2005orHigher} {$DEFINE _D2006orHigher} {$DEFINE _D2007orHigher}
-
Кстати, в свое время Владимир говорил про то, что приходилось выбрасывать лишнее в KOLadd из-за того, что KOL.pas превышал 65к строк. Так вот KOL.pas надо основательно почистить - там море пустых строк, закомменченного кода + последовательное объявление переменных в объектах одинакового типа можно свести в одну строку. Ну и желательно отформатировать код для аккуратного вида.
-
Dimaxx, добавил вариант от Thaddy(без проверок), чтоб можно было и старые версии использовать.
Выкинуть мусор и отформатировать код было бы не плохо.. Но, например, для меня:
> последовательное объявление переменных в объектах одинакового типа можно свести в одну строку.
и
> отформатировать код для аккуратного вида
Взаимоисключающие вещи :)
-
> Dimaxx, добавил вариант от Thaddy(без проверок), чтоб можно > было и старые версии использовать.
{$MODE DELPHI} и {$ASMMODE INTEL} надо добавлять обязательно - не компилируется.
> Взаимоисключающие вещи :)
Ну так приходится чем-то жертвовать. Кстати, там в некоторых местах в record'ах так уже сделано.
-
> надо добавлять обязательно
Добавил, будет время - проверьте
> Ну так приходится чем-то жертвовать. Кстати, там в некоторых > местах в record'ах так уже сделано.
Сейчас общий вид форматирования представляет кашу.. Да и редактор кода тупит для KOL.pas
-
Неверно работает свойство контрола AnchorBottom, если он лежит, к примеру, на GroupBox - по идее должен привязываться к границе родителя (GroupBox), а он привязывается к форме. В итоге нижняя граница контрола находится на уровне нижней границы GroupBox.
К сожалению в анчорах не силен, поэтому как поправить не знаю.
-
A AnchorRight работает верно, но увеличивает ширину на лишние 2 пикселя.
-
Вдогонку: непонятно как работает создание контрола - настраиваю шрифт у KOL-формы и шрифт по умолчанию у KOLProject. Кидаю на форму GroupBox - он наследует шрифт формы. Кидаю кнопку или метку - шрифт другой. Хотя в дизайнере шрифт верный и все верно отображает.
-
> Неверно работает свойство контрола AnchorBottom, если он > лежит, к примеру, на GroupBox - по идее должен привязываться > к границе родителя (GroupBox), а он привязывается к форме. > В итоге нижняя граница контрола находится на уровне нижней > границы GroupBox.
А есть ли такой же баг если использовать Panel вместо GroupBox.
У GroupBox есть еще глюк со шрифтом - если в GroupBox кинуть другой GroupBox то шрифт искажается
-
То то я думаю, что за фигня. Пишу альтернативу explorer.exe Екзешник маленький 72Кб, а памяти отжирает 40 мб. Надо было изучать С https://yadi.sk/d/N1zyD3fpfSQAG
-
KOL жрет столько же, сколько и VCL. Доп. отжирание зависит от запросов в коде. И не факт, что тот же код на Си будет жрать меньше.
|