[[José Luis Garcí]]

Y de los apartados el último, el menú



El código en https://gist.github.com/anonymous/6204023

como podéis ver no hay un Splash, de entrada ni una petición de usuario inicial, pero si he puesto



ya que en cuanto suba los archivos, no tendréis información para acceder, lo explico en el código de dicho botón

Código Delphi [-]
procedure TFMenu.SpeedButtonBC2Click(Sender: TObject);
//------------------------------------------------------------------------------
//*******************************************************[ ENTRADA DIRECTA ]****
// Este botón será desactivado al terminar el programa
//------------------------------------------------------------------------------
begin //Realmente lo uso cuando estoy haciendo un programa, para no tener que
      //pasar por la ventana de usuarios, luego siempre lo elimino
   Usuario:='José Luis';
   Nivel:=9;
   VarSClaveUSuario:='231068';
   ALStatusBar1.Panels[1].Text:='Usuario [ '+Usuario+' ]-['+IntToStr(nivel)+']';
end;