Un abraso al Foro.
Resulta que estoy tratando de implementar la autenticación de usuarios en mi web (IntraWeb). Ya estuve revisando la propiedad
AuthList del
IWServerController pero no le pude sacar mucho. Decidí crear mi propio método. Cree una tabla
Usuarios (SQL Server) con dos o tres campos del mismo tipo
nvarchar y aquí viene el código:
Código Delphi
[-]
procedure Tprincipal.IWButton1Click(Sender: TObject);
begin
With ConsolaDatos.SQLTable1 do
begin
Open ;
First ;
if Locate('nick',usuario.Text,[]) then
begin
TFInsertar.Create (WebApplication).Show ;
end
else
WebApplication.ShowMessage('Usted no está Registrado como usuario de esta aplicación.');
close;
end;
end;
Resulta que el
Locate no me funciona para el campo nick, si para otros campos. Es decir, el
Locate no pincha para todos los campos.
Extraño no?
Me gustaría conocer sus comentarios.
Gracias de antemano.