uses System.IOUtils;begin if not TDirectory.Exists('data') then begin TDirectory.CreateDirectory('data'); WriteLn('successfully created'); end;end.