сравнение дат

[Geddar]

в table есть поле типа datetime а нем храниться дата рождения, мне надо проверить младше ли человек определенного возраста, я написал так

if table1data.asdatetime<01.01.1967
then ...

отказываеться компилить, ошибка "record,object or class type reuired", как нужно написать правильно?

[FaTaL]

Кайфолом было делать с Таблицой, но думаю разберёшся:

procedure TForm1.Button1Click(Sender: TObject);
var
d:TdateTime;
begin
  d:=StrToDate(Edit1.Text);
  If d<StrToDate('01.01.1967') then
  showmessage('XXX') else
  Showmessage('CooL');
end;

[Geddar]

разберусь, спсибо