Форум: "KOL";
Текущий архив: 2005.10.23;
Скачать: [xml.tar.bz2];
Вниз
ComboBox и OnChar Найти похожие ветки
← →
Денис (2005-03-02 06:52) [0]Почему обработчик OnChar для ComboBox не сохраняет замененные символы? Вот простой пример:
Var form,combo:PControl;
procedure ComboOnChar (Dummy:Pointer; Sender: PControl; var Key: Char; Shift: DWORD );
begin
Key:=#0;
end;
begin
form:=NewForm(Applet,"");
Combo:=NewComboBox(form,[]);
Combo.OnChar:=TOnChar(MakeMethod(nil,@ComboOnChar));
Run(form);
end.
Если вместо ComboBox использовать EditBox то все нормально, ввод с клавиатуры фильтруется.
← →
ECM © (2005-03-02 10:11) [1]Да, уж... в код окнонной функции ComboBox-а вкралась опечатка:
(исправления выделены жирным шрифтом)function WndFuncCombo( W: HWnd; Msg: Cardinal; wParam, lParam: Integer )
: Integer; stdcall;
...
//********************************************************** Added By M.Gerasimov
//*
PrevProc:=Pointer(GetProp( W, ID_PREVPROC ));
if PrevProc <> Nil then
Result := CallWindowProc( PrevProc , W, MsgStruct.message, MsgStruct.wParam, MsgStruct.lParam) //Msg, wParam, lParam )
else
Result:=0;
//*
//********************************************************** Added By M.Gerasimov
← →
ECM © (2005-03-02 10:40) [2]Для желающих. Тут:
http://kolibdb.100free.com/kolmck205plus.zip
лежит upd-файл исправляющий эту ошибку и некоторые другие,
которые были замечены мной после выхода версии 2.05.
Список исправлений - Changes.txt в архиве.
Страницы: 1 вся ветка
Форум: "KOL";
Текущий архив: 2005.10.23;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.038 c
