diff options
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/gui/customstyles/frm_test.pas | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/examples/gui/customstyles/frm_test.pas b/examples/gui/customstyles/frm_test.pas index ed96d8cb..6eb30b35 100644 --- a/examples/gui/customstyles/frm_test.pas +++ b/examples/gui/customstyles/frm_test.pas @@ -54,7 +54,6 @@ end; procedure TTestForm.AfterCreate; var miSubMenu: TfpgMenuItem; - lst: TStrings; begin {@VFD_BODY_BEGIN: TestForm} Name := 'TestForm'; @@ -262,8 +261,7 @@ begin miSubMenu.SubMenu := pmSubMenu1; - lst := memStyles.Lines; - fpgStyleManager.AssignStyleTypes(lst); + fpgStyleManager.AssignStyleTypes(memStyles.Lines); end; |