I have tried but harbour report
Tipo : Tipo 2 ▼
Follow my //build
Harbour Build Info
---------------------------
Version: Harbour 2.0.0beta3 (Rev. 13026)
Compiler: MinGW GNU C 4.4.1 (32-bit)
Platform: Windows 7 6.1.7600
PCode version: 0.2
ChangeLog last entry: 2009-11-26 12:18 UTC+0100 Przemyslaw Czerpak (druzus/at/pr
iv.onet.pl)
ChangeLog ID: ChangeLog 13026 2009-11-26 11:18:25Z druzus
Built on: Nov 26 2009 12:22:47
Build options:
Language options: (Clipper 5.3) (Clipper 5.x undoc) (Xbase++) (Flagship)
---------------------------
// info
Harbour Terminal: Windows native console
Harbour 2.0.0beta3 (Rev. 13026)
Windows 7 6.1.7600
DS avail=1085800KB OS avail=2063320KB EMM avail=0KB MemStat:Off MT:Off
2009/11/26 http://news.gmane.org/gmane.comp.db.sqlite.general
<[email protected]>:
>
> ----------------------------------------------
> #include "inkey.ch"
>
> procedure main
> LOCAL wTipo := "T2", aTipo := {}
>
> AADD(aTipo,{"Tipo 1","T1"})
> AADD(aTipo,{"Tipo 2","T2"})
> AADD(aTipo,{"Tipo 3","T3"})
>
> //
> SET( _SET_EVENTMASK, INKEY_ALL )
> MSETCURSOR( .T. )
> CLS
>
> @ 05,40,10,70 GET wTipo LISTBOX aTipo CAPTION '&Tipo :' DROPDOWN SCROLLBAR
> COLOR "W/N,B/W+,W/N,W+/B,W/N,N/W*,G/W*,N/G"
> READ
>
> RETURN
> ----------------------------------------------
>
> Output in Clipper:
>
> Tipo : Tipo 2 ▼
>
> Output in Harbour:
>
> Tipo : Tipo 2
> The list box's drop-down buttonn not appear
>
> TIA
>
> Best Regards
> GVS
>
> _______________________________________________
> Harbour mailing list (attachment size limit: 40KB)
> [email protected]
> http://lists.harbour-project.org/mailman/listinfo/harbour
>
--
Massimo Belgrano
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
