 Jac de Lad | Yo stand veces otra vez antes el Problema, dass Yo zwar el Itemwechsel en uno Gridbox después de waitinput auslesen kann, aber sólo, si él con un Mausklick erfolgte. No aber beim Scrollen con el Pfeiltasten. Der folgende Ver código fuente ergänzt el veces eben: KompilierenMarcaSeparacióndeclare g&
cls
g&=Create(Gridbox,%hwnd,Spalte;1;100,0,0,0,400,300)
whileloop 0,100
Addstring(g&,Str$(&loop))
endwhile
UserMessages 295
while 1
waitinput
if (%UMessage=295) & Getfocus(g&)
SetText %hWnd,Element: +Str$(GetCurSel(g&))
endif
endwhile
Jac  |
|