Login-Delphi

[[Caral]]

Hola
Este es un login:

Tabla, Usuarios.
Campos:
CodUsuario, texto(15)
Nombre, Texto(50)
Clave, Texto(50)

revisa el archivo zip.
Pero de todos modos lo voy a poner en ese link, ya que es una aplicacion completa.
Saludos

[TKW04]

Gracias..........disculpa tantas molestias....cualquier cosa que no entienda te puedo preguntar..__??

[[Caral]]

Hola
No hay problema, por supuesto, con gusto.
Saludos

[TKW04]

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, StdCtrls;

[[Chris]]

Empezado por TKW04

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, StdCtrls;

ubieras abierto otro hilo para preguntar eso. De todos modos voy aintentarte explicar.

cada nombre (separado por coma) se les llama unidades. Las unidades contienen codigo ya escrito por otras personas, código que te ayudará en mucho a crear tus programas y evitar que reinventes la rueda. Si hace click sobre el nombre de una unidad manteniendo la tecla CTRL presionada, delphi te abrirá esa unidad en una nueva pestaña, ahí podrás ver las miles de lineas que te nos han ahorrado la gente de borland.

[TKW04]

es como si fueran clases??

[TKW04]

Nome sale el .findkey

[[Chris]]

Con respecto a lo de autenticar un usuario lo podes hacer con un código similar a este:

Código Delphi [-]
If miTabla_de_usuarios.FindKey([Nombre_de_Usuario.text]) Then
Begin
   if (miTabla_de_Usuarios.FieldByName('usuarioContrasena') = ContrasenaEdit.Text) Then
      {aquí puedes determinar accesos a los usuarios y mostrar tu ventana principal}
end;

con respecto a determinar los privilegios de los usuarios consulta este hilo escrito hace poco.
http://www.clubdelphi.com/foros/showthread.php?t=47004

ojala te sirva mi ayuda.