Как узнать что щелкнули по browse

[galover]

Всем привет. Есть некий browse, нужно по щелчку по одному из его полей показать popup меню. Сейчас чтобы узнать, что щелкнули по browse проверяю так:

Код: Выделить всё

private function IsBrowseField : boolean;
	{
		result := false;

		if (IsValid(#tblUsers))
		{   
			case CurField() of	
				#tblUsers.FullName, #tblUsers.LoginName,
				#tblUsers.Descr, #tblUsers.DescrGr,
				#tblUsers.SessionsCount:
					result := true;
			end;
		}
	}

cmHotKeys:
		{  
			if (IsBrowseField())
			{
				var menuCommand : word;

				menuCommand := RunMenu('mnuOperations');

				if (menuCommand <> cmCancel)
					PutCommand(menuCommand) 
			} 
}

Есть ли более элегантный способ?