13.11.2010 20:19, Sven Barth wrote:
  TTestObject = class
  public
    function ToString: String;
    function Equals(aObject: TObject): Boolean;
  end;
You are just redeclaring the method. Try to add ToString property or declare a ToString argument in some method and you should get an error.

Best regards,
Paul Ishenin.
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to