Pascal/Turbo Pascal - Ayuda Conversor de Milisegundos a Dias horas mutos in

Hola Necesito ayuda, neceisto crear en Pascal o en .bat un conversor que me traduzca de Milisegundos a Horas y Días. Serviriía esto?Me da error y no se como solucionarlo
===================================================================
Program Conversor
Begin
if(millis < '0');

long days = TimeUnit.MILLISECONDS.toDays(millis);
millis -= TimeUnit.DAYS.toMillis(days);
long hours = TimeUnit.MILLISECONDS.toHours(millis);
millis -= TimeUnit.HOURS.toMillis(hours);
long minutes = TimeUnit.MILLISECONDS.toMinutes(millis);
millis -= TimeUnit.MINUTES.toMillis(minutes);
long seconds = TimeUnit.MILLISECONDS.toSeconds(millis);

StringBuilder sb = new StringBuilder(64);
sb.append(days);
sb.append(' Days ');
sb.append(hours);
sb.append(' Hours ');
sb.append(minutes);
sb.append(" Minutes ");
sb.append(seconds);
sb.append(" Seconds");

return(sb.toString());
.end

Hola Necesito ayuda, neceisto crear en Pascal o en .bat un conversor que me traduzca de Milisegundos a Horas y Días.