Версия 1.75

← →
Кладов (2003-06-04 22:02) [0]

KOL and MCK news (v1.75):
[-]KOL: NewBitmap initial format setting fixed (was mono, now current desktop settings used).
[-]KOL: TControl.SetLVColText, TControl.GetLVColalign, TControl.SetLVColalign, TControl.GetLVColEx fixed for XP+themes - by Alexey (Lecho2002)
[-]KOL: TMenu.Insert fixed for case of separator inserted.
[+]KOL: TControl.ShowModalEx added, which disables all the windows in the current thread while showing the form modal rather then all children of the Applet.
[*]KOL: TControl.ClassName renamed to SubClassName.
[-]KOL: TControl.TBButtonsMaxWidth fixed (TBButtonsMinWidth was accessed instead).
[-]KOL: Int2Str fixed (minimal integer value -2147483648 = $80000000 was converted incorrectly).
[-]KOL: TControl.ShowModal fixed for some cases - by Sergey Shishmintzev.

Other news:

[+]Most important: KOL2FPC utility added, which creates file \FPC\KOL.PAS, compatible with Free Pascal Compiler. Using it, it is possible to migrate KOL/MCK projects to compile it by Free Pascal Compiler, though only for Win32 yet. See it in Tools section.

[+]Updates: Retro-updates from current base KOL/MCK version 1.70 to previous 1.60, 1.59, etc. published.
[-]Graphics: PNG package updated (fixed saving of images with a palette used - 8bpp or less).

← →
BaRToV (2003-06-04 22:48) [1]

Че-то на Вашем сайте не нашел его...

← →
mdw © (2003-06-04 22:52) [2]

И правда нету...

← →
BelchonokH (2003-06-04 23:09) [3]

Ваще облом...

← →
BaRToV (2003-06-04 23:49) [4]

2 Кладов

Эх Владимир, заработались, пора отдохунть немного!!!

← →
BaRToV (2003-06-04 23:51) [5]

Качаем от сюда:

http://bonanzas.rinet.ru/upd/kolmck170to175.zip

http://bonanzas.rinet.ru/upd/kolmck174to175.zip

← →
Кладов (2003-06-05 08:42) [6]

главное - обновление положил, а адрес в крайнем случае вычислить несложно :) Я сейчас поправил - для тех, кто не умеет по и-нету лазить :)) 2Bartov: спасибо за подсказку

Жду, кто первый разберется, что с ресурсами делать под FPC - сразу можно на мыло. До конца моего короткого отпуска 4 дня осталось, надо и отдохнуть чуть-чуть :)

И что, ни у кого еще ничего не поломалось с прежними проектами ? (были ведь исправления, наверняка ошибка какая-нибудь затесалась - я не Бог, чтобы 25К чистых исправлений, и ни одной опечатки :) ).

← →
BaRToV (2003-06-05 10:04) [7]

2 Кладов

[-]Graphics: PNG package updated (fixed saving of images with a palette used - 8bpp or less).

Ой, а че-то архив за 26.10.2002?... А написано что от 31.05.2003

← →
Кладов (2003-06-05 10:41) [8]

На сайте за 31.05 лежит, сейчас проверял. На что вы смотрите?

← →
BaRToV (2003-06-05 10:44) [9]

http://bonanzas.rinet.ru/KOLPng.zip

← →
Кладов (2003-06-05 11:38) [10]

если так из проводника загружать, то вообще создается новый с атрибутами Created и Modified 5 июня. Но на ftp лежит от 31 мая.

← →
savva © (2003-06-05 11:39) [11]

у меня была проблема
в модуле ActiveKOL в строке 736 ругается на строчку
( e_Ole, Ident, [ClassName]) [11] у меня была проблема
в модуле ActiveKOL в строке 736 ругается на строчку
raise EOleError.CreateFmt(e_Ole, Ident, [ClassName]);

не знает ClassName..

← →
savva © (2003-06-05 13:20) [12]

в Label при установленном VerticalAlign = vaCenter WordWrap не работает... (может и раньше не работало)

← →
Кладов (2003-06-05 14:58) [13]

> в Label при установленном VerticalAlign = vaCenter WordWrap
> не

и не должно - недопустимое в винде сочетание стилей

← →
BaRToV (2003-06-05 16:51) [14]

2 Кладов

Владимир, подправьте следующие ф-ции, иначе НЕ всегда правильно возращаются значения:

function FileIconSystemIdx( const Path: String ): Integer;
var SFI: TShFileInfo;
begin
SFI.iIcon := 0;

ShGetFileInfo( PChar( Path ), 0, SFI, sizeof( SFI ),
SHGFI_ICON or SHGFI_SMALLICON or
SHGFI_SYSICONINDEX );
( const Path: String ) [14] 2 Кладов

Владимир, подправьте следующие ф-ции, иначе НЕ всегда правильно возращаются значения:

function FileIconSystemIdx( const Path: String ): Integer;
var SFI: TShFileInfo;
begin
SFI.iIcon := 0;

ShGetFileInfo( PChar( Path ), 0, SFI, sizeof( SFI ),
SHGFI_ICON or SHGFI_SMALLICON or
SHGFI_SYSICONINDEX );
Result := SFI.iIcon;
end;

function FileIconSysIdxOffline( const Path: String ): Integer;
var SFI: TShFileInfo;
begin
SFI.iIcon := 0;

ShGetFileInfo( PChar( Path ), FILE_ATTRIBUTE_NORMAL, SFI, sizeof( SFI ),
SHGFI_ATTRIBUTES or SHGFI_ICON or SHGFI_SMALLICON or
SHGFI_SYSICONINDEX or SHGFI_USEFILEATTRIBUTES );
Result := SFI.iIcon;
end;

И еще при установки МСК постояно вылазит:

[Hint] Package "MirrorKOLPackage" does not use or export "kol.SetLengthW"
[Hint] Package "MirrorKOLPackage" does not use or export "kol.CopyW"
[Hint] Package "MirrorKOLPackage" does not use or export "kol.posW"

← →
mdw © (2003-06-05 18:05) [15]

2 Кладов
Владимир подправьте в
procedure TStrListEx.Delete(Idx: integer);
begin
inherited;
if FObjects.fCount >= Idx then
на
if FObjects.fCount > Idx then
FObjects.Delete( Idx );
end;

← →
Кладов (2003-06-05 20:32) [16]

2 mdw: поправлю. Вы пытались удалить элемент с индексом равным Count ?

2 savva: поправьте ActiveKOL или возьмите сегодняшнюю версию.

← →
mdw © (2003-06-05 21:03) [17]

>поправлю. Вы пытались удалить элемент с индексом равным Count ?
Нет. Просто наткнулся, используя метод Add (сответственно в FObjects ничего не добавляется), а потом вызвал Clear. Ну и ... понятно... Хотя конечно грамотней или TStrListEx.AddObject или TStrList.Add:))).

← →
BelchonokH (2003-06-06 23:20) [18]

А у меня ещё такая бяка, модальное окно ( form2.Form.ShowModal;) при закрытии какую-то ошибку чтения памяти по адресу выдаёт...

← →
=Sniper= (2003-06-07 00:31) [19]

А нельзя ли выложить FULL VERSION KOL 1.75??? Мне например его прощё скачать, чем обновлять! :-)

← →
Кладов (2003-06-07 14:11) [20]

это здесь смотрите, кстати, уже 1.76 :)
и чем же проще-то? Распаковывать все равно - надо. А двойной щелчок по upd-файлу - сложно сделать?

← →
=Sniper= (2003-06-07 18:41) [21]

Нет, конечно же я пытался обновить... а у меня одни ошибки происходят и файлы обнуляются!!!!!!
Ну если по-честному, то один всё-таки обновился! а остальные затёрлись!!
Вот такие вот дела! :-)

← →
Кладов (2003-06-07 19:07) [22]

так вы их наверное меняли. Надо, чтобы была та самая версия, к которой применяется обновление. Должны оставаться прежние файлы - с расширением .old - в любом случае. Ну или так: держите базовую версию в архиве, обновление берите от базовой. Тогда процедура немногим сложнее: сначала распаковать базовую, и upd-файл, затем его применить. Между прочим, что за ошибки?

← →
=Sniper= (2003-06-07 23:58) [23]

Всё в порядке! Я просто переглючил... :-(

← →
Кладов (2003-06-08 05:06) [24]

> модальное окно (form2.Form.ShowModal;) при закрытии какую-то
> ошибку чтения памяти по адресу выдаёт...

осталось посмотреть, кто это окно закрывает, и каким кодом. Должен тот, кто вызвал, либо form2.Form.Free; , либо form2.Form.Hide; и никаких других вариантов.

← →
BelchonokH (2003-06-08 23:39) [25]

Так и есть, Form2.Form.Hide; и ошибка, переписал процедуру ShowModal из Кола 1.74 , и всё стало нормально работать, так что по моему это что-то с версией...

У меня при закрытии модального окна вылетает ошибка в ASM_VERSION, для PAS_VERSION вроде работает.

← →
Кладов (2003-06-09 21:09) [27]

> Так и есть, Form2.Form.Hide

Ошибся, поправлю: в WndProcShowModal намудрил

Версия 1.75 Найти похожие ветки