Konu: Combo box ta mantık hatası? Nerede
Oluşturduğum bir form 'un ınıt inde, oluşturduğum cursor leri Combo box ta kullanıyorum.
Özetle yaptığım şu :
IF EMPTY(CrsAmodel.Turkod) = .F.
m.lcText = CrsAmodel.Turkod
SELECT "CrsTypes"
LOCATE FOR ModelTanim = m.lcText
WITH ThisForm.pgfTamamla.pgGenel.cboModelTanim
.ColumnCount = 2
.RowSourceType = 6
.RowSource = [CrsTypes.ModelTanim, ModelKod]
.ControlSource = [CrsAmodel.AdtTur]
.BoundTo = .T.
.BoundColumn = 1
.ColumnWidths = [120,15]
.DisplayValue = [CrsAmodel.AdtTur]
.ListIndex = Recno("CrsTypes") && + 1 && 1
* .FirstElement = Recno()
ENDWITH
ENDIF
Ancak Combo da elde etmek istediğim sonucu değilde farklı bir değeri görüyorum ( Bazen bir record yukarısı bazen de aşağısı.) Nerede hata yapıyor olabilirim.
-------------------------------------------------------------------------------------------------------------
Hayat bir bisiklete binmek gibidir. Pedalı çevirmeye devam ettiğiniz sürece düşmezsiniz. Claude Peppeer
Kusuru söylenmeyen adam, ayıbını hüner sanır. Türk Atasözü