Record, Objekt oder Klassentyp erforderlich

[DelphiHacka317]

Hallo
hab ein Problem mit Delphi und zwar zeigt er die Fehlermeldung "[Fehler] uHaupt.pas(62): Record, Objekt oder Klassentyp erforderlich" an bei folgender Funktion:

Zitat:

procedure TForm1.bAusrechnenClick(Sender: TObject);
var eMonat : Byte;
eJahr : Word;
begin
eMonat:=StrToInt(eMonat.Text);
eJahr:=StrToInt(eJahr.Text);
eTage.Text:=IntToStr(Taganzahl(eMonat,eJahr));
end;

Danke

[mkinzler]

eMonat ist als Byte deklariet und überdeckt eine eventuell existierende Komponente des selben Namens

[jaenicke]

Ich vermute einmal eMonat heißt auch ein Editfeld auf deinem Formular? Dann darfst du keine gleichnamige Variable zusätzlich deklarieren...

[Sir Rufo]

Zitat:

Zitat von jaenicke (Beitrag 1125697)

Ich vermute einmal eMonat heißt auch ein Editfeld auf deinem Formular? Dann darfst du keine gleichnamige Variable zusätzlich deklarieren...

Darf wohl, aber ...

der Compiler impliziert normalerweise in den Klassenmethoden vor den Klassenvariablen das Self.
Wird in einer Klassenmethode eine lokale Variable deklariert, die gleich lautet wie eine Klassenvariable, dann muss man das Self explizit mit angeben, denn sonst geht der Compiler davon aus, dass man die lokale Variable meint ;)

Delphi-Quellcode:

procedure TForm1.bAusrechnenClick(Sender: TObject);
var 
  eMonat : Byte;
  eJahr : Word;
begin
  eMonat := StrToInt( Self.eMonat.Text);
  eJahr :=StrToInt( Self.eJahr.Text);
  eTage.Text :=IntToStr( Taganzahl( eMonat, eJahr ) );
end;

Es empfiehlt sich aber - schon alleine zur Verbesserung der Lesbarkeit - dieses zu vermeiden ;)

Delphi-Quellcode:

procedure TForm1.bAusrechnenClick(Sender: TObject);
var 
  AMonat : Byte;
  AJahr : Word;
begin
  AMonat := StrToInt( eMonat.Text);
  AJahr :=StrToInt( eJahr.Text);
  eTage.Text :=IntToStr( Taganzahl( AMonat, AJahr ) );
end;