'Der Vorgang kann nicht erzeugt werden', Delphi 7

[Bjoerk]

Und in deiner Main dann z.B. so:

Delphi-Quellcode:

var
  TextClass: TText;
  I: integer;
begin
  TextClass := TText.Create;
  try
    TextClass.ClrScr;
    try
      for I := 0 to 15 do
        TextClass.printf('Hallo Welt!', I);
      Readln;
    except
      on E: Exception do
        Writeln(E.Classname, ': ', E.Message);
    end;
  finally
    TextClass.Free;
  end;
end.