urllink

[surGom]

Compañeros quiero utilizar la clase urllink dentro de un folderex con fondo blanco y no me muestra el link, pero si hago un click (dónde tendría que estar) me conecta con la página de internet deseada.

Code: Select all  Expand view

   REDEFINE URLLINK ID 400 URL "www.afip.gov.ar"  oF oFold:adialogs[ 1 ] ;
            TOOLTIP "Sitio oficial AFIP"  font oFont1
 

Lo utilizo en otros diálogos sin problemas, pero aquí no lo visualiza, a que puede deberse este problema
Luis

[Antonio Linares]

Luis,

Puedes cambiar los colores inicial, al pasar el ratón por encima y una vez ha sido visitado:

Code: Select all  Expand view

#xcommand REDEFINE URLLINK [<oURL>] ;
             [ ID <nId> ] ;
             [ <dlg: OF, WINDOW, DIALOG> <oDlg> ] ;
             [ FONT <oFont> ] ;
             [ MESSAGE <cMsg> ] ;
             [ URL <cURL> ] ;
             [ TOOLTIP <cToolTip> ] ;
             [ CLRINIT <nClrInit> ] ;
             [ CLROVER <nClrOver> ] ;
             [ CLRVISIT <nClrVisit> ] ;

[surGom]

Gracias por contestar Antonio pero lamentablemente sigue igual

Code: Select all  Expand view

   DEFINE FONT oFont1 NAME GetSysFont() SIZE 0, -14


   DEFINE DIALOG oDlgCli  RESOURCE  "FOLD_CLI" ICON surge

   REDEFINE FOLDEREX oFold id 101 of oDlgCli ;
      PROMPTS "General", "Impuestos", "Sedronar", "Datos";
      DIALOGS "fold_cli1", "fold_cli2", "fold_cli3", "fold_cli4";


   REDEFINE URLLINK ID 400 URL "www.afip.gov.ar" oF oFold:adialogs[ 1 ] ;
            TOOLTIP "Sitio oficial AFIP" CLRINIT CLR_BLUE CLROVER CLR_MAGENTA font oFont1
 

En un diálogo común funciona bien.

Luis

[surGom]

Antonio de esta forma funciona

Code: Select all  Expand view

   DEFINE FONT oFont1 NAME GetSysFont() SIZE 0, -14 bold



   DEFINE DIALOG oDlgCli  RESOURCE  "FOLD_CLI" ICON surge

   REDEFINE URLLINK ID 400 URL "www.afip.gov.ar" oF oDlgCli ;
            TOOLTIP "Sitio oficial AFIP"  font oFont1



   REDEFINE FOLDEREX oFold id 101 of oDlgCli   ;
      PROMPTS "General", "Impuestos", "Sedronar", "Datos";
      DIALOGS "fold_cli1", "fold_cli2", "fold_cli3", "fold_cli4";

 

Pero fuera del folder.

Luis

[Antonio Linares]

Luis,

Si cambias:

REDEFINE FOLDEREX

por:

REDEFINE FOLDER

te funciona bien ?

[surGom]

Antonio usando Folder funciona perfectamente


Luis

[Antonio Linares]

Luis,

Debe tratarse de alguna interacción con TFolderEx. Voy a preguntarle a Daniel, autor de TFolderEx, a ver si nos echa una mano

[surGom]

Antonio yo utilizo Pelles C, y bien cambiando en el editor de recursos Tfolderex por la nativa de Pelles (Tab), funciona perfectamente.

Luis

[surGom]

Perdón y en el prg reemplazar folderex por folder se muestra igual que usando tfolderex

Luis

[Antonio Linares]

Luis,

El control UrlLink como lo tienes definido en el fichero RC ?

[surGom]

Antonio utilizo res y lo tengo definido como tab y en el redefine como FOLDER. Pero el efecto tfolderex lo muestra en xp no así en Windows 7.

Luis

[surGom]

El urlink esta como:

Code: Select all  Expand view

  REDEFINE FOLDER oFold id 101 of oDlgCli   ;
      PROMPTS "General", "Impuestos", "Sedronar", "Datos";
      DIALOGS "fold_cli1", "fold_cli2", "fold_cli3", "fold_cli4";


   REDEFINE URLLINK ID 400 URL "www.afip.gov.ar" of oFold:adialogs[ 1 ] ;
            TOOLTIP "Sitio oficial AFIP"  font oFont1
 

Luis

[Antonio Linares]

Luis,

Quisiera ver como esta definido el control urllink en el diálogo.

Usas Pelles ? Como se ve su definición ?

[Antonio Linares]

Quieres decir que en Windows 7 funciona bien y solo falla en XP ?

[Armando]

Luis:

No te servirá la clase SSay (Sensitive Say)?, yo la uso con FOLDER y va bien,
con Windows 8 (64Bits)

Saludos