Código Delphi [-] query1.close; query1.sql.text := 'select now as fechaservidor'; query1.Open; edit1.text := query1.FieldByName('fechaservidor').Astext;
query1.close; query1.sql.text := 'select now as fechaservidor'; query1.Open; edit1.text := query1.FieldByName('fechaservidor').Astext;