クリック イベント内の送信者として ToolStripButton があります。送信者を Toolstripbutton として型キャストし、そのタグ プロパティを整数として取得できるようにする必要があります。私は、次のコードでそれを行っていると思います。プログラムは正常にコンパイルされますが、無効な型キャスト実行時エラーが発生します。
theTool := TMakerTool((sender as ToolStripButton).tag);
TMakerTool = public enum
theTool:TMakerTool
タグ プロパティは、タグを文字列として含むオブジェクトであることがわかります。
それで、私は何を間違っていますか?
ありがとうございました。