Pantalla Login

[[enecumene]]

Una Pregunta BlueSteel:

Código Delphi [-]
Try
        Login.ShowModal;
        Barra1.Panels[3].Text:=GetUserName;
        Barra1.Panels[5].Text:=Validar.Sw2;
        Sw2 := Validar.Sw1;
        Sw4 := Validar.Sw3;
     Finally

que quieres decir con Barra1, Sw2, Sw4, Sw1 y Sw3?

[[BlueSteel]]

Empezado por enecumene

Una Pregunta BlueSteel:que quieres decir con Barra1, Sw2, Sw4, Sw1 y Sw3?

el Barra1.Panel... no lo tomes en cuenta.. ya que eso correponde a la Barra de Estado del Sistema (utilzo el componente StatusBarPro).. en donde despliego el Nombre de Usuario de Windows con la funcion GetUserName y el nombre de Usuario del Sistema....( Sw2)

con respecto a los otros

Sw1 := IBQ_Password['Usu_Tipo']; // tipo de usuario... Administrador - Operador - Digitador.. con esto restringo el menu, ya que cree 3 tipos de usuarios...

[vtdeleon]

Empezado por enecumene

[...]y como hacerlo que en vez darle al boton dandole Enter?

En el evento OnKeyPress del edit poner

Código Delphi [-]
Begin
  if key=#13 then Begin //#13 igual a Tecla Enter
//    la rutina
  end else
....
....

Por ultimo decirte que este tema se ha tratado bastante, creo que encontraras suficiente informacion si las buscas en el foro.