[lazarus] SelectAll on TEdit and TCombobox

[Funky Beast]

Hi,

The following code doesn't work
(i.e. they don't "SelectAll" when the controls are clicked on):

procedure TForm1.Edit1Enter (Sender: TObject );
begin
 Edit1.SelectAll;
end;

procedure TForm1.Edit2Enter (Sender: TObject );
begin
 Edit2.SelectAll;
end;

procedure TForm1.ComboBox1Enter (Sender: TObject );
begin
 ComboBox1.SelectAll;
end;

procedure TForm1.ComboBox2Enter (Sender: TObject );
begin
 ComboBox2.SelectAll;
end;

Is it an LCL's problem or the underlying widgetset's problem?

Lazarus: Latest SVN
FPC: 2.1.1 rev 5191 and 2.0.4
Widgetset: GTK1 on Linux

thanks,
Funky Beast.

_________________________________________________________________
    To unsubscribe: mail [EMAIL PROTECTED] with
               "unsubscribe" as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives