Delphi-Quellcode:
ResourceString/Const
coForenameChanged = 'Der (Vor-/Nach)Name wurde geändert.'#13#10#10'alter Eintrag : %s %s'#13#10 +
'neuer Eintrag : %s %s'#13#10#10'Soll diese Änderung rückgängig gemacht werden? '#13#10;
...
Begin
if MessageDlg(Format(coForenameChanged, [Patname_Oldvalue, VName_Oldvalue, SQL_PatientPATNAME.AsString,
SQL_PatientVNAME.AsString]), mtWarning, [mbYes, mbNo], 0) = mrYes then....
Um den Vorschlag mit Format mal etwas zu präzisieren.