API:FireDAC.Comp.Client.TFDCommand.AfterExecute

Aus RAD Studio API Documentation
Wechseln zu: Navigation, Suche

Delphi

property AfterExecute;

C++

__property AfterExecute;

Eigenschaften

Typ Sichtbarkeit Quelle Unit Übergeordnet
event published
FireDAC.Comp.Client.pas
FireDAC.Comp.Client.hpp
FireDAC.Comp.Client TFDCommand

Beschreibung

Dieses Ereignis wird nach dem Ausführen der Anweisung ausgelöst.

FireDAC.Comp.Client.TFDCommand.AfterExecute erbt von FireDAC.Comp.Client.TFDCustomCommand.AfterExecute. Der folgende Inhalt bezieht sich auf FireDAC.Comp.Client.TFDCustomCommand.AfterExecute.

Dieses Ereignis wird nach dem Ausführen der Anweisung ausgelöst.

Das Ereignis AfterExecute wird ausgelöst, nachdem die Anweisung durch Aufruf der Methode Execute ausgeführt wurde.

Beispiel

procedure TForm1.ADCommand1AfterExecute(ASender: TObject);
begin
  if ADCommand1.RowsAffected = -1 then
    StatusBar1.SimpleText := 'Ok'
  else
    case ADCommand1.CommandKind of
    skDelete: StatusBar1.SimpleText := Format('%d rows deleted', [ADCommand1.RowsAffected]);
    skInsert: StatusBar1.SimpleText := Format('%d rows inserted', [ADCommand1.RowsAffected]);
    skUpdate: StatusBar1.SimpleText := Format('%d rows updated', [ADCommand1.RowsAffected]);
    else      StatusBar1.SimpleText := Format('%d rows affected', [ADCommand1.RowsAffected]);
    end;
end;

Siehe auch