| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
snupoo
Lt Cmdr
Registrado: 19 Feb 2004Mensajes: 108Ubicación: Merida yucatan Mexico
|
 Publicado: Lun 11 Oct, 2004 10:25 pm Asunto: cambiar pantalla de coneccion a BD |
 |
|
Este es el codigo que utilizo para cambiar la pantalla que por defecto muestra el C++ builder pero muestra el form personalizado y despues muestra el que trae por defecto.
| Código: |
void __fastcall TDato::ADOConnection1WillConnect(
TADOConnection *Connection, WideString &ConnectionString,
WideString &UserID, WideString &Password,
TConnectOption &ConnectOptions, TEventStatus &EventStatus)
{
if(nombre.IsEmpty())
if(LoginForm->ShowModal()==mrOk){
nombre=LoginForm->Edit1->Text;
clave=LoginForm->MaskEdit1->Text;
prib=LoginForm->ComboBox1->ItemIndex;
}
UserID=nombre;
Password=clave;
}
|
Tambien he tratado con el evento OnLogin con el mismo codigo pero sucede al revez, muestra la pantalla por defecto y luego el personalizado.
si alguien del foro puede ayudarme, lo que sea me sera de gran utilidad.
Gracias 
_________________
[img]http://folding.extremeoverclocking.com/sigs/sigimage.php?un=snupoo&t=86565/sigimage.gif[/img]
A programar se aprende programando |
|
| Volver arriba |
|
 |
diabolik100
Cdt
Registrado: 05 Ago 2004Mensajes: 15
|
| Publicado: Lun 25 Oct, 2004 3:39 am Asunto: |
|
|
| Si te refieres a que no quieres que aparezca la pantalla de conexion donde te pide el usuario y la contraseña, entonces pon la propiedad LoginPromp en false del ADOConnection y llena los valores así como lo estas haciendo en tu codigo |
|
| Volver arriba |
|
|
snupoo
Lt Cmdr
Registrado: 19 Feb 2004Mensajes: 108Ubicación: Merida yucatan Mexico
|
| Publicado: Mar 26 Oct, 2004 9:44 pm Asunto: |
|
|
Hola diabolik100.
Era eso Gracias.
_________________
[img]http://folding.extremeoverclocking.com/sigs/sigimage.php?un=snupoo&t=86565/sigimage.gif[/img]
A programar se aprende programando |
|
| Volver arriba |
|
|
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
