TEDit not firing OnChange when echoMode=emPassword
Original Reporter info from Mantis: Hansaplast
-
Reporter name: Hans Luijten
Original Reporter info from Mantis: Hansaplast
- Reporter name: Hans Luijten
Description:
The TEdit "OnChange" event never fires when "echoMode" is set to "emPassword".
Under Windows this event does fire.
Note: The "OnKeyUp" event does fire just fine, so I use this as a workaround right now.
Steps to reproduce:
Add TEDit and TLabel to a new form, and add an OnChange event to the TEdit which sets the TLabel caption to the TEdit text.
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls;
type
{ TForm1 }
TForm1 = class(TForm)
Edit1: TEdit;
Label1: TLabel;
procedure Edit1Change(Sender: TObject);
private
public
end;
var
Form1: TForm1;
implementation
{$R *.lfm}
{ TForm1 }
procedure TForm1.Edit1Change(Sender: TObject);
begin
Label1.Caption:=Edit1.Text;
end;
end.
Additional information:
Lazarus 2.1.0 r62008M
FPC 3.0.4
x86_64-darwin-cocoa (beta)
Forum post: https://forum.lazarus.freepascal.org/index.php/topic,47012.0.html
Mantis conversion info:
- Mantis ID: 36158
- OS: macOS
- OS Build: 10.14.x
- Build: 62008
- Platform: Cocoa
- Version: 2.0.5 (SVN)
- Fixed in revision: 62054 (#343916af)