commandlist.pas

来自「Delphi利用MVC开发的典型例子」· PAS 代码 · 共 15 行

unit commandlist;

interface

const
  CMD_SHOW_ABOUT = 'show about form';
  CMD_REQUIRE_INDEXTREE = 'ask for the index tree view';
  CMD_SHOW_INDEXTREE = 'show the index tree in main form';
  CMD_TREEINDEX_SELECT = 'a node in a tree was selected';

implementation

end.