Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 17-08-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 27
Caral Va por buen camino
Hola
Código SQL [-]
SELECT Codigo, Nombre, Clave  FROM Usuarios WHERE
Codigo = nom
nom es un parametro y se busca asi:
Código Delphi [-]
   ADLogin.Parameters.ParamByName('nom').Value:= EUsuario.Text;
   ADLogin.Active:= True;
   EUsuario.Text:= ADLogin.Fields[1].AsString;
Aqui el parametro nom esta siendo analizado o comparado a EUsuario.Text
No le veo el problema.
Esto no lo entiendo:
Cita:
me dice invalid columm name 'nom'
Los parametros son nombres que se le dan a un campo determinado, igual lo puedes llamar Cod, o codigo o como sea, da igual, es un punto de comparacion, Campo-Componente u otro.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #2  
Antiguo 17-08-2007
TKW04 TKW04 is offline
Miembro
 
Registrado: ene 2007
Posts: 27
Poder: 0
TKW04 Va por buen camino
dice

el adoquery si lo pongo active me dice eso
por eso es que no se que hacer...... te mando mi codigo para lo veas .... el el form....
Responder Con Cita
  #3  
Antiguo 20-08-2007
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 24
enecumene Va por buen camino
esta duda va para caral: hice este login para mi aplicacion de acuerdo a tus sugerencia y me ha quedado asi:

Código Delphi [-]
procedure TFLogin.BitBtn1Click(Sender: TObject);
begin
 LoginOK :=False;
   ADLogin.Active:= True;
   ADLogin.Parameters.ParamByName('cod').Value:= EUsuario.Text;
    If ADLogin.RecordCount < 1 then
    Begin
       Cuenta := Cuenta + 1;
       MessageDlg('Usuario no encontrado',mtError, [mbOK], 0);
       EUsuario.Text := '';
       EClave.Text := '';
       ADLogin.Active := False;
       If Cuenta = 3 then Close;
    end
   else
       If ADLoginpass.AsString = EClave.Text then
        Begin
           LoginOk := True;
           Usuario := ADLoginusername.AsString;
           Nombre := ADLoginnom_user.AsString;
           ADLogin.Active := False;
           Close;
        end
     else
         Begin
           Cuenta := Cuenta + 1;
           MessageDlg('Clave Inválida',mtError, [mbOK], 0);
           EClave.Text := '';
           ADLogin.Active := False;
           If Cuenta = 3 then Close;
         end;
end;

pero me sale el siguiente error al clickear el boton:

Cita:
---------------------------
Debugger Exception Notification
---------------------------
Project Sigesped.exe raised exception class EDatabaseError with message 'Missing Connection or ConnectionString'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
he tratado de dar con el problema y pues me ha roto la cabeza, existe la posibilidad de que el form principal sea MDI? trabajo con ado.

saludos...
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #4  
Antiguo 20-08-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 27
Caral Va por buen camino
Hola
Si se llama al login desde el form principal, hay que ir a projects, option y pasar al form login a available forms.
Si es el primer form, hay que colocarlo en main form.
Con esto ya se elimina el problema.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #5  
Antiguo 20-08-2007
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 24
enecumene Va por buen camino
Caral, precisamente lo tengo asi, el login en forma alvailable y el main en auto-create form y el error persiste todavia
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #6  
Antiguo 20-08-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 27
Caral Va por buen camino
Hola
Te as fijado que en uses del login este el datamodule?
No va a tener conexion si no lo incluye.
Revisalo, no se me ocurre nada.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #7  
Antiguo 20-08-2007
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 24
enecumene Va por buen camino
efectivamente esta incluido en el uses del form
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Login via base de datos en Delphi eudy.net Conexión con bases de datos 1 08-06-2007 07:28:14
Login intraweb rober_kobe Internet 4 06-07-2006 02:55:04
Ayuda En Login Y Pass Para Ingresar En un programa creado en Delphi Solojuegospc.tk Conexión con bases de datos 8 07-07-2005 03:18:28
Automatizar Login JoseQ Internet 0 30-03-2005 12:35:50
Login y Logout douguiehm Varios 5 10-12-2004 19:46:36


La franja horaria es GMT +2. Ahora son las 10:50:20.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi