Ola pessoal peguei esta rotina em www.ilabore.com.br do nosso
amigo Fabio.

Como faço para não deixar aparecer a barra de rolagem do IE ?

[]s Sergio


oForm = CREATEOBJECT("GIFForm")
oForm.SHOW(1)

* Definição do Form
DEFINE CLASS GIFForm AS FORM

WIDTH = 300
HEIGHT = 300

ADD OBJECT oleIE AS OLECONTROL WITH ;
TOP = 0, ;
LEFT = 0, ;
WIDTH = 200, ;
HEIGHT = 200, ;
OLECLASS = "Shell.Explorer.2"

PROCEDURE oleIE.REFRESH
NODEFAULT && Isto é por causa de um bug do IE
ENDPROC

PROCEDURE INIT
THISFORM.oleIE.navigate("c:\meuarquivo.gif")
ENDPROC

ENDDEFINE