Hallo,
ich habe eine
Unit Fmain. In die wird ein Frame FLayout eingefügt. Damit ich in Fmain eine Methode aus FLayout benutzen kann, muss ich diese Methode alss Klassenmethode definieren, sonst bekomme ich eine entspechende Fehlermedung.
Soweit so gut:
Code:
type
TLayout = class(TFrame)
class procedure LayoutLoad(name: string);
end;
Code:
class procedure TLayout.LayoutLoad;
var
farbe, R, G, B: string;
begin
farbe := TEdit(FindComponent('E' + name)).text; // Hier Fehler
R := copy(farbe, 2, 2);
G := copy(farbe, 4, 2);
B := copy(farbe, 6, 2);
TShape(FindComponent('S' + name)).Brush.Color := StringToColor('$00' + B + G + R); // Hier Fehler
end;
Jetzt bekomme ich aber die selbe Fehlermeldung wie anfangs in Fmain in FLayout:
Zitat:
Diese Form des Methodenaufrufs ist nur für Klassenmethoden erlaubt
Und zwar in den oben kommentierten Zeilen.
Wie soll ich da vorgehen?
Schon mal vielen Dank,
Billi