if Application.MessageBox('Los datos seran modificados. Esta usted seguro ?','Advertencia', MB_OKCANCEL+MB_ICONWARNING)= mrOK then
Begin
Datos.QryEmpleado.Active:= False;
Datos.QryEmpleado.SQL.Clear;
Datos.QryEmpleado.SQL.Add('UPDATE Empleado SET');
Datos.QryEmpleado.SQL.Add('Login=' + '''' + EdMlogin.Text + '''' + ',');
Datos.QryEmpleado.SQL.Add('Password=' + '''' + EdMpassword.Text + '''' + ',');
Datos.QryEmpleado.SQL.Add('Nombre=' + '''' + EdMNombre.Text + '''' + ',');
Datos.QryEmpleado.SQL.Add('Appaterno=' + '''' + EdMAppaterno.Text + '''' + ',');
Datos.QryEmpleado.SQL.Add('Apmaterno=' + '''' + EdMApmaterno.Text + '''' + ',');
Datos.QryEmpleado.SQL.Add('Nivel=' + '''' + EdMNivel.Text + '''' + ',');
Datos.QryEmpleado.SQL.Add('WHERE NumeroEmpleado=' + '''' + LblClave.caption + '''' + ';');
Datos.QryEmpleado.ExecSQL;
end