Filtern ob etwas funktioniert hat oder nicht

[Christian18]

Hallo,

ich möchte gerne das eine Meldung kommt ob das Sichern der DB s funktioniert hat oder nicht. Wie mache ich das?

Hier mein Code:

ShellExecute(FTagessicherung.Handle, nil, 'pacomp',PChar('-a -c2 -r -P -q ' + Edit1.Text + ' C:\Projekte\SLNPraxis\Daten\1*.*'), nil, SW_NORMAL);

[Evian]

Also ich kenne mich nicht so gut mit DBs aus, aber theoretisch müsste es so gehen:

Code:

BEGIN
try
  ShellExecute(FTagessicherung.Handle, nil, 'pacomp',PChar('-a -c2 -r -P -q ' + Edit1.Text + '  
  C:\Projekte\SLNPraxis\Daten\1*.*'), nil, SW_NORMAL);

  FINALLY
    shomessage('hat funktioniert');
  END;
END;

bzw. wenn Du wissen willst, ob es nicht funktioniert hat:

Code:

BEGIN
try
  ShellExecute(FTagessicherung.Handle, nil, 'pacomp',PChar('-a -c2 -r -P -q ' + Edit1.Text + '  
  C:\Projekte\SLNPraxis\Daten\1*.*'), nil, SW_NORMAL);

  EXCEPT
    shomessage('hat nicht funktioniert');
  END;
END;

probier´s einfach mal aus

MFG

Evian