摘要： procedure TForm1.btn1Click(Sender: TObject);begin{$Define ss} (* 用于定义一个条件符号，一旦定义，条件符号就为真 *){$IFDEF ss} (* 对条件符号进行判断，为真则编译源文件 *) ShowMessage('ss Has defined!!'); Text := 'ss Has defined!!'; Form1.Color := clLime;{$ELSE} (* 与$IFDEF配合使用，如果$IFDEF条件为假，则只对源文件$ELSE后一小部分进行编译 *) ShowMessage(& 阅读全文