Declara Titulo como String y haz el moldeo de tipos al momento de llamar a la función:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
Titulo: PChar;
begin
Titulo := 'Francisco Perez';
Application.MessageBox(
PChar('Guarda los Datos de :' + Titulo),
'Actualizacion',
MB_OKCANCEL + MB_HELP);
end;
// Saludos