Form3.Table1.FieldByname('Data').As date:=Strtodate (Edit2.Text); - ошибка

[Alex_7_4_1]

procedure TForm2.Button1Click(Sender: TObject);
var a:integer;
begin
a:=combobox1.ItemIndex;
case a of
0:Form3.Table1.FieldByname('Naprjam ').Asinteger:=ComboBox1.ItemIndex;
1:Form3.Table1.FieldByname('Naprjam ').Asinteger:=ComboBox1.ItemIndex;
else
ShowMessage('Будь лака виберіть тип транзакції');

Form3.Table1.FieldByname('Kod_knugu ').Asinteger:=Strtoint(Edit1.Text);
Form3.Table1.FieldByname('Data').As date:=Strtodate(Edit2.Text);
Form3.Table1.FieldByname('Kilkist') .Asinteger:=Edit3.Text;
Form3.Table1.FieldByname('Kod_rahun ku').Asinteger:=Edit4.Text;
Form3.Table1.FieldByname('Primitka' ).Asstring:=Edit5.Text;
Form3.Table1.Post;
end;
Edit1.Text := ' ';
Edit2.Text := ' ';
Edit3.Text := ' ';
Edit4.Text := ' ';
Edit5.Text := ' ';
end;

[Ошибка] Unit2.pas(52): Undeclared identifier: 'Asdate'
в чом собственно ошибка?
Заранее спасибо!!!

[Баламут]

Form3.Table1.FieldByname('Data').As dateTime:=Strtodate (Edit2.Text);

[dron-s]

или как Баламут сказал или можешь использовать Value

[Gladiator]

Delphi же должен после нажатия точки сам выдавать варианты....
Если не выдает жми ctrl+пробел