Einzelnen Beitrag anzeigen

Muetze1
(Gast)

n/a Beiträge
 
#4

Re: MessageDlg : Anzeigetext mit Datenbankfeldern - Code kür

  Alt 15. Nov 2006, 12:16
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.
  Mit Zitat antworten Zitat