Record helper für statische Arrays

[Dennis07]

Ich weiß im Augenblick nicht ganz, was ihr mit "Vererbung" hier meint. Denn Class Helper lassen sich ja nicht ableiten.

[Neutral General]

Es zählt immer nur 1 Helper. Wenn du 2 Helper für den gleichen Typen machst gilt immer nur der neuste (bzw. am "nächsten" deklarierte)

[Uwe Raabe]

Zitat:

Zitat von Dennis07 (Beitrag 1459039)

Ich weiß im Augenblick nicht ganz, was ihr mit "Vererbung" hier meint. Denn Class Helper lassen sich ja nicht ableiten.

Doch!

Hier zwei Beispiele:

Delphi-Quellcode:

program Project624;

{$APPTYPE CONSOLE}

uses
  FMX.Types3D;

type
  TMyContexHelper = class helper (TContextHelper) for TContext3D
  public
    procedure Hurz;
  end;

procedure TMyContexHelper.Hurz;
begin
end;

var
  context: TContext3D;
begin
  context.FillCube(NullPoint3D, NullPoint3D, 0, 0); // deklariert in TContextHelper
  context.Hurz;
end.

Delphi-Quellcode:

program Project639;

{$APPTYPE CONSOLE}

uses
  System.Net.HttpClient;

type
  TMyHelper = class helper (THTTPClientHelper) for THTTPClient
  public
    procedure Hurz;
  end;

procedure TMyHelper.Hurz;
begin
end;

var
  Client: THTTPClient;
begin
  client.UseDefaultCredentials := True; // deklariert in THTTPClientHelper
  client.Hurz;
end.

[Dennis07]

Oh, wow! Okay, danke!
Hätte die Klammern nicht hinter dem helper sondern dem Klass oder dem Typen vermutet. :cyclops:

Danke!

[Rollo62]

Hallo Uwe,

dankesehr, das hatte ich schon lange als "geht nicht" verbucht :thumb:

[himitsu]

"class helper" und "record helper" sind quasi ein Wort, womit man sich erklären kann, warum die Vererbung dort rein muß.

[Dennis07]

Zitat:

Zitat von himitsu (Beitrag 1459421)

"class helper" und "record helper" sind quasi ein Wort, womit man sich erklären kann, warum die Vererbung dort rein muß.

Wenn Delphi da mal so Konsistent wäre...

Es heißt

Delphi-Quellcode:

class abstract

, aber

Delphi-Quellcode:

packed record

. Wobei man ja nicht einmal aus "Helper" einen reservierten Begriff im Editor gemacht hat, weshalb es halt immer noch "falsch" aussieht, so etwas geschrieben zu haben.

[Uwe Raabe]

Zitat:

Zitat von Dennis07 (Beitrag 1459435)

Es heißt

Delphi-Quellcode:

class abstract

, aber

Delphi-Quellcode:

packed record

.

Obwohl der Sinn eher fraglich ist, heißt es auch

Delphi-Quellcode:

packed class

...

[Dennis07]

Zitat:

Zitat von Uwe Raabe (Beitrag 1459436)

Obwohl der Sinn eher fraglich ist, heißt es auch

Delphi-Quellcode:

packed class

...

Jo, auf

Delphi-Quellcode:

packed class

bzw.

Delphi-Quellcode:

packed array

bin ich deshalb auch nicht eingegangen.

[TiGü]

Zitat:

Zitat von Uwe Raabe (Beitrag 1459047)

Doch!

Hier zwei Beispiele:

Delphi-Quellcode:

program Project639;

{$APPTYPE CONSOLE}

uses
  System.Net.HttpClient;

type
  TMyHelper = class helper (THTTPClientHelper) for THTTPClient
  public
    procedure Hurz;
  end;

procedure TMyHelper.Hurz;
begin
end;

var
  Client: THTTPClient;
begin
  client.UseDefaultCredentials := True; // deklariert in THTTPClientHelper
  client.Hurz;
end.

Ach guck, wieder was gelernt! :shock:

Dann kann es doch nicht so schwierig sein, dem Kompiler beizubringen, das auch für record helper zu machen.
Bei den ganzen aufgekauften Firmen von Idera müssen doch mal ein, zwei Leute dabei sein, die die Delphi-Kompiler diesbezüglich erweitern können.
Aber ich schweife ab, tut mir leid!