... aInfo:= FWDispBegin( ::hWnd, hDC ) ::hDC:= aInfo[3] // hDC de Memoria !!! return { aInfo, if(lCreateDC, hDC, nil ), hOldDC } se eu comentar essas linhas o problema relatado no inicio do topico resolve, porem, a rolagem pra cima e para baixo, nao faz certo, mas a tela preta para alguem pra dar ...