Procedure Abort

Modified on 15/01/2009 13:51 by CPARAS Categorized as Plattform

'''Syntax:'''{BR}
{{{{'''procedure''' Abort}}}}{BR}
{BR}
'''Beschreibung:'''{BR}
{BR}
Die Prozedur löst eine stille Execption aus.{BR}
Mit Abort kann ein Prozess ohne Ausgabe einer Fehlermeldung beendet werden.{BR}
Abort löst eine spezielle "stille Exception" (EAbort) aus.{BR}
Sie unterscheidet sich von den anderen Exceptions darin, dass keine Fehlermeldungen an den Endbenutzer ausgegeben werden. Abort übergibt die Ausführung an das Ende des letzten Exception-Blocks.{BR}

{BR}
'''Beispiel:'''{BR}
{BR}
<code pascal>
//In diesem Beispiel wird geprüft, ob ein TDBEdit-Steuerelement einen gültigen Eintrag enthält. Ist das Steuerelement leer, wird die Prozedur Abort aufgerufen, um das Eintragen zu verhindern.

procedure TForm1.MyDataBeforePost(DataSet: TDataSet);

begin
if DBEdit1.Text = '' then
  Abort;

end;
</code>

CP Wiki

Navigation¶

Procedure Abort