Verbesserungen?

[tn249]

hi,

hab grad meine erste eigene klasse geschrieben.

könnt ihr die mal nach logischen fehlern durchsuchen(ich bin mir nicht sicher ob ich das klassen-system schon verstanden hab)

Code:

unit tn_POP3;

interface

uses
  IdPOP3;

type
  TtnPOP3 = class
    private
      IdPOP3: TIdPOP3;
    public
      constructor Create;
      destructor Free;
    end;

implementation

constructor TtnPOP3.Create;
begin
  IdPOP3 := TidPOP3.Create(nil);
end;

destructor TtnPOP3.Free;
begin
  IdPOP3.Free;
end;

end.

würde mich sehr über kommentare freuen

MfG
tn249