delphi根据数据库服务器时间来限制软件使用的问题，请教！

代码是这样的，我点击butto空间就去匹配数据库服务器上的时间。根据时间来做使用限制。请教怎么操作呢？我代码错在哪里？procedure TForm2.Button1Click(Sender: TObject);
begin
 ADOConnection1.Execute('select { fn NOW() } as 服务器时间');
 if '服务器时间'>='2013-04-08'
 then
   begin
showmessage('对不起,你的系统已经到期无法登陆!');
Application.Terminate;
end;