Menüeinträge angeben
Nach oben zu Einträge in das Kontextmenü einfügen
Überschreiben Sie die Methode GetVerbCount, um die Anzahl der Menüeinträge festzulegen, die hinzugefügt werden sollen. Durch Überschreiben der Methode GetVerb geben Sie die Strings an, die im Kontextmenü für die Befehle angezeigt werden sollen. Wenn Sie in der Methode GetVerb in einen String das Zeichen & einfügen, wird das nachfolgende Zeichen unterstrichen angezeigt und kann als Tastenkürzel für den betreffenden Menüeintrag verwendet werden. Soll durch einen Befehl ein Dialogfeld geöffnet werden, fügen Sie am Ende des Strings eine Ellipse (...) hinzu. Der einzige Parameter von GetVerb gibt den Index des Befehls an.
Im folgenden Beispiel werden die Methoden GetVerbCount und GetVerb überschrieben, um zwei neue Befehle in das Kontextmenü einzufügen.
function TMyEditor.GetVerbCount: Integer;
begin
Result := 2;
end;
function TMyEditor.GetVerb(Index: Integer): String;
begin
case Index of
0: Result := "&DoThis ...";
1: Result := "Do&That";
end;
end;
int __fastcall TMyEditor::GetVerbCount(void)
{
return 2;
}
System::AnsiStringBase __fastcall TMyEditor::GetVerb(int Index)
{
switch (Index)
{
case 0: return "&DoThis ..."; break;
case 1: return "Do&That"; break;
}
}
Anmerkung: Achten Sie darauf, dass Ihre GetVerb-Methode für jeden von GetVerbCount angegebenen Index einen Wert zurückgibt.