FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
crear login con adotable
este es el codigo que tengo pero me esta dando un error cuando ley al boton aceptar me tira esta error proct factura.exe raised exception clase edatabaserror with message`ADOtable1: cannot perform this operation on a closed dataset`. process stopped. use step or run to continue. y este es el codigo
var Login: TLogin; implementation {$R *.dfm} procedure TLogin.Button1Click(Sender: TObject); begin application.Terminate; end; procedure TLogin.Button2Click(Sender: TObject); begin if adotable1.Seek(edit1.Text) then else showmessage ('UsuarionNo existe'); end; end. quiero saber cual es el parametro o funcion corecta para hacel la conparacion de la tabla if adotable1.Seek(edit1.Text) then no se si esta esta correta esta me funciona bien pero es con ttable pero me lo esta pidiendo usando adotable. en el miismo proyecto pero me estan pideine que tiene que ser con adotable var frmLogin: TfrmLogin; implementation {$R *.dfm} procedure TfrmLogin.Button2Click(Sender: TObject); begin Application.Terminate; end; procedure TfrmLogin.Button1Click(Sender: TObject); begin if Table1.FindKey([Edit1.Text]) then if Table1CLAVE.Value = Edit2.Text then Close else ShowMessage('clave incorrecta!') else ShowMessage('Usuario no existe!'); end; esta esta perfeta mente. gracia y espero que me puedad ayudar. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Sum en AdoTable | novato03 | Conexión con bases de datos | 14 | 02-11-2007 21:58:46 |
Como Crear Login | Stravinsky | Varios | 1 | 15-08-2007 19:54:13 |
Ayuda para crear un formulario de login y pass | Striker | Varios | 8 | 02-08-2006 18:12:35 |
Error al crear un indice en AdoTable | manu | Conexión con bases de datos | 0 | 22-05-2005 16:50:09 |
Actualizar ADOTable en red | MaJeSTiC | Conexión con bases de datos | 2 | 17-08-2004 21:45:01 |
|