Antonio Carlos
DEFINE WINDOW Win1 ;
AT 0,0 ;
WIDTH 1000 ;
HEIGHT 900 ;
TITLE 'Imagem';
NOMAXIMIZE;
CHILD
DEFINE SPLITBOX
DEFINE WINDOW S_1 ;
WIDTH 0 ;
HEIGHT 850 ;
TITLE "Split 1" ;
SPLITCHILD ;
GRIPPERTEXT 'Split 1'
DEFINE ACTIVEX Test
ROW 10
COL 50
WIDTH 900
HEIGHT 800
PROGID "AcroPDF.PDF.1"
END ACTIVEX
END WINDOW
DEFINE WINDOW S_2 ;
WIDTH 0 ;
HEIGHT 850 ;
TITLE 'Split 2' ;
SPLITCHILD ;
GRIPPERTEXT 'Split 2'
DEFINE ACTIVEX Test2
ROW 10
COL 50
WIDTH 900
HEIGHT 800
PROGID "AcroPDF.PDF.1"
END ACTIVEX
END WINDOW
END SPLITBOX
END WINDOW
CENTER WINDOW Win1
ACTIVATE WINDOW Win1
*s_1.Test.Object:src := "teste.pdf"