SuggestEdit (C++)

Description

This example demostrates the use of a buttoned edit. The edit box is configured to have both right and left buttons enabled. The right button adds the current text into a menu and the left button displays that menu. Clicking a menu item will enter the text back to the edit.

Code

void __fastcall TMainForm::edtSuggestRightButtonClick(TObject *Sender)
{
	TMenuItem* item;
	TButtonedEdit* edit;
	TPopupMenu* menu;

	/* Retrieve the edit and the menu. */
	edit = dynamic_cast<TButtonedEdit*>(Sender);
	menu = edit->LeftButton->DropDownMenu;

	/* Check if the text is nonempty and is not already
	   added to the menu. */

	if (edit->Text == "")
		return;

	/* Also note that you need to strip the hot key, 
	   since the menu adds the & character automatically */
	for (int i = 0; i < menu->Items->Count; i++)
		if (StripHotkey(menu->Items[i].Caption) == edit->Text)
			return;

	/* Create a new menu item and add it to the menu. */
	item = new TMenuItem(menu);
	item->Caption = edit->Text;
	item->OnClick = MenuItemClick;

	menu->Items->Add(item);
}

void __fastcall TMainForm::MenuItemClick(TObject *Sender)
{
  /* When a menu item is selected, add its caption
	  to the edit box. */
  edtSuggest->Text =
	StripHotkey(dynamic_cast<TMenuItem*>(Sender)->Caption);
}

Uses

• Vcl.Menus.TMenuItem ( fr | de | ja )
• Vcl.ExtCtrls.TEditButton.DropDownMenu ( fr | de | ja )
• Vcl.Menus.StripHotkey ( fr | de | ja )