Einzelnen Beitrag anzeigen

Benutzerbild von Kedariodakon
Kedariodakon

Registriert seit: 10. Sep 2004
Ort: Mönchengladbach
833 Beiträge
 
Delphi 7 Enterprise
 
#1

Incompatible Typen... Umgehen?

  Alt 25. Feb 2005, 10:54
Mal wieder ne Hirnsinsfrage meinerseits
Kann man hier die Fehlermeldung umgehen ohne Neue Funktionen schreiben zu müssen?

Delphi-Quellcode:
Type
   TSomething   = Class
   Private
      { Private Deklarationen }
      fCheckedFlag:   Boolean;
      FIsValid:         Boolean;
      Function GetIsValid( Const IgnoreCheckedFlag: Boolean = False ):   Boolean;
   Public
      { Public-Deklarationen }
      Property   IsValid:   Boolean   Read GetIsValid;
   End;

Implementation

{ Something }

Function TSomething.GetIsValid( Const IgnoreCheckedFlag: Boolean = False ):   Boolean;
Begin
   If   ( Not( fCheckedFlag ) Or IgnoreCheckedFlag )   Then Begin
      //   Check   ....
      //   FIsValid   :=   ...;
      fCheckedFlag := True;
   End;
   Result   := FIsValid;
End;
Problem ist das: Property IsValid: Boolean Read GetIsValid; Welches ja das: Function GetIsValid( Const IgnoreCheckedFlag: Boolean = False ): Boolean; Aufruft..
Der Compiler sieht das ganze als Problem an , ich aber net wirklich
Kann ich dem irgedwie weiß machen das das kein Problem ist, ohne weitere unnötige checkfunktionen schreiben zu müssen?

Bye
Christian
  Mit Zitat antworten Zitat