diff options
-rw-r--r-- | tools.pas | 6 |
1 files changed, 0 insertions, 6 deletions
@@ -35,7 +35,6 @@ type constructor create; procedure mrProper; function add(neu: tDateiMitDatum): longint; - function last: tDateiMitDatum; function gleicheNamenWie(dmd: tDateienMitDaten): boolean; function toString: string; override; procedure append(dmd: tDateienMitDaten); @@ -113,11 +112,6 @@ begin istSortiert:=false; end; -function tDateienMitDaten.last: tDateiMitDatum; -begin - result:=tDateiMitDatum(inherited last); -end; - function tDateienMitDaten.gleicheNamenWie(dmd: tDateienMitDaten): boolean; var i: longint; |