fnclistbox does not respond to keypress

Drop a Ttmsfnclistbox in a VCL form, check previewKey in VCL form and have only the following event:
procedure TForm1.TMSFNCListBox1KeyPress(Sender: TObject; var Key: Char);
begin
ShowMessage('key pressed');
end;
Run app, select listbox and press any key.
Nothing is shown

I confirm such behavior. i checked in Lazarus

Hi,

Please use

TMSFNCListBox1.TreeView.OnKeyPress := TMSFNCListBox1KeyPress;

The TTMSFNCListBox is a wrapper around the tree-view, but doesn't expose it's methods yet. We'll see what can be done.

@Pieter_Scheldeman Thanks. In lazarus, this solves the problem.