mirror of https://gitlab.com/basile.b/dexed.git
fix, auto select category before first message
instead of after adding a new list item
This commit is contained in:
parent
b55f6ec9cb
commit
45c9468f47
|
@ -416,6 +416,8 @@ begin
|
|||
dt := new(PMessageData);
|
||||
dt^.data := aData;
|
||||
dt^.ctxt := aCtxt;
|
||||
if fAutoSelect then if fCtxt <> aCtxt then
|
||||
fBtns[aCtxt].Click;
|
||||
item := List.Items.Add(nil, aValue);
|
||||
item.Data := dt;
|
||||
item.ImageIndex := iconIndex(aKind);
|
||||
|
@ -423,8 +425,6 @@ begin
|
|||
clearOutOfRangeMessg;
|
||||
scrollToBack;
|
||||
Application.ProcessMessages;
|
||||
if fAutoSelect then if fCtxt <> aCtxt then
|
||||
fBtns[aCtxt].Click;
|
||||
filterMessages(fCtxt);
|
||||
end;
|
||||
|
||||
|
|
Loading…
Reference in New Issue