ListBox, Edit и клавиатура

[Rusland]

На ListBox-e несколько Item-ов, на них поставил Edit-ы. Когда я пытаюсь редактировать нижние Edit-ы, то клавиатура перекрывает их и не видно что набираешь (в моем примере это Номер дома). Как это исправить?

    

 

И как сделать чтобы на клавиатуре вместо кнопки Enter  была кнопка Готово, по нажатию на которую клава бы скрывалась?

Изменено 9 октября, 2015 пользователем Rusland

[umkes]

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; var KeyChar: Char;
  Shift: TShiftState);
//-----------------------------------------------------------------------------
var
  Keyboard : IFMXVirtualKeyboardService;
begin
if Key = vkReturn then begin
if TPlatformServices.Current.SupportsPlatformService( IFMXVirtualKeyboardService, IInterface( Keyboard ) ) then
        if TVirtualKeyboardState.Visible in Keyboard.GetVirtualKeyBoardState then begin
          Keyboard.HideVirtualKeyboard;
          Key := 0;
          Exit;
        end{if};
end{procedure TForm1.FormKeyUp};

Изменено 9 октября, 2015 пользователем umkes

[Равиль Зарипов (ZuBy)]

Для того чтобы поля ввода были видны, в демках есть ScrollableForm

Поизучайте её

[krapotkin]

я временно обошелся, добавив строк в listbox и прокручивая нужное кол-во строк

потом решу, оставить или нет

[Rusland]

Задал вопрос и забыл о нем

 

 

Для того чтобы поля ввода были видны, в демках есть ScrollableForm
Поизучайте её

Так и сделал как в проекте ScrollableForm, но это же ужас добавлять столько кода и доп.компоненты ради этого эффекта. А если форм несколько? Вообще мрак

 

PS. Кроме того этот вариант поглючивает - при первом запуске бывает все равно перекрывает Edit (у меня клавиатура Swype Dragon)

Изменено 27 октября, 2015 пользователем Rusland

[Равиль Зарипов (ZuBy)]

Пользуюсь еще вот таким модулем

 

просто подключаем в uses и используем для Андроид

 

vkbdhelper.zip

[Rusland]

ZuBy, класс!  Жаль что тоже не с первого раза срабатывает.

Изменено 28 октября, 2015 пользователем Rusland

[Cody71727172]

   И как сделать чтобы на клавиатуре вместо кнопки Enter  была кнопка Готово, по нажатию на которую клава бы скрывалась?

 

У Edit свойство KillFocusByReturn = true, ReturnKeyType=Done/Go/Next/Search/Send

[Martifan]

Пользуюсь еще вот таким модулем

 

просто подключаем в uses и используем для Андроид

Спасибо для модуль очень полезная штука и работает с первого раза

а для iOS можно использовать?

[Равиль Зарипов (ZuBy)]

а для iOS можно использовать?

нет, только для андроида

[Martifan]

 

а для iOS можно использовать?

нет, только для андроида

 

Понятно а реально сделат для iOS тоже

[x11]

Здесь видео

отсюда

но там используется VertScrollBox

[x11]

Keep Controls Visible When Virtual Keyboard Pops Up In Delphi

http://www.fmxexpress.com/keep-controls-visible-when-virtual-keyboard-pops-up-in-delphi-10-2-tokyo-on-android-and-ios/

[Уроки программирования]

Вот видео как делать https://www.youtube.com/watch?v=-MEU2NYWMj0&feature=youtu.be 

Сам проект https://yadi.sk/d/nRptAlQFBmTytg