void Pdb::MemMenu(ArrayCtrl& array, Bar& bar, const String& exp)
{
if(bar.IsScanKeys())
return;
CParser p(exp);
try {
Val v = Exp(p);
bool sep = true;
if(v.ref > 0) {
if(sep)
bar.Separator();
sep = false;
bar.Add("Memory at " + exp, THISBACK1(MemoryGoto, exp));
}
else
if(v.rvalue) {
if(sep)
bar.Separator();
sep = false;
bar.Add("Memory at 0x" + FormatIntHex((dword)GetInt(v)), THISBACK1(MemoryGoto, "&" + exp));
}
if(!v.rvalue) {
if(sep)
bar.Separator();
sep = false;
bar.Add("Memory at &&" + exp, THISBACK1(MemoryGoto, "&" + exp));
}
}
catch(CParser::Error e) {
}
}
void WorkspaceWork::PackageMenu(Bar& menu)
{
if(!menu.IsScanKeys()) {
bool cando = !IsAux() && package.IsCursor();
String act = UnixPath(GetActivePackage());
menu.Add(cando, ~NFormat("Add package to '%s'", act), IdeImg::package_add(), THISBACK(AddNormalUses));
RemovePackageMenu(menu);
if(menu.IsMenuBar()) {
menu.Add(cando, "Rename package..", THISBACK(RenamePackage));
menu.Add(cando, "Delete package", THISBACK(DeletePackage));
menu.Separator();
menu.Add(cando, "Optimize for speed", THISBACK(TogglePackageSpeed))
.Check(actual.optimize_speed);
menu.Separator();
BuildPackageMenu(menu);
menu.Add("Open Package Directory",THISBACK(OpenPackageFolder));
}
}
}
void WorkspaceWork::RemovePackageMenu(Bar& bar)
{
if(bar.IsScanKeys() || bar.IsScanHelp() || !bar.IsMenuBar())
return;
String active = UnixPath(GetActivePackage());
int usecnt = 0;
for(int i = 0; i < package.GetCount(); i++) {
String pn = UnixPath(package[i].name);
Package prj;
String pp = PackagePath(pn);
prj.Load(pp);
for(int i = 0; i < prj.uses.GetCount(); i++)
if(UnixPath(prj.uses[i].text) == active) {
usecnt++;
bar.Add("Remove from '" + pn + '\'', THISBACK1(RemovePackage, pn))
.Help(NFormat("Remove package '%s' from uses section in '%s'", active, pp));
}
}
if(usecnt > 1) {
bar.MenuSeparator();
bar.Add("Remove all uses", THISBACK1(RemovePackage, String(Null)))
.Help(NFormat("Remove package '%s' from all uses in active project and its submodules", active));
}
}