Menu desde Tabla MySql

Post Reply
Compuin
Posts: 1017
Joined: Tue Dec 28, 2010 1:29 pm

Menu desde Tabla MySql

Post by Compuin »

Buenas tardes foro,

Alguien me podria proveer de un ejemplo de opciones del menu creadas desde una tabla Mysql ?

El ejemplo de fw con DBF no me sirve

Gracias de antemano
Top
Compuin
Posts: 1017
Joined: Tue Dec 28, 2010 1:29 pm

Re: Menu desde Tabla MySql

Post by Compuin »

Alguien sabe como hacerlo ?
Top
User avatar
cnavarro
Posts: 5792
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Menu desde Tabla MySql

Post by cnavarro »

Vamos por partes:
1.- Qué versión de Fw utilizas?
2.- Por qué no te vale el ejemplo desde DBFs?
3.- Qué Mysql utilizas? ( libreria, etc )
4.- Qué estructura tienes en la tabla, y sus propiedades
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Top
Compuin
Posts: 1017
Joined: Tue Dec 28, 2010 1:29 pm

Re: Menu desde Tabla MySql

Post by Compuin »

cnavarro wrote:Vamos por partes:
1.- Qué versión de Fw utilizas?
2.- Por qué no te vale el ejemplo desde DBFs?
3.- Qué Mysql utilizas? ( libreria, etc )
4.- Qué estructura tienes en la tabla, y sus propiedades
1.- Fwh1705
2.- Siempre se desordena y no logro ubicar items apropiadamente
3.- Mysql 5.0 con la Libreria Eagle1
4.- Un tabla con los nombre de las opciones del menu nada mas
Last edited by Compuin on Wed Dec 12, 2018 2:19 pm, edited 1 time in total.
Top
jcenteno
Posts: 23
Joined: Thu Dec 10, 2009 6:07 am

Re: Menu desde Tabla MySql

Post by jcenteno »

Yo lo tengo funcionando desde hace algunos años, si me das tu correo, te envío las estructuras y el código... luego, si te sirve lo publicas.
Saludos.
Top
Compuin
Posts: 1017
Joined: Tue Dec 28, 2010 1:29 pm

Re: Menu desde Tabla MySql

Post by Compuin »

jcenteno wrote:Yo lo tengo funcionando desde hace algunos años, si me das tu correo, te envío las estructuras y el código... luego, si te sirve lo publicas.
Saludos.
Jose aca lo tienes compuin@gmail.com
Top
User avatar
joseluisysturiz
Posts: 2024
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela
Contact:
Contact joseluisysturiz

Re: Menu desde Tabla MySql

Post by joseluisysturiz »

jcenteno wrote:Yo lo tengo funcionando desde hace algunos años, si me das tu correo, te envío las estructuras y el código... luego, si te sirve lo publicas.
Saludos.
Saludos, me sumo a la peticion si no hay problemas joseluisysturiz @ yahoo.com, gracias...saludos... :shock:
Dios no está muerto...

Gracias a mi Dios ante todo!
Top
User avatar
joseluisysturiz
Posts: 2024
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela
Contact:
Contact joseluisysturiz

Re: Menu desde Tabla MySql

Post by joseluisysturiz »

Compuin wrote:Buenas tardes foro,

Alguien me podria proveer de un ejemplo de opciones del menu creadas desde una tabla Mysql ?

El ejemplo de fw con DBF no me sirve

Gracias de antemano
Saludos, como se llama ese ejemplo de FW con DBF.? quiero revisarlo haber si me sirve aunque uso MYSQL con TDolphin, imagino se podra adaptar, saludos, gracias... :shock:
Dios no está muerto...

Gracias a mi Dios ante todo!
Top
jcenteno
Posts: 23
Joined: Thu Dec 10, 2009 6:07 am

Re: Menu desde Tabla MySql

Post by jcenteno »

Enviado al correo.

Saludos.
Top
admsoporte
Posts: 79
Joined: Sun Oct 09, 2005 3:09 pm
Location: Mexico

Re: Menu desde Tabla MySql

Post by admsoporte »

Me lo podrían mandar a admsoporte@gmail.com


Enviado desde mi FIG-LX3 mediante Tapatalk
Saludos

Atentamente

Jose F Dominguez Serafin

email admsoporte@gmail.com
Top
User avatar
jose_murugosa
Posts: 943
Joined: Mon Feb 06, 2006 4:28 pm
Location: Uruguay
Contact:
Contact jose_murugosa

Re: Menu desde Tabla MySql

Post by jose_murugosa »

Me interesaría la versión para dbfs y para mysql, si pudieran publicarlas o enviármelas a jmurugosa (arroba) gmail (punto) com, estaré agradecido.
Saludos/Regards,
José Murugosa
FWH + Harbour + Bcc7. Una seda!
Top
User avatar
ruben Dario
Posts: 986
Joined: Thu Sep 27, 2007 3:47 pm
Location: Colombia

Re: Menu desde Tabla MySql

Post by ruben Dario »

Saludos
Podrias compartir el codigo. Gracias
Me interesaría la versión para dbfs y para mysql, si pudieran publicarlas o enviármelas a rubendariogd (arroba) gmail (punto) com, estaré agradecido.
Ruben Dario Gonzalez
Cali-Colombia
rubendariogd@hotmail.com - rubendariogd@gmail.com
Top
User avatar
TecniSoftware
Posts: 213
Joined: Fri Oct 28, 2005 6:29 pm
Location: Quilmes, Buenos Aires, Argentina

Re: Menu desde Tabla MySql

Post by TecniSoftware »

Me sumo al pedido, me interesa ese codigo, info.estudio arroba gmail.com

Muchas gracias!
Alejandro Cebolido
Buenos Aires, Argentina
Top
User avatar
jnavas
Posts: 399
Joined: Wed Nov 16, 2005 12:03 pm
Location: Caracas - Venezuela
Contact:
Contact jnavas

Re: Menu desde Tabla MySql

Post by jnavas »

Compin
Saludos
My aplicacion es MySQL, el menu lo guardo en una tabla, lo leo, paso a un arreglo

// Menu Horizontal
aMENUMAC:=LEERELMENUDESDECUALQUIERORIGEN() // dbf, txt, MySql /////

C5MENUITEM oDp:oItemMacro PROMPT oDp:cMenu01;
ACCELERATOR ACC_CONTROL,ASC("M")

C5MENU COLOR oDp:nMenuItemClrText, oDp:nMenuItemClrPane;
COLORSEL oDp:nMenuItemSelText, oDp:nMenuItemSelPane;
COLORBOX oDp:nMenuBoxClrText ;
FONT oDp:oFontMenu;
HEIGHT oDp:nMenuHeight; // SELECT 3D ;
LOGO oDp:cBmpMacros ;
LOGOCOLOR oDp:nMenuMainClrText

oDp:oItemMacro:lActive:=!EMPTY(aMenuMac[1]) .AND. lHorario

hacermenu(aMENUMAC)

C5ENDMENU


STATIC FUNCTION HACERMENU(aMenu,oMenu)
LOCAL I:=1,lacceso:=.T.,lutilizo:=.F.,oItem,nIni:=0

lMenuXp:=.T.

IF EMPTY(aMenu) .OR. EMPTY(aMenu[1])
RETURN // .F.
ENDIF

For i=1 TO LEN(aMenu[1])


IF lMenuXp

C5MENUITEM oItem PROMPT alltrim(aMenu[1,I]);
FILE aMenu[12,I]
ELSE

MENUITEM oItem PROMPT alltrim(aMenu[1,I]);
FILE aMenu[12,I]

ENDIF

IF aMenu[13,I]=4

IF lMenuXp
C5SEPARATOR
ELSE
SEPARATOR
ENDIF

ENDIF

IF aMenu[13,I]=2

nIni++

IF lMenuXp

C5MENU COLOR oDp:nMenuItemClrText, oDp:nMenuItemClrPane;
COLORSEL oDp:nMenuItemSelText, oDp:nMenuItemSelPane;
COLORBOX oDp:nMenuBoxClrText ;
HEIGHT oDp:nMenuHeight;
LOGOCOLOR oDp:nMenuMainClrText

ELSE

MENU

ENDIF


LOOP

ENDIF

oItem:bWhen :=aMenu[11,I]
oItem:bAction :=aMenu[03,I]

IF lMenuXp
oItem:bAuxAction :=aMenu[03,I]
ENDIF


NEXT I

FOR I=1 TO nIni

IF lMenuXp
C5ENDMENU
ELSE
ENDMENU
ENDIF

NEXT

// C5ENDMENU

RETURN
Top
User avatar
jnavas
Posts: 399
Joined: Wed Nov 16, 2005 12:03 pm
Location: Caracas - Venezuela
Contact:
Contact jnavas

Re: Menu desde Tabla MySql

Post by jnavas »

saludos
Probando, no se como colocar el codigo PRG para que se vea estructurado. Agradecido si alguien me guia para que el código que publico se vea legible


C5MENUITEM oDp:oItemTransaccion PROMPT oDp:cMenu04

C5MENU COLOR oDp:nMenuItemClrText, oDp:nMenuItemClrPane;
COLORSEL oDp:nMenuItemSelText, oDp:nMenuItemSelPane;
COLORBOX oDp:nMenuBoxClrText ;
HEIGHT oDp:nMenuHeight; // SELECT 3D ;
LOGO oDp:cBmpTransacciones ;
LOGOCOLOR oDp:nMenuMainClrText

aMenu:=ACLONE(aMenuTra)

oDp:oItemTransaccion:lActive:=!EMPTY(aMENUTRA[1]) .AND. lHorario

hacermenu(aMenu)

C5ENDMENU

Code: Select all


     C5MENUITEM oDp:oItemTransaccion PROMPT oDp:cMenu04

     C5MENU COLOR    oDp:nMenuItemClrText, oDp:nMenuItemClrPane;
            COLORSEL oDp:nMenuItemSelText, oDp:nMenuItemSelPane;
            COLORBOX oDp:nMenuBoxClrText ;
            HEIGHT oDp:nMenuHeight; // SELECT 3D ;
            LOGO oDp:cBmpTransacciones ;
            LOGOCOLOR oDp:nMenuMainClrText

     aMenu:=ACLONE(aMenuTra)

     oDp:oItemTransaccion:lActive:=!EMPTY(aMENUTRA[1]) .AND. lHorario

     hacermenu(aMenu)

     C5ENDMENU



 
Top
Post Reply

Return to “FiveWin para Harbour/xHarbour”