Скачать: CL | DM;

TScrollBar. Создаю, но надо Max, Min и Position.   Найти похожие ветки 

← →
RA   (2003-11-07 13:04) [0]

TScrollBar. Создаю, но надо Max, Min и Position . А событие
onScroll срабатывает только когда перетягиваешь полосу прокрутки,
а когда пользуешься стрелками, то оно не возникает. И когда преретягиваешь полосу, то все равно она становится обратно.

---

← →
BelchonokH ©   (2003-11-07 18:35) [1]

Я в похожей ситуации ручками делал, через onMessage...

---

← →
zeze   (2003-11-07 21:38) [2]

Application.OnIdle := DrawIt;

what"s the equivalent KOL event ?
onMessage doesn"t seem to work.

thanks!
(english please)

---

← →
SPeller ©   (2003-11-08 06:49) [3]

> zeze   (07.11.03 21:38) [2]

Make new topic with your question.

---

← →
Gandalf ©   (2003-11-08 19:27) [4]

Replace standart Run but own...
For example add in  proj_1.inc like run:


// AppletWnd = Form1.Form
//procedure Run( var AppletWnd: PControl );
//begin
 AppletRunning := True;
 Applet := AppletWnd;
 AppletWnd.CreateWindow; //virtual!!!
 while not AppletTerminated do
 begin
   WaitMessage;
   if AppletWnd.ProcessMessages not then // New
   begin
    // Your Idle code here
  end;  
 if AppletWnd <> nil then
   TerminateExecution( AppletWnd );
//end;


Dont forget exit after it (because real Run needn"t). This is MCK Method. In pure KOL simply use your Run.

See full discussion here (Russion) http://delphimaster.net/view/11-1045034380/

---

← →
Gandalf ©   (2003-11-08 19:28) [5]

And of cause you cant use RegisterIdleHandler (KOL>=1.85)

---

← →
Gandalf ©   (2003-11-08 19:33) [6]

Насчет бара - видимо руками.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.029 c