helper not working anymore for no reason ?

This commit is contained in:
Basile Burg 2018-10-25 00:56:13 +02:00
parent 222b02e8dc
commit bde1c81fad
1 changed files with 1 additions and 1 deletions

View File

@ -3630,7 +3630,7 @@ begin
begin begin
itm := TMenuItem.Create(self); itm := TMenuItem.Create(self);
itm.Caption := lst[i].extractFileName; itm.Caption := lst[i].extractFileName;
itm.Caption := itm.Caption.stripFileExt; itm.Caption := stripFileExt(itm.Caption);
itm.OnClick := @layoutMnuItemClick; itm.OnClick := @layoutMnuItemClick;
itm.ImageIndex := 32; itm.ImageIndex := 32;
mnuLayout.Add(itm); mnuLayout.Add(itm);