Property Flat

[PMan]

Hallo

der Aufruf der Property Flat erzeugt in einer ComboBox und in einer TextBox einen syntax error. Ist in der Syntax noch ein Fehler?

Code: Select all

        sCtlName = "cmb" & iSP
        sCtlType = "ComboBox"
        ControlAppend(sCtlName, sCtlType, sCtlGroup, _
           iOffsetX + iLabLen + iOffsetX, iPosH, iFldLen, vField[iSP,5], True)
        cmb          = Control(sCtlName)
        cmb.FontName = sFont
        cmb.FontSize = iFontSize
        cmb.Flat     = True
        cmb.RemoveAll
        cmb.Append("Ja")
        cmb.Append("Nein")

/PMan

[berndnoetscher]

Hallo

der Aufruf der Property Flat erzeugt in einer ComboBox und in einer TextBox einen syntax error. Ist in der Syntax noch ein Fehler?

Code: Select all

        sCtlName = "cmb" & iSP
        sCtlType = "ComboBox"
        ControlAppend(sCtlName, sCtlType, sCtlGroup, _
           iOffsetX + iLabLen + iOffsetX, iPosH, iFldLen, vField[iSP,5], True)
        cmb          = Control(sCtlName)
        cmb.FontName = sFont
        cmb.FontSize = iFontSize
        cmb.Flat     = True
        cmb.RemoveAll
        cmb.Append("Ja")
        cmb.Append("Nein")

/PMan

Sollte gehen, scheint sich ein Fehler im compiler eingeschlichen zu haben. Da ich mich voll auf q7basic konzentriere. Mein Vorschlag: Auskommentieren für q7basic, dann in q7basic wieder reinnehmen.