Page 1 of 1

buttonbmp de Rossine - compilar prgs

Posted: Fri Jan 06, 2006 5:07 pm
by RuFer
Amigos no he podido compilar estas líneas
con Harbour 45 y FWH 2.7 del archivo de Rossine Button.Prg

línea 104

::nStyle = nOR( WS_CHILD, WS_VISIBLE, WS_TABSTOP,;
If( lDefault, BS_DEFPUSHBUTTON, 0 ),;
If( cPosText == "TEXTTOP", BS_TOP, 0 ),;
If( cPosText == "TEXTBOTTOM", BS_BOTTOM, 0 ),;
If( cPosText == "TEXTLEFT", BS_LEFT, 0 ),;
If( cPosText == "TEXTRIGHT", BS_RIGHT, 0 ),;
if( at( CRLF, ::cCaption ) > 0, BS_MULTILINE, 0 ) , ;
If( lDesign, WS_CLIPSIBLINGS, 0 ) )



línea 161

::nStyle = nOR( WS_CHILD, WS_VISIBLE, WS_TABSTOP, BS_MULTILINE,;
If( cPosText == "TEXTTOP", BS_TOP, 0 ),;
If( cPosText == "TEXTBOTTOM", BS_BOTTOM, 0 ),;
If( cPosText == "TEXTLEFT", BS_LEFT, 0 ),;
If( cPosText == "TEXTRIGHT", BS_RIGHT, 0 ) )




Alguien me puede enviar los objs para Harbour 45 y
FWH 2.7. ?


Muchas gracias.