FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#7
|
|||
|
|||
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; } |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Tablet Teclado en pantalla y Delphi | elguille | Varios | 0 | 28-10-2020 08:42:06 |
Teclado en pantalla | glopez | API de Windows | 8 | 10-05-2012 09:47:02 |
Teclado en Pantalla | tec | Varios | 8 | 08-02-2010 10:00:51 |
Teclado en pantalla | Alex1 | API de Windows | 4 | 09-11-2007 10:54:44 |
Componente teclado en pantalla | jamonete2 | OOP | 3 | 10-06-2005 18:17:09 |
|