Comments

3 comments

  • Roy Woll

    I would handle this by sending a tab to the form.

    procedure TValidationDemoForm.wwEdit3KeyUp(Sender: TObject; var Key: Word;
      var KeyChar: Char; Shift: TShiftState);
    var lkeychar: char;
       lkey: word;
    begin
      if length(TwwEdit(Sender).Text)>=TwwEdit(Sender).MaxLength then
      begin
         lkey:= 9;
         lkeychar:= #0;
         KeyDown(lkey, lkeychar, []);
      end;
    end;
    
    0
    Comment actions Permalink
  • Joze Mauro Alves

    Did not work...

    FirePower X 13.0.2.10
    Delphi 10.3 update 2
    Galaxy S7, Android 8.0.0 

    Thanks.

    0
    Comment actions Permalink
  • Roy Woll

    FirePower does not have any automated way of exiting the control. I recommend posting your question to a Embarcadero/FireMonkey forum as your question is generic to any edit control, and probably addressed at the form level.  I don't know of a solution to this.

    0
    Comment actions Permalink

Please sign in to leave a comment.

Powered by Zendesk