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

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

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

Zitat von jaenicke:

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

markieren

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

markieren

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;