MSFlexGrid - Anzeigefehler

Or1on

Grünschnabel
Hallo Community!

Ich bin gerade dabei Daten aus einer Accessdatenbank in ein MSFlexGrid zu schreiben, jedoch zeigt er, wie hier zu sehen ist, den letzten Nachnamen nicht an.

Hier der benutzte Code:
Code:
Set bColl.DataSource = rs 'bColl = BindingConnection

rs.MoveFirst
While Not rs.EOF 'rs = Recordset
    fg_Mitglieder.Rows = rs!Kundennummer + 1
    fg_Mitglieder.Row = rs!Kundennummer
    fg_Mitglieder.Col = 0
    bColl.Add fg_Mitglieder, "Text", "Kundennummer"
    fg_Mitglieder.Col = 1
    bColl.Add fg_Mitglieder, "Text", "Vorname"
    fg_Mitglieder.Col = 2
    bColl.Add fg_Mitglieder, "Text", "Nachname"
    rs.MoveNext
Wend

Freue mich über schnelle Hilfe.

lg or1on
 

Neue Beiträge

Zurück