Xailer & OZ Software

El entorno de desarrollo definitivo en Xbase
https://forum.xailer.com/

sigo en lo mismo

https://forum.xailer.com/viewtopic.php?t=2434

Página 1 de 1

sigo en lo mismo

Publicado: Jue Feb 09, 2006 6:25 pm
por tupr
Hola
Recien empiezo con Xailer, pero no puedo hacerlo funcionar alguien me
podria ayudar.
Saludos
Marco A. Delgado
post....el ejemplo .. no hay menu ni rebar
#include "Xailer.ch"
CLASS TFormInicio FROM TForm
COMPONENT oMenu
COMPONENT oReBar1
DATA oToolBar, oRebarBand
METHOD CreateForm()
METHOD FormInitialize( oSender )
ENDCLASS
#include "FrmIncio.xfm"
//---------------------------------------------------------- --------------------
METHOD FormInitialize( oSender ) CLASS TFormInicio
MENU ::oMenu
MENUITEM "&Archivos"
MENU
MENUITEM "&Abrir"
MENUITEM "&Configurar"
SEPARATOR
MENUITEM "&Salir"
ENDMENU
ENDMENU
WITH OBJECT ::oToolBar := TToolBar():New( ::oRebar1 )
:lList := .t.
:lAutoSize := .t.
:Create()
:AddButton( "", "Bmp_Salir",,, "Salir del sistema", {||
MsgInfo("Hola") } )
:AddSeparator()
:AddButton( "", "Bmp_Config",,, "Configuración del Sistema", {||
MsgInfo("Hola") } )
:AddButton( "", "Bmp_About",,, "Acerca de...", {||
MsgInfo("Hola") } )
END
WITH OBJECT ::oRebarBand := TRebarBand():New( ::oRebar1 )
:oControl := ::oToolBar
:Create()
END
RETURN Nil

sigo en lo mismo

Publicado: Jue Feb 09, 2006 6:38 pm
por ignacio
Marco,
Por que no empieza por alguno de los ejemplos que incluye el producto, como
por ejemplo samplesDataControlsDbfData2
Saludos,
"Marco A. Delgado" <tupr@yahoo.com.mx> escribió en el mensaje
news:[email=43eb7b17@ozsrvnegro.ozlan.local...]43eb7b17@ozsrvnegro.ozlan.local...[/email]
> Hola
>
> Recien empiezo con Xailer, pero no puedo hacerlo funcionar alguien me
> podria ayudar.
>
> Saludos
>
> Marco A. Delgado
>
> post....el ejemplo .. no hay menu ni rebar
>
> #include "Xailer.ch"
>
> CLASS TFormInicio FROM TForm
>
> COMPONENT oMenu
> COMPONENT oReBar1
>
> DATA oToolBar, oRebarBand
>
> METHOD CreateForm()
> METHOD FormInitialize( oSender )
>
> ENDCLASS
>
> #include "FrmIncio.xfm"
>
> //---------------------------------------------------------- --------------------
>
> METHOD FormInitialize( oSender ) CLASS TFormInicio
>
> MENU ::oMenu
> MENUITEM "&Archivos"
> MENU
> MENUITEM "&Abrir"
> MENUITEM "&Configurar"
> SEPARATOR
> MENUITEM "&Salir"
> ENDMENU
> ENDMENU
>
> WITH OBJECT ::oToolBar := TToolBar():New( ::oRebar1 )
> :lList := .t.
> :lAutoSize := .t.
> :Create()
> :AddButton( "", "Bmp_Salir",,, "Salir del sistema", {||
> MsgInfo("Hola") } )
> :AddSeparator()
> :AddButton( "", "Bmp_Config",,, "Configuración del Sistema", {||
> MsgInfo("Hola") } )
> :AddButton( "", "Bmp_About",,, "Acerca de...", {||
> MsgInfo("Hola") } )
> END
>
> WITH OBJECT ::oRebarBand := TRebarBand():New( ::oRebar1 )
> :oControl := ::oToolBar
> :Create()
> END
>
> RETURN Nil
>
>

sigo en lo mismo

Publicado: Vie Feb 10, 2006 12:00 am
por tupr
Hola Ignacio
Precisamente desde ahi estoy empezando, estoy tomando varias partes de
codigo de las mismos ejemplos..
Saludos
Marco A. Delgado.
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:43eb7e13$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Marco,
>
> Por que no empieza por alguno de los ejemplos que incluye el producto,
> como por ejemplo samplesDataControlsDbfData2
>
> Saludos,
>
>
> "Marco A. Delgado" <tupr@yahoo.com.mx> escribió en el mensaje
> news:[email=43eb7b17@ozsrvnegro.ozlan.local...]43eb7b17@ozsrvnegro.ozlan.local...[/email]
>> Hola
>>
>> Recien empiezo con Xailer, pero no puedo hacerlo funcionar alguien me
>> podria ayudar.
>>
>> Saludos
>>
>> Marco A. Delgado
>>
>> post....el ejemplo .. no hay menu ni rebar
>>
>> #include "Xailer.ch"
>>
>> CLASS TFormInicio FROM TForm
>>
>> COMPONENT oMenu
>> COMPONENT oReBar1
>>
>> DATA oToolBar, oRebarBand
>>
>> METHOD CreateForm()
>> METHOD FormInitialize( oSender )
>>
>> ENDCLASS
>>
>> #include "FrmIncio.xfm"
>>
>> //---------------------------------------------------------- --------------------
>>
>> METHOD FormInitialize( oSender ) CLASS TFormInicio
>>
>> MENU ::oMenu
>> MENUITEM "&Archivos"
>> MENU
>> MENUITEM "&Abrir"
>> MENUITEM "&Configurar"
>> SEPARATOR
>> MENUITEM "&Salir"
>> ENDMENU
>> ENDMENU
>>
>> WITH OBJECT ::oToolBar := TToolBar():New( ::oRebar1 )
>> :lList := .t.
>> :lAutoSize := .t.
>> :Create()
>> :AddButton( "", "Bmp_Salir",,, "Salir del sistema", {||
>> MsgInfo("Hola") } )
>> :AddSeparator()
>> :AddButton( "", "Bmp_Config",,, "Configuración del Sistema", {||
>> MsgInfo("Hola") } )
>> :AddButton( "", "Bmp_About",,, "Acerca de...", {||
>> MsgInfo("Hola") } )
>> END
>>
>> WITH OBJECT ::oRebarBand := TRebarBand():New( ::oRebar1 )
>> :oControl := ::oToolBar
>> :Create()
>> END
>>
>> RETURN Nil
>>
>>
>
>

sigo en lo mismo

Publicado: Vie Feb 10, 2006 9:20 am
por ignacio
Marco,
Pues entonces mandanos tu proyecto con la opción de menú Proyecto-Publicar.
Un saludo,
"Marco A. Delgado" <tupr@yahoo.com.mx> escribió en el mensaje
news:[email=43ebc974@ozsrvnegro.ozlan.local...]43ebc974@ozsrvnegro.ozlan.local...[/email]
> Hola Ignacio
>
> Precisamente desde ahi estoy empezando, estoy tomando varias partes de
> codigo de las mismos ejemplos..
>
> Saludos
>
> Marco A. Delgado.
>
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:43eb7e13$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>> Marco,
>>
>> Por que no empieza por alguno de los ejemplos que incluye el producto,
>> como por ejemplo samplesDataControlsDbfData2
>>
>> Saludos,
>>
>>
>> "Marco A. Delgado" <tupr@yahoo.com.mx> escribió en el mensaje
>> news:[email=43eb7b17@ozsrvnegro.ozlan.local...]43eb7b17@ozsrvnegro.ozlan.local...[/email]
>>> Hola
>>>
>>> Recien empiezo con Xailer, pero no puedo hacerlo funcionar alguien me
>>> podria ayudar.
>>>
>>> Saludos
>>>
>>> Marco A. Delgado
>>>
>>> post....el ejemplo .. no hay menu ni rebar
>>>
>>> #include "Xailer.ch"
>>>
>>> CLASS TFormInicio FROM TForm
>>>
>>> COMPONENT oMenu
>>> COMPONENT oReBar1
>>>
>>> DATA oToolBar, oRebarBand
>>>
>>> METHOD CreateForm()
>>> METHOD FormInitialize( oSender )
>>>
>>> ENDCLASS
>>>
>>> #include "FrmIncio.xfm"
>>>
>>> //---------------------------------------------------------- --------------------
>>>
>>> METHOD FormInitialize( oSender ) CLASS TFormInicio
>>>
>>> MENU ::oMenu
>>> MENUITEM "&Archivos"
>>> MENU
>>> MENUITEM "&Abrir"
>>> MENUITEM "&Configurar"
>>> SEPARATOR
>>> MENUITEM "&Salir"
>>> ENDMENU
>>> ENDMENU
>>>
>>> WITH OBJECT ::oToolBar := TToolBar():New( ::oRebar1 )
>>> :lList := .t.
>>> :lAutoSize := .t.
>>> :Create()
>>> :AddButton( "", "Bmp_Salir",,, "Salir del sistema", {||
>>> MsgInfo("Hola") } )
>>> :AddSeparator()
>>> :AddButton( "", "Bmp_Config",,, "Configuración del Sistema", {||
>>> MsgInfo("Hola") } )
>>> :AddButton( "", "Bmp_About",,, "Acerca de...", {||
>>> MsgInfo("Hola") } )
>>> END
>>>
>>> WITH OBJECT ::oRebarBand := TRebarBand():New( ::oRebar1 )
>>> :oControl := ::oToolBar
>>> :Create()
>>> END
>>>
>>> RETURN Nil
>>>
>>>
>>
>>
>
>

sigo en lo mismo

Publicado: Vie Feb 10, 2006 3:22 pm
por tupr
ok....gracias por responder
Saludos
Marco A. Delgado.
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:43ec4cd0$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Marco,
>
> Pues entonces mandanos tu proyecto con la opción de menú
> Proyecto-Publicar.
>
> Un saludo,
>
> "Marco A. Delgado" <tupr@yahoo.com.mx> escribió en el mensaje
> news:[email=43ebc974@ozsrvnegro.ozlan.local...]43ebc974@ozsrvnegro.ozlan.local...[/email]
>> Hola Ignacio
>>
>> Precisamente desde ahi estoy empezando, estoy tomando varias partes de
>> codigo de las mismos ejemplos..
>>
>> Saludos
>>
>> Marco A. Delgado.
>>
>>
>> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
>> news:43eb7e13$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>> Marco,
>>>
>>> Por que no empieza por alguno de los ejemplos que incluye el producto,
>>> como por ejemplo samplesDataControlsDbfData2
>>>
>>> Saludos,
>>>
>>>
>>> "Marco A. Delgado" <tupr@yahoo.com.mx> escribió en el mensaje
>>> news:[email=43eb7b17@ozsrvnegro.ozlan.local...]43eb7b17@ozsrvnegro.ozlan.local...[/email]
>>>> Hola
>>>>
>>>> Recien empiezo con Xailer, pero no puedo hacerlo funcionar alguien me
>>>> podria ayudar.
>>>>
>>>> Saludos
>>>>
>>>> Marco A. Delgado
>>>>
>>>> post....el ejemplo .. no hay menu ni rebar
>>>>
>>>> #include "Xailer.ch"
>>>>
>>>> CLASS TFormInicio FROM TForm
>>>>
>>>> COMPONENT oMenu
>>>> COMPONENT oReBar1
>>>>
>>>> DATA oToolBar, oRebarBand
>>>>
>>>> METHOD CreateForm()
>>>> METHOD FormInitialize( oSender )
>>>>
>>>> ENDCLASS
>>>>
>>>> #include "FrmIncio.xfm"
>>>>
>>>> //---------------------------------------------------------- --------------------
>>>>
>>>> METHOD FormInitialize( oSender ) CLASS TFormInicio
>>>>
>>>> MENU ::oMenu
>>>> MENUITEM "&Archivos"
>>>> MENU
>>>> MENUITEM "&Abrir"
>>>> MENUITEM "&Configurar"
>>>> SEPARATOR
>>>> MENUITEM "&Salir"
>>>> ENDMENU
>>>> ENDMENU
>>>>
>>>> WITH OBJECT ::oToolBar := TToolBar():New( ::oRebar1 )
>>>> :lList := .t.
>>>> :lAutoSize := .t.
>>>> :Create()
>>>> :AddButton( "", "Bmp_Salir",,, "Salir del sistema", {||
>>>> MsgInfo("Hola") } )
>>>> :AddSeparator()
>>>> :AddButton( "", "Bmp_Config",,, "Configuración del Sistema", {||
>>>> MsgInfo("Hola") } )
>>>> :AddButton( "", "Bmp_About",,, "Acerca de...", {||
>>>> MsgInfo("Hola") } )
>>>> END
>>>>
>>>> WITH OBJECT ::oRebarBand := TRebarBand():New( ::oRebar1 )
>>>> :oControl := ::oToolBar
>>>> :Create()
>>>> END
>>>>
>>>> RETURN Nil
>>>>
>>>>
>>>
>>>
>>
>>
>
>
Todos los horarios son UTC+02:00
Página 1 de 1

Desarrollado por phpBB® Forum Software © phpBB Limited

Traducción al español por phpBB España