Declaración evento OnClick (Sender) etc var SQL: string Inicio SQL := a lo que dijo neftali unTQuery.Text := SQL unTquery.ExecSQL; FIn;