urllink

[surGom]

Antonio es al revés en xp funciona y en windows 7 funciona como un folder común.

La defenición en pelles es la misma que para un text común. No me había percatado de esto porque las pruebas las había hecho en win 7 y usando Folder actuaba como un folder, pero cuando compile en windows xp, ahí mostró el efecto deseado.

En cuanto al a la definición en el diálogo es la misma que en los ejemplos de fwh.

Code: Select all  Expand view

   DEFINE DIALOG oDlgCli  RESOURCE  "FOLD_CLI" ICON surge


   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

   oDlgCli:bgotfocus := {|| oData:activate() }

 

Lamentablemente no se como poder pasar el diálogo que esta en pelles a un txt.
https://www.4shared.com/photo/qN8w9fApba/muestra.html

Así se ve en Windows 7
https://www.4shared.com/photo/ZnI2PcsAce/folder.html

Así en xp
https://www.4shared.com/photo/6SY2QQVAba/xp_online.html

Luis

[cnavarro]

File - Save As - Script (.RC)
Quizas te ayude

[surGom]

Gracias Cristobal

Code: Select all  Expand view

FOLD_CLI1 DIALOG DISCARDABLE 110, 49, 247, 251
STYLE WS_CHILD|WS_VISIBLE
FONT 8, "MS Sans Serif"
{
  CONTROL "", 106, "Edit", ES_RIGHT|WS_BORDER|WS_TABSTOP, 40, 28, 36, 11
  CONTROL "Exterior", 500, "Button", BS_AUTOCHECKBOX|WS_TABSTOP, 160, 28, 48, 10
  CONTROL "", 107, "Edit", WS_BORDER|WS_TABSTOP, 40, 44, 149, 12
  CONTROL "", 108, "Edit", WS_BORDER|WS_TABSTOP, 68, 60, 137, 12
  CONTROL "", 109, "Edit", WS_BORDER|WS_TABSTOP, 40, 80, 122, 12
  CONTROL "", 120, "Edit", WS_BORDER|WS_TABSTOP, 40, 96, 116, 12
  CONTROL "", 110, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|WS_TABSTOP, 40, 120, 102, 33
  CONTROL "", 118, "Edit", ES_RIGHT|WS_BORDER|WS_TABSTOP, 208, 116, 31, 12
  CONTROL "", 111, "Edit", WS_BORDER|WS_TABSTOP, 40, 140, 105, 13
  CONTROL "", 113, "Edit", WS_BORDER|WS_TABSTOP, 40, 160, 82, 12
  CONTROL "", 116, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|WS_TABSTOP, 40, 180, 86, 58
  CONTROL "", 117, "Edit", ES_RIGHT|WS_BORDER|WS_TABSTOP, 40, 196, 31, 12
  CONTROL "", 128, "Edit", ES_RIGHT|WS_BORDER|WS_TABSTOP, 72, 216, 87, 12
  CONTROL "Agre&gar direcciones", 127, "Button", WS_TABSTOP, 20, 232, 71, 14
  CONTROL "Transportes", 121, "Button", WS_TABSTOP, 132, 232, 67, 13
  CONTROL "Codigo:", -1, "Static", WS_GROUP, 4, 28, 30, 10
  CONTROL "Razón Social:", -1, "Static", WS_GROUP, 4, 48, 29, 8
  CONTROL "Domicilio FISCAL:", -1, "Static", WS_GROUP, 4, 64, 60, 10
  CONTROL "Localidad", 501, "Static", WS_GROUP, 4, 84, 35, 10
  CONTROL "Provincia:", -1, "Static", WS_GROUP, 4, 120, 35, 10
  CONTROL "Rubro:", -1, "Static", WS_GROUP, 4, 144, 26, 10
  CONTROL "Teléfono:", -1, "Static", WS_GROUP, 4, 100, 34, 8
  CONTROL "Cuit:", -1, "Static", WS_GROUP, 4, 164, 17, 10
  CONTROL "Condición:", -1, "Static", WS_GROUP, 4, 180, 32, 10
  CONTROL "Vendedor:", -1, "Static", WS_GROUP, 4, 200, 35, 10
  CONTROL "Atiende por T.E. :", -1, "Static", WS_GROUP, 4, 216, 59, 10
  CONTROL "C. Postal:", -1, "Static", WS_GROUP, 172, 120, 33, 10
  CONTROL "Consignatario", 112, "Button", BS_AUTOCHECKBOX|BS_LEFTTEXT|WS_TABSTOP, 172, 204, 67, 10
  CONTROL "Ganancias:", -1, "Static", WS_GROUP, 132, 176, 38, 8
  CONTROL "Iva:", -1, "Static", WS_GROUP, 132, 160, 15, 8
  CONTROL "Monotributo:", -1, "Static", WS_GROUP, 128, 192, 39, 8
  CONTROL "", 200, "TBtnBmp", WS_TABSTOP, 212, 220, 21, 20
  CONTROL "", 201, "TBtnBmp", WS_TABSTOP, 220, 132, 20, 20
  CONTROL "Constancias:", -1, "Static", WS_GROUP, 176, 140, 42, 8
  CONTROL "", 114, "ComboBox", WS_BORDER|CBS_DROPDOWN|WS_VSCROLL|WS_TABSTOP, 172, 156, 72, 40
  CONTROL "", 115, "ComboBox", WS_BORDER|CBS_DROPDOWN|WS_VSCROLL|WS_TABSTOP, 172, 172, 72, 40
  CONTROL "", 119, "ComboBox", WS_BORDER|CBS_DROPDOWN|WS_VSCROLL|WS_TABSTOP, 172, 188, 72, 40
  CONTROL "Consulta constancia afip", 4001, "Static", SS_LEFTNOWORDWRAP|WS_GROUP, 4, 8, 84, 10
  CONTROL "", 400, "Static", SS_CENTER|WS_GROUP, 100, 8, 136, 12
}

Luis