Версия 2.59

← →
Vladimir Kladov (2007-05-04 20:33) [0]

Новости от 4 мая 2007 (KOL & MCK v2.59) [*] UNI 1. LVKOLText: string -> KOLstring. 2. GetAcceleratorText исправлен для Unicode. [+] Добавлена функция ReplaceExt. [-] TObj.SetName для присваивания пустой строки (не присваивалась, оставалось прежнее имя). [-] TDirList.ScanDirectoryEx - исправлена утечка памяти для нескольких вызовов с разными фильтрами. [-] JustOne, JustOneNotify теперь работаю правильно в приложении с несколькими формами без отдельного объекта Applet. [-] ParentAnchorChildren исправлен для восстановления и максимизации формы. [-] NewTabControl, NewTabEmpty (asm версии) - исправлены (неверное число оций для установки). [-] MCK TKOLActions - исправлена генерация кода в MCK. [-] delphicommctrl.inc: исправлено значение константы PBT_APMRESUMEAUTOMATIC. (Приложение Multiclipbrd с этого сайта перекомпилировано и теперь нормально восстанавливается после выхода системы из гибернации). [+] OTH 1. Добавлен пакет KOLCxTiffJpg, быстрая реализация TIFF (только декодирование, зато практически всех вариантов форматов). Jpeg из пакета практически такой же, как и в KolJpeg (размер практически тот же), но используется в этой реализации TIFF-формата, и его использование предотвращает дублирование кода, если требуется поддержка обоих этих форматов. 2. Lnk: исправлены функции FileTypeRegEx и FileTypeReg2 (полная отмена предыдущей ассоциации с файловым расширением при назначении своего). 3. KOLGraphicEx: радикально ускорена работа с форматом PSD.

Кажется, еще что-то было - не вспомнил. Смотрите top10 на сайте.

← →
MTsv DN © (2007-05-06 18:12) [1]

Доступно на http://www.kolnmck.ru/ . Извиняюсь за вынужденную задержку.

P.S. Добавлен пакет KOLCxTiffJpg Не смог найти где это :(

← →
homm © (2007-05-06 20:06) [2]

> Кажется, еще что-то было - не вспомнил.

toGRush же правили?

← →
Vladimir Kladov (2007-05-06 20:31) [3]

Это "было" потом.

← →
Don © (2007-05-08 09:05) [4]

Владимир, я вам отсылал код по доработке функции LikeSpeedButton, но чего-то ответа не дождался (хотя бы отрицательного), наверно не пришло. Поэтому продублирую здесь, а вы хоть что-то скажите, по этому поводу.
{здесь я объявил глобальную переменную, но было бы хорошо, найти какую-то свободную внутренюю переменую} var LastHWND: HWND; //[function WndProcSpeedButton] function WndProcSpeedButton( Self_: PControl; var Msg: TMsg; var Rslt: Integer ): Boolean; begin Result := False; if Msg.message = WM_SETFOCUS then begin Result := TRUE; Rslt := 0; LastHWND := Msg.wParam; end else if (Msg.message = WM_CAPTURECHANGED) and (Msg.lParam = 0) and (LastHWND <> 0) then begin SetFocus(LastHWND); LastHWND := 0; end; end;

← →
Vladimir Kladov (2007-05-08 13:38) [5]

А подумать? Если переменная вынесена в статику или глобалы, значит, это зачем-нибудь нужно?..

← →
Don © (2007-05-10 11:21) [6]

Я чего-то не понял, эту пременную (LastHWND) я объявил. И она действительно нужна (была бы не нужна, не объявлял).
Если этот ответ по поводу того, что я предложил внести во внутренние переменные, так можно и не вносить (если это так проблематично), все равно только один контрол захватывает фокус мышки.

P.S. Извиняюсь за поздний ответ, выходной был.

← →
Vladimir Kladov (2007-05-10 16:51) [7]

Я не понял целых 2 вещи. 1. Для чего это, разве не достаточно просто игнорировать установку фокуса? Вроде ведь работает. 2. Что значит во внутреннюю свободную переменную? Все еперменные чем-то заняты. Глобалы для того и нужны, чтобы что-то занять для чего то.

П.С. Что если кликнуть по такой кнопке, при активном чужом приложении. Надо ли отдавать фокус обратно. А если в фокусе не было окна вообще? (Так тоже бывает, наверное).

Во-первых, если кликнуть по такой кнопке, при активном чужом приложении, фокус переносится на форму (на последний активный контрол этой формы, если такового нет, то активной становится форма).

Во-вторых, в старом коде, при клике на такую кнопку, фокус перемещается в никуда. А по описанию этой функции, фокус должен перемещаться в то окно, в котором был до клика. Поэтому я и предложил переделать. Судя по комментариям, вы сами пытались это сделать (наверно не получилось).

И в-третьих, забудьте про переменные, я протестил с глобальной, все работает.
А насчет внутрених переменных, я сам брал у контрола лишние... Например, для edit-а использовал SBMax, SBMin.

← →
Vladimir Kladov (2007-05-11 19:20) [9]

Давайте так. Если просто кликнуть по форме неактивного приложения, стандартная реакция: приложение выходит вперед, становится активным. Чем это отличается от нынешнего поведения?

В описании, когда я его писал, я вообще вариант с чужими окнами и даже другими формами не имел в виду. Подразумевалось - фокус останется у текущего элемента той же формы.

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