Messagebox

[jmlifi]

Deseo mostrar el contenido de una variable dentro del MessageBox:

Hago lo siguiente y me da error:

if Application.MessageBox('Pieza '+QuotedStr(RefStr)+ ' encontrada, ¿Desea cambiar su precio?','Pieza Existente',mb_IconQuestion + mb_YesNo) = IdYes then begin

[javitxu]

Prueba con esto:

if Application.MessageBox(PChar('Pieza '+QuotedStr(RefStr)+ ' encontrada, ¿Desea cambiar su precio?'),'Pieza Existente',mb_IconQuestion + mb_YesNo) = IdYes then begin


Suerte :p