eventuell ist diese Funktion mal so gedacht gewesen?

Aber dann hätt man sie besser Clear nennen sollen.
Delphi-Quellcode:
procedure TLiteratur.gibFrei;
begin
zAutor := '';
zTitel := '';
zVerlag := '';
zJahr := '';
zOrt := '';
zISBN := '';
end;
Ein Therapeut entspricht 1024 Gigapeut.