Einzelnen Beitrag anzeigen

Benutzerbild von ConnorMcLeod
ConnorMcLeod

Registriert seit: 13. Okt 2010
Ort: Bayern
490 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: TDataSet.Refresh erweitern

  Alt 12. Dez 2015, 15:12
Bin mir nicht sicher, aber Du meinst doch sowas:
Delphi-Quellcode:
  public
    { Public-Deklarationen }
    procedure Refresh;

implementation

procedure tDataSetTest.Refresh;
begin
  if 1 = 2 then exit; // latürnich eine sinnvolle Bedingung ;-)
  inherited;
end;
Im Prinzip ja. Aber ... ich bräuchte zusätzlich noch etwas wie ein reintroduce, weil die Objekte während des Programmablaufes auch mal als TDataSet verwendet werden und nicht immer nur als tDataSetTest. Aber reintroduce greift nicht, sondern es kommt immer das Refresh von TDataSet dran. Deswegen wollte ich den Code auswechseln.
Nr.1 Delphi-Tool: [F7]
  Mit Zitat antworten Zitat