CheckOpenMnemo

Функция вернёт True если мнемосхема MnemoName открыта в модуле «Монитор», если мнемосхема не открыта функция возвратит False.

Синтаксис
CheckOpenMnemo(MnemoName: String): Boolean
Входные параметры
Имя параметра	Тип параметра	Описание
MnemoName	String	Наименование мнемосхемы
Выходные параметры
Тип параметра		Описание
Boolean		True - мнемосхема открыта False - мнемосхема не открыта

Begin

If CheckOpenMnemo('тест1') then //если открыта мнемосхема "тест1", то закрыть ее

begin

CloseMnemo('тест1'); //закрывается мнемосхема "тест1"

end

else //иначе открой мнемосхему "тест2"

begin

OpenMnemo('тест2'); //откроется мнемосхема "тест2"

end;

end.