Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Sicherheitsabfrage mit Namen in MessageDlg (https://www.delphipraxis.net/89794-sicherheitsabfrage-mit-namen-messagedlg.html)

LOMBI 5. Apr 2007 19:57


Sicherheitsabfrage mit Namen in MessageDlg
 
Hallo,

ich möchte aus einem TStringGrid z.B. eine Kundenzeile löschen.
Wie bitte erreiche ich, dass in MessageDlg der Name erscheint?


S_SAFETYFIRST = 'Wollen Sie den Kunden "%s" wirklich löschen?';

Delphi-Quellcode:
procedure TFTest.BtnDeleteClick(Sender: TObject);
var
  msg: String;
begin
   msg := Format(S_SAFETYFIRST, ... //hier weiß ich leider nicht weiter;
   if MessageDlg(msg, mtConfirmation, [mbOK, mbCancel], 0) = mrOK then
    ABSTable1.Delete;
end;
Für Hilfe besten Dank vorab!

Gruß
LOMBI

Zacherl 5. Apr 2007 20:05

Re: Sicherheitsabfrage mit Namen in MessageDlg
 
Delphi-Quellcode:
msg := Format(S_SAFETYFIRST, [STR_KUNDE]);

LOMBI 5. Apr 2007 20:15

Re: Sicherheitsabfrage mit Namen in MessageDlg
 
Delphi-Quellcode:
msg := Format(S_SAFETYFIRST, [STR_NAME]);
Hi Florian,

die Spalte im Grid heißt NAME.
Ich bekomme leider die Meldung "Undefinierter Bezeichner: ..."

LOMBI 5. Apr 2007 20:46

Re: Sicherheitsabfrage mit Namen in MessageDlg
 
Hab's selbst rausgefunden:

Delphi-Quellcode:
msg := Format(S_SAFETYFIRST, [ABSTable1.FieldByName('NAME').AsString]);


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:15 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz