如题 新人 谢谢拉

解决方案 »

  1.   

    var
      str: string; 
    begin
      str := 'abc';
     Application.MessageBox(PChar(str), '标题', 64);
    end;
      

  2.   

    Application.MessageBox('Make the selected paragraph background transparent?'#13+
                                '(YES - make transparent; NO - choose color)',
                                'Text Background', MB_YESNOCANCEL or MB_ICONQUESTION)
    Application.MessageBox(PChar('不能打开图片文件: '+od.FileName), '错误',
            MB_OK or MB_ICONSTOP);
      

  3.   

    Application.MessageBox(PChar(Format("adsfadfjalsd %s %d" , ["afads" , 45])) , '标题', 64);
    %s:字符串变量;
    %d:数字变量;
    ...
    看Format(好象是这个,不然就是FormatStr())