Tstatictext und bevelkind???? compilererror

[richard_boderich]

hallo zusammen,

ich hab ein sehr komisches problem.

wenn ich ein tstatictext mit

bla:=Tstatictext.create(self) erzeuge und

dann die eigenschaft bla.bevelkind:=bkflat setzte, bekomme ich folgenden compilerfehler.

"inkompatible typen: Tbevelkind und TQbarkind"

der gag ist das alle anderen 3 bevelmodes funktionieren (bk none,bksoft,bktile)
nur bei bkflat krieg ich den fehler. und um es noch seltsamer zu machen, wenn ich
ein tstatictext im designmodus auf das form lege und bkflat einstelle dann geht das auch.

weis einer rat? mir is das ganze suspect.

danke fuer eure zeit und muehen.

richard

[Hawkeye219]

Hallo Richard,

wahrscheinlich liegt es an der USES-Anweisung in deinem Programm. TBevelKind kommt normalerweise aus der Unit "Controls". Wenn nun eine weitere Unit hinter Controls einen Typ anbietet, der ebenfalls die Konstante "bkFlat" enthält, kommt es zum beschriebenen Fehler. Delphi benutzt immer die letzte passende Unit in einer USES-Anweisung für die Namensauflösung.

Mögliche Lösungen:

1.) ändere die Reihenfolge in der USES-Anweisung (Controls nach hinten setzen).
2.) erweitere den Namen der Konstanten um die Unit: Controls.bkFlat

Gruß Hawkeye

[richard_boderich]

hey danke du, jetzt klappt es

wir muessen mal einen zusammen

Richard