Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.22;
Скачать: CL | DM;

Вниз

OnMouseOver Effect (TKOLBitBtn.Flat) missing in 2.08   Найти похожие ветки 

 
rofl   (2005-05-24 23:47) [0]

is there any new property i have to use to get the highlight effect when moving the mouse over a flat bitbutton, such as in kol 2.0 ?
thanks in advance !


 
ECM ©   (2005-05-25 10:46) [1]

Use OnTestMouseOver,OnMouseEnter,OnMouseLeave - it`s work on KOL 2.08 (BitBtn.Flat = TRUE)


 
rofl   (2005-05-25 12:53) [2]

thanks, now it works like this

procedure TForm1.dummyFlatProc(sender: pobj);
begin
 pcontrol(sender).invalidate;
end;

...

  buttons[i] := NewBitBtn( parctr, "", [], glyphLeft, Loadproc(HInstance, siz, pchar(s2), form1).handle, 0 ).SetPosition( l, t ).SetSize( siz, siz );
  buttons[i].TextShiftX := 1;
  buttons[i].TextShiftY := 1;
  buttons[i].flat := true;
  buttons[i].tag := i;
  buttons[i].onmouseleave:= dummyFlatProc;
  buttons[i].onmouseenter:= dummyFlatProc;


hopefully this work-around is not more required in next kol release 0o



Страницы: 1 вся ветка

Текущий архив: 2006.01.22;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.025 c
2-1136673586
KvORubin
2006-01-08 01:39
2006.01.22
Мастера ХЕЛП !!! Как получить список имён файлов из каталога???


14-1135978840
Sergey Masloff
2005-12-31 00:40
2006.01.22
Оказывается сегодня уже 31


14-1135460710
VirEx
2005-12-25 00:45
2006.01.22
Klubbheads & DJ Disco


14-1135981510
Экс Версия для печати
2005-12-31 01:25
2006.01.22
С новым годом друзья !!!


2-1136721836
flaxe
2006-01-08 15:03
2006.01.22
Сокеты