Dato i felt

Dette laver giver dato dd,mm,yyyy ,time:

function GetFileDate(TheFileName: string): string;
    var
      FHandle: integer;
    begin
      FHandle := FileOpen(TheFileName, 0);
      try
        Result := DateTimeToStr(FileDateToDateTime(FileGetDate(FHandle)));
      finally
        FileClose(FHandle);
      end;

    end;

begin
Label2.Caption:=GetFileDate('020805kommode3.jpg');
end;


Hvad skal man skrive,nårman gerne vil have  året først, derefter mdr ogdage.Altså yyyy,mm,dd, time?