Mai trebuie niste date.
1. Clasa e combobox, sau subclasata?
2. RowSource
3. RowSourceType
4. BoundColumn
5. BoundTo
6. Style
7. ControlSource
8. Are cod in Valid, InteractiveChange, KeyPress?

clasa cred ca e combobox

rowsource tabela in care am datele

rowsourcetype 2-alias

boundcolumn 1

boundto .f.

style 0 dropdown combo

nu am coduri decat in click "thisform.refresh

Motivul pentru care valoarea dispare le iesirea din combo este acela ca valoare din control source nu se regaseste in rowsource.
Aste poate avea doa cauze:
1. ControlSource si RowSource nu sunt pe acelasi camp (asta ne spune boundcolumn).
2. E un DropDown Combo, in care s-a introdus o valoare noua

Daca style=0 DropDown Combo, inseamna ca se pot scrie valori in partea de textbox, care nu exista in rowsource.
Daca asta este situatia - s-a tastat o valoare, nu s-a selectat din lista, atunci aceasta valoare trebuie introdusa si in ce ai la rowsource. De obicei, asta se face in metoda valid, dupa ce s-a facut validarea valorii.
Poti folosi urmatorul cod (doar pentru rowsourcetype=6 si vfp>=7)
combobox.valid
..... cod pentru validarea valorii introduse
Local lcValue, lcAlias, lcField
lcValue=this.DysplayValue
lcAlias=getwordnum(this.rowsource,1,'.')
lcField=getwordnul(justext(this.rowsource),1,',')
Insert into (lcAlias) (lcField) Values (this.DisplayValue)
this.requery()
this.value=lcValue

Daca nu ai nevoie sa introduci valori noi, atunci pui style=2 - Dropdown List.

campul din care iau valorile e readonly - autoincrement deci nu vreau sa adaug date in el

practic e vorba de un form de logare in care se alege din lista userid dupa care se introduce parola

dupa ce aleg userid din lista cursorul sare pt introducerea parolei dar lista ramane fara valoare

am pus style=2 lista a devenit albastra in loc de alba dupa care imi spune ca, capul este read only

daca crezi ca e necesar pot trimite ecranul si tabela

Am recitit ce ai scris. La ControlSource ai un camp din tabela cu userid?
Ceva nu este bine.
Unde folosesti userid pe care il selectezi din lista? intr-un camp, sau intr- variabila?

ControlSource adreseaza un camp sau o variabila (proprietate) in care se SCRIE valoarea selectatea din rowsource, coloana boundcolumn.

Deci:

ControlSource=''
RowSource="tabela.userid"
RowSourceType=6 &&Fields
BoundColumn=1 &&Coloana 1 din rowsource
Style=2 &&Drop-down list

Incearca asa.
Va trebui sa preiei cumva valoarea combobox-ului, eventual cu combobox.value.
Sau poti pune o proprietate a formului:
thisform.addproperty('userid','')

combobox.controlSource="thisform.userid"

Scuze, am urcat tot fisierul tau.
Codul pentru afisare e din InteractiveChange, nu in Click

rezolvarea ta functioneaza perfect, multumesc mult

am incercat si eu, dar tot nu a iesit

am modificat :

controlsource : am pus thisform.o_variabila

rowsource : tabela.camp1, camp2

rowsourcetype : 6

si tot nu merge

ce nu am pus sau ce am pus gresit

Mie nu mi-e foarte clar ce anume nu merge. Ce ai pus e corect, deci problema e in alta parte, adica alte proprietati si metode.
Scoate codul din valid (in caz ca este inca acolo).
Pune BundColumn=2  - BoundColumn spune a cata coloana a listei este legata de controlsource. In cazul de fata, am pus nume in prima coloana si idmedic in coloana 2. In controlSource vreau idmedic, deci BoundColumn=2
BoundTo=.F.  BoundTo spune daca la controlSource se leaga proprietatea List a listei sau proprietatea ListIndex. In cazul tau, avand campul numeric, merge cu BoundTo=.f.
Am mutat codul din metoda click in metoda InteractiveChange.

Mai departe nu stiu ce sa-ti spun. Da-mi detalii, ce anume nu merge. Uita-te in prg, vei vedea acolo ce proprietati am modificat si ce metode.