OOP Problem: kein Zugriff auf Prozeduren

[maximus Caesar]

Habs raus!
Danke für die Hilfe!
Bsp:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var Obj1: TObjekt1;
begin
Obj1:=TObjekt1.Create;
Obj1.WriteTyp('TEST');
showmessage(Obj1.GetTyp);
end;

PS: Das Tutorial hab ich schon. Jetzt versteh ichs auch besser!