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