请问做个显示系统年月的对话框如何做？例如“2002年11月的工资还没建立，需要建立吗？”

Question

我试着用
var str:string;
.....
str:=inttostr(year)+'年'+inttostr(month)+'月的工资还没建立，需要建立吗？';
.....
application.MessageBox(str,'提示',32+mb_yesno);
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
运行时却出现
[Error] Unit1.pas(36): Incompatible types: 'String' and 'PChar'
可将str改为pchar;
Run时还是不正确，
望得到高手指教！！小弟先谢谢了。

Answer 1

application.MessageBox(PChar(str),'提示',32+mb_yesno);
这样可不可以

Answer 2

str:=FormatDateTime('YYYY"年"MM"月"',NOW)+的工资还没建立，需要建立吗？';