var s: string; begin s := Concat('CodeGear', #32 ,'Delphi', #32 ,'2007'); ShowMessage(s); {CodeGear Delphi 2007} end;System 单元下的公用函数目录
举例:
转载于:https://www.cnblogs.com/del/archive/2008/03/29/1129243.html