Delphi

GALERA ESTOU FAZENDO UM CURSO PARA APRENDER DELPHI, ESTOU TENTANDO RESPONDER ESTA QUESTÃO MAS DANDO UM ERRO E EU Ñ SEI O QUE FAZER

A QUESTÃO É

CRIE UM PROJETO QUE DESCUBRA O DIA DA SEMANA EM QUE UMA PESSOA NASCEU, DE ACORDO COM A DATA DIGITADA.

EU COMECEI FAZENDO

COLOQUEI UM LABEL E UMA EDIT PARA A DATA SER DIGITADA E DEPOIS UM BUTTON PARA EXIBIR O DIA DA SEMANA AO CLICAR NELE.

var

 Form1: TForm1;

 Data:TDateTime;

implementation

{$R *.dfm}

procedure TForm1.Edit1Change(Sender: TObject);

begin

Data:=StrtoDate(Edit1.text);

end;

 

procedure TForm1.Button1Click(Sender: TObject);

begin

ShowMessage('O dia é: '+ DateToStr(DayOfWeek(Data)))

end;

end.

AJUDEM POR FAVOR