나사로 파스칼에서 날짜로 문자열을 변환

Question

나는 파스칼 프로그래밍에 새로운 꿀벌이다. 나는 하루 종일 문자열을 유효한 날짜로 변환하여 나중에 다른 날짜를 뺄 수있다. 두 날짜 사이의 날짜. 수 pls pls 도와주세요.

은 내가 calulation에서 사용할 수있는 날짜 문자열 형식으로 입력 첫 데이트를 변환하려고이 코드로 시작 : 나는 더 프로그램을 확대 할 것으로 예상하고있다

program TryDate; 

Var 
date1: TDateTime; 
thedate:string; 

Begin 
Writeln ('Enter date'); 
Readln (thedate); 
date1:=StrToDate (thedate); 
Writeln ('The date is ',date1); 
end. 


The program's basic structure can be seen here: 

Begin 
Writeln ('Enter customer last name'); 
readln (clname); 
Writeln ('Enter customer first name'); 
readln (cfname); 
Writeln ('Enter Dvd Title'); 
readln (dvdtit); 
Writeln ('Enter Due Date'); 
readln (dued); 
Writeln ('Enter Actual Date Returned'); 
readln (adret); 
daysover:=adret-dued; 
readln; 
end. 

이에려고 이 작은 부분을 다른 구성 요소를 시도하기 전에 작동 시키십시오.

간단한 안내와 예제 또는 가능한 해결책을 제공해 주시면 대단히 감사하겠습니다.

Answer 1

지금까지 얻은 코드에 어떤 문제가 있는지 지정하지 않았습니다. 실제 코드가 정확히 게시 한 것 같은 경우 내가 볼 수있는 유일한 문제는이 같은 uses sysutils;을 지정하지 않은 점이다

program TryDate; 

uses sysutils; 

Var 
    date1: TDateTime; 
    thedate: string; 

Begin 
    Writeln ('Enter date'); 
    Readln (thedate); 
    date1 := StrToDate (thedate); 
    Writeln ('The date is ',date1); 
end. 

StrToDate 기능은 sysutils 단위의 일부입니다 함수, 형식 등을 사용하려면 프로그램에 uses을 포함시켜야합니다.

Answer 2

Andriy 외에도 OS 정보 또는 날짜를 입력하는 형식도 제공하지 않습니다.

on * nix는 USES 절에 clocale을 추가하여 선호하는 날짜 형식을 포함하는 로케일 시스템을 초기화해야하기 때문에 중요합니다. `내가 찾던 무엇 http://www.freepascal.org/docs-html/rtl/dateutils/scandatetime.html