Text speichern

[vip11]

is ja noch mein erstes programm
wie wärs hiermit?

Code:

procedure TForm1.FormActivate(Sender: TObject);
begin
CreateDir('Notizen');
end;