Falla en Combobox que no puedo encontrar

Falla en Combobox que no puedo encontrar

Postby jose_murugosa » Mon May 17, 2021 3:19 pm

Adjunto un ejemplo que muestra una falla en un combobox que no se explicar y solo ocurre desde recursos no desde código.
El combobox utiliza un array de texto (varios elementos) que es elemento de uno tridimensional y despliega un combobox.

Si lo hago con código, devolverá correctamente el ordinal de la opción elegida.

Si lo hago con recursos, DEVOLVERA SIEMPRE CERO Y ADEMAS SI DOY CLICK EN EL GET DEL COMBO DA ERROR.

Code: Select all  Expand view

#include "fivewin.ch"

FUNCTION main()
LOCAL aListas:={}, oDlg, oCbx, nItem

     nItem:=0
     aListas :={ { { "Vaca", "Novillo" , "Vaquillona", "Toro" } , { "Jose", "Cno. Juarez 1515", "Montevideo" } }, ;
                { { "Vaca", "Novillo" , "Vaquillona", "Toro" } , { "Jose", "Cno. Juarez 1516", "Montevideo" } } }

     DEFINE DIALOG oDlg SIZE 500,300 TITLE "Ventana"
    // DEFINE DIALOG oDlg RESOURCE "dlg_1" TITLE "Ventana"

         @ 20, 20 COMBOBOX oCbx VAR nItem ITEMS aListas[2][2] SIZE 200, 20 OF oDlg PIXEL    //"Ternero", "no Nato"     //asi anda bien
        // REDEFINE COMBOBOX oCbx VAR nItem ID 101 ITEMS aListas[2][2]  OF oDlg                                                           //asi siempre da cero

     ACTIVATE DIALOG oDlg  center

     ?nItem

RETURN nil
 


Recurso que utilizo:
Code: Select all  Expand view

// Generated by ResEdit 1.6.6
// Copyright (C) 2006-2015
// http://www.resedit.net

#include "C:\bcc7\include\windows\sdk\windows.h"
#include "C:\bcc7\include\windows\sdk\commctrl.h"
#include "C:\bcc7\include\windows\sdk\richedit.h"
#include "resource.h"

//
// Dialog resources
//
LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL
DLG_1 DIALOG 0, 0, 288, 163
STYLE DS_3DLOOK | DS_CENTER | DS_MODALFRAME | DS_SHELLFONT | WS_CAPTION | WS_VISIBLE | WS_POPUP | WS_SYSMENU
CAPTION "Ventana"
FONT 8, "Ms Shell Dlg"
{
    LTEXT           "Seleccion:", 0, 49, 68, 34, 9, SS_LEFT, WS_EX_LEFT
    COMBOBOX        101, 97, 66, 143, 30, CBS_DROPDOWN | CBS_HASSTRINGS, WS_EX_LEFT
}



//
// Manifest resources
//
LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL
1                  RT_MANIFEST    ".\\manifest.xml"
 


Me está volviendo loco, porque necesito que funcione en estas condiciones y no lo logro
Saludos/Regards,
José Murugosa
"Los errores en programación, siempre están entre la silla y el teclado y la IA!!"
User avatar
jose_murugosa
 
Posts: 1173
Joined: Mon Feb 06, 2006 4:28 pm
Location: Uruguay

Re: Falla en Combobox que no puedo encontrar

Postby karinha » Mon May 17, 2021 5:56 pm

Intente con:

Code: Select all  Expand view

CBS_DROPDOWNLIST
 


Code: Select all  Expand view

 COMBOBOX 101, 338, 131, 40, 41, CBS_DROPDOWNLIST | WS_TABSTOP
 


Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7769
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Falla en Combobox que no puedo encontrar

Postby jose_murugosa » Tue May 18, 2021 9:44 am

karinha wrote:Intente con:

Code: Select all  Expand view

CBS_DROPDOWNLIST
 


Code: Select all  Expand view

 COMBOBOX 101, 338, 131, 40, 41, CBS_DROPDOWNLIST | WS_TABSTOP
 


Saludos.


Muchisimas Gracias!!!

Reemplace el texto en todos los combos y funcionaron a la perfección!!!!

Un abrazo desde Uruguay!
Saludos/Regards,
José Murugosa
"Los errores en programación, siempre están entre la silla y el teclado y la IA!!"
User avatar
jose_murugosa
 
Posts: 1173
Joined: Mon Feb 06, 2006 4:28 pm
Location: Uruguay


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 43 guests