var Form5: TForm5; {$DEFINE WANYI}implementation{$R *.dfm}procedure TForm5.Button1Click(Sender: TObject);begin {$IFDEF WanYi} ShowMessage('标识符 WanYi 已定义'); {$ELSE} ShowMessage('标识符 WanYi 未定义'); {$ENDIF}end;
posted on 2019-05-12 15:27 newlives 阅读(120) 评论(0) 编辑 收藏 举报