OOP: Klassen ableiten

[maximus Caesar]

Ups...

Gibt noch ein Fehler:

Delphi-Quellcode:

type
TRichEdit1 = class (TRichEdit)
 FX1:String;                 // Hier ist der Fehler
 FX2:String;
 FY1:String;
 FY2:String;
public
 property X1 : String Read FX1 Write FX1;
 property X2 : String Read FX2 Write FX2;
 property Y1 : String Read FY1 Write FY1;
 property Y2 : String Read FY2 Write FY2;
 procedure Wegpunktefestlegen;
 procedure Paint;
end;

folgende Fehlermeldung:

[Error] Weg.pas(9): Published field 'FX1' not a class nor interface type