Application.MessageBox !!!

[!3d1@n]

Holas a todos por aca:
Quiero concatenar el texto del Mensage pero me da un error ¿Alguien sabrá como hacerlo ? He aqui mi codigo.


procedure ...
begin
Msg := 'Las horas reportadas no pueden ser mayor que ' + Edit1.Text;
Application.MessageBox(Msg, 'Información', MB_Ok or MB_ICONWARNING);
Abort;
end;


El error es el sgte (Incompatibles type : 'String and PChar')
Y no tengo idea como convertir un Pchar a String. Aunque no se si con eso resolveré el error.

Gracias ...

[marcoszorrilla]

procedure TForm1.Button1Click(Sender: TObject);
var
msg:String;
begin
Msg := 'Las horas reportadas no pueden ser mayor que ' + Edit1.Text;
Application.MessageBox(PChar(Msg), 'Información', MB_Ok or MB_ICONWARNING);
Abort;
end;


Un Saludo.

[!3d1@n]

Sabes, tengo declarada la variable Msg como cadena lo que se paso ponerla en el hilo. Gracias por lo de convertir un Pchar