Teclado virtual se superpone a los controles de entrada

[[kurono]]

y el ejemplo que motraste mas arriba de embarcadero que tal funciona

[MAXIUM]

Empezado por kurono

y el ejemplo que motraste mas arriba de embarcadero que tal funciona

No funciona

Tal parece que no resulta para todas las versiones de Firemonkey. Embarcadero tiene una tarea pendiente https://stackoverflow.com/questions/...eyboard-height

[[kurono]]

acabo de bajar la unit vkdbhelper y ya la probe funciona a la primera creo que me quedo con esta

[MAXIUM]

Empezado por kurono

acabo de bajar la unit vkdbhelper y ya la probe funciona a la primera creo que me quedo con esta

¿Que versión de Delphi estas usando?

[[kurono]]

delphi xe7 update 1

[jhonalone]

Hola MAXIUM.
Con tu mismo código, Samsung J5, Android 6.0.1, DX10 Seattle

Código Delphi [-]
unit HeaderFooterTemplate;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
  FMX.Edit, FMX.Controls.Presentation, vkbdhelper;

type
  THeaderFooterForm = class(TForm)
    Header: TToolBar;
    Footer: TToolBar;
    HeaderLabel: TLabel;
    Edit1: TEdit;
    Button1: TButton;
    Edit2: TEdit;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  HeaderFooterForm: THeaderFooterForm;

implementation

{$R *.fmx}

end.

[IMG]http://www.clubdelphi.com/foros/atta...1&d=1508687402[/IMG]

Como te dije, la primera vez que pulsas el TEdit puede que se solape, pero después ya no.

Mis disculpas, por no saber subir la imagen de modo que salga directamente en el mensaje. Creo que es la primera vez que lo intentod y no conozco otro modo.

Saludos

[hernandoh]

Hoal es mi primera vez en el foro, pero tengo algo así:

Código Delphi [-]
procedure TLoginForm.FormVirtualKeyboardShown(Sender: TObject;
  KeyboardVisible: Boolean; const Bounds: TRect);

  var
  alto_pantalla,alto_teclado,pos_obj,pos_focus : integer;
  total_pos : Extended;
  control : TCOntrol;
begin
  alto_pantalla := Screen.Height;
  alto_teclado := Bounds.Height;

  control:= LoginForm.GetFocused as TControl;
  pos_obj := round(control.Position.Y);

  total_pos := round(alto_pantalla - alto_teclado);
  pos_focus := pos_obj - alto_teclado;

  if pos_obj > total_pos then
  begin
    Login_contenedor.Align := TAlignLayout.None;
    login_contenedor.AnimateFloat('Position.Y',-(pos_focus),0.1,TAnimationType.InOut,TInterpolationType.linear);
  end;
end;

No está completo pero seguro funciona; le puedes cacharrear y mejorar. Si logras mejorarlo, lo compartes por fa, es la idea del foro. :P


saludos.

[rdaniel2000]

La solucion es esta:

Esta libreria MoveControlForVK

Buscala en google, la probe y funciona muy bien...

[jhonalone]

Empezado por rdaniel2000

La solucion es esta:

Esta libreria MoveControlForVK

Buscala en google, la probe y funciona muy bien...

Hola rdaniel2000.
He estado buscando en Google la solución que propones y he leído los comentarios que se han hecho a esta solución.

Personalmente, creo que es más sencillo y operativo la solución de vkbdhelper propuesta más arriba. (Salvo que no haya encontrado la misma página que tu)
Yo me refiero a esta página. No parece ser la "gran solución"
Saludos a todos.