Problemas con string, word... de facil solucion seguro

[cslbcn]

Buenos dias. Aviso que soy muy noob en delphi. con etse codigo:

Código Delphi [-]
var
  Form1: TForm1;
  Dia,Mes,Ano:word;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
DecodeDate(DateTimePicker.DateTime,Dia,Mes,Ano);
Edit1.name := Dia;
Edit2.name := Mes;
Edit3.name := Ano;
end;

Me sale este error:

Incompatible types: string and word


qué puede pasar? Alguna solucion?
Graciaaas

[tcp_ip_es]

var
  Form1: TForm1;
  Dia,Mes,Ano:word;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
DecodeDate(DateTimePicker.DateTime,Ano,Mes,dia);
Edit1.name := inttostr(Ano);
Edit2.name := inttostr(Mes);
Edit3.name := inttostr(Dia);
end;

[cslbcn]

Ha funcionado! Mil gracias. Pero cuando ejecuto el programa me sale este error:

Project xx.exe raised exception class EComponentError with message "2008": is not a valid component name. Process stopped.

Con este codigo, cuando le doy a button, la fecha del DateTimePicker la descompone en 3 casillas. Pero parece que da fallo con el campo año no?

A que puede ser debido?

[tcp_ip_es]

Supongo que si lo que quieres es que te aparezca el dia, mes y año en los tres edits, la propiedad a la que se lo tienes que asignar es Text, ya que el nombre de un componente no puede ser un número, de tal manera que :

var
  Form1: TForm1;
  Dia,Mes,Ano:word;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
DecodeDate(DateTimePicker.DateTime,Ano,Mes,dia);
Edit1.Text:= inttostr(Ano);
Edit2.Text := inttostr(Mes);
Edit3.Text := inttostr(Dia);
end;

[cslbcn]

Si señor!
Muchisimas gracias tcp_ip_es. Agredezco tu ayuda.

hasta luego!