Mira!
No se muy bien lo que quieres mas tengo un codigo que verifica una data o horario dependiando de como lo haces!
procedure TForm1.Button1Click(Sender: TObject);
var
DT:TStringList;
begin
DT:=TStringList.Create;
DT.LoadFromFile('C:\root.txt');
if
Date >=StrToDate(Copy(DT.Text,1,10))
then
Application.Terminate;
el archivo de texto que contiene la data 'root.txt'
exemplo:
12/02/2007
espero que ayude en algo es una buena forma de comparar!
|