teclado me ocupa la pantalla
hola amigo hoy con una nueva duda:
tengo una aplicacion de registro de usuario en android pero cuando sale el teclado en el telefono me ocupa unos campos donde voy a escribir no se como hacer para que el from se mueva y me deje ver lo que estoy escribiendo. estoy usando delphi 11 |
Hola,
Pueds intentar utilizar el evento "OnVirtualKeyboardShown", que se activa cuando el teclado virtual se muestra en la pantalla. Puedes utilizar este evento para redimensionar o reposicionar tu formulario y asegurarte de que no queda oculto por el teclado. Aqui tienes un ejemplo para Delphi 11: https://docwiki.embarcadero.com/Code...bleForm_Sample |
Cita:
creo que tiene que ver con esto
|
1 Archivos Adjunto(s)
hola que tal existe una libreria llamada ControlMover que permite mover los controles por encima del teclado aqui esta el proyecto de ejemplo Archivo Adjunto 4052
comprobado en delphi Xe7 |
Hola giantonti1801.
Si no has resuelto el problema, mira ésto a ver si te ayuda. A mí me sirvió. Saludos. |
Quizás este enlace también te pueda ayudar.
Un saludo. |
En c++ builder Yo meto todos los controles dentro de un VertScrollBox y en los eventos onVirtualKeyboardShown y onVirtualKeyboardHidden del formulario ejecuto lo siguiente, puedes usar l IA para que te lo traslade a Delphi:
bool keyvisible; TRectangle *rectkeyboard; //Este es un objeto visual invisible que lo pongo alineado al bottom para que siempre este en la parte baja de la pantalla void __fastcall TFormGasto::FormVirtualKeyboardShown(TObject *Sender, bool KeyboardVisible, const TRect &Bounds) { TRectF LFocusRect; FKBBounds = TRectF(Bounds); rectkeyboard->Height = FKBBounds.Height() - rtgfooter->Height; rectkeyboard->Visible = true; keyvisible = true; try{ if (ActiveControl) { LFocusRect = ActiveControl->AbsoluteRect; LFocusRect.Offset(VertScrollBox1->ViewportPosition.X, VertScrollBox1->ViewportPosition.Y); VertScrollBox1->ViewportPosition = PointF(VertScrollBox1->ViewportPosition.X, LFocusRect.top - VertScrollBox1->Height); } }__finally{ } } //--------------------------------------------------------------------------- void __fastcall TFormGasto::FormVirtualKeyboardHidden(TObject *Sender, bool KeyboardVisible, const TRect &Bounds) { rectkeyboard->Visible = false; keyvisible = false; } |
La franja horaria es GMT +2. Ahora son las 05:02:13. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi