SelectItemNameCopyAction1: TMenuItem;
B6: TMenuItem;
T9: TMenuItem;
- C2: TMenuItem;
+ NameCopyPMenu: TMenuItem;
SelectComboBox: TComboBox;
MainCoolBarPopupMenu: TPopupMenu;
StdToolBarVisiblePMenu: TMenuItem;
procedure TGikoForm.ListPopupMenuPopup(Sender: TObject);
var
- bBoard, bCategory : Boolean;
+ bBoard, bCategory, bBBS : Boolean;
begin
bBoard := (GetActiveList is TBoard);
bCategory := (GetActiveList is TCategory);