Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Wie Standard-Action erweitern (https://www.delphipraxis.net/156798-wie-standard-action-erweitern.html)

WoGe 15. Dez 2010 10:35

Delphi-Version: 2010

Wie Standard-Action erweitern
 
Wie kann ich einer Standard-Action z.B. TDataSetCancel zusätzliche Befehle beibringen?

Wenn ich in D2010 dem OnExecute auch nur eine leere! Methode zuweise, verliert die Action ihr Standard-Verhalten.

Grüsse
wo

semo 16. Dez 2010 07:12

AW: Wie Standard-Action erweitern
 
Code:
procedure DataSetCancelExecute(Sender: TObject);
begin
  // our code goes here
  YourCode();
 
  // call the standard dataset method here
  Dataset.Cancel();
end;
Genauso kannst du alle Standard Dataset Actions erweitern.

Bummi 16. Dez 2010 07:33

AW: Wie Standard-Action erweitern
 
sieht etwas nach Endlosschleife aus....

semo 16. Dez 2010 08:15

AW: Wie Standard-Action erweitern
 
Ist aber keine Endlosschleife.

WoGe 16. Dez 2010 09:08

AW: Wie Standard-Action erweitern
 
Hallo

Zitat:

Zitat von semo (Beitrag 1068805)
Code:
procedure DataSetCancelExecute(Sender: TObject);
begin
  // our code goes here
  YourCode();
 
  // call the standard dataset method here
  Dataset.Cancel();
end;


Ich habs getestet:

Code:
 DataSetInsert1.DataSource.DataSet.Insert;
ist keine Endlosschleife und das Verhalten der Action bleibt erhalten.

Danke
wo


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:05 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