Delphi 判断类型的逻辑表达式如何引入程序处理？

如图，像这样的表达式如何引出程序中处理呢？如果有控件的话也请老大们推荐下！谢谢！