Warum geht das eigentlich nicht?

[Mavarik]

Hi!

Delphi-Quellcode:

type
  TFoo = class
    private
       FIMG : TImage;
    Property TheBitmap : TBitmap read FImg.Bitmap; // ???
  end;

Mavarik

[Dejan Vu]

Weil der backing store ein privates Feld sein muss und nicht die Property eines privaten Feldes. Vermutlich, vielleicht, keine Ahnung wird bei einem backing store direkt die Adresse im Getter/Setter einkompiliert. Stevie und andere Spezialisten können darüber bestimmt mehr sagen.

[DeddyH]

Anderseits ist es ja auch kein großer Aufwand, einen einzeiligen Getter zu schreiben.

[himitsu]

Die Frage ist eher: Was macht eine visuelle TImage versteckt in einer Komponente?
Oder wird die auch irgendwo angezeigt?

> TPicture oder TGraphit (wenn man den Typ kennt)

[Dejan Vu]

Zitat von DeddyH:

Anderseits ist es ja auch kein großer Aufwand, einen einzeiligen Getter zu schreiben.

Ich glaube, ihm geht es einfach um das 'warum'.

[DeddyH]

Da kann ich auch nur raten.

[Sir Rufo]

Ich vermute das dort impliziert eine Methode einkompiliert wird.

GetPropInfo liefert einen Zeiger für die Getter-/Setter-Methode auch wenn es sich um so eine simple Eigenschaftsdeklaration handelt.

Ist aber eben nur eine Vermutung meinereinerseits ...

Laut Wikipedia soll das wohl auch so sein.

Könnte man also einfach ausprobieren, ob

Delphi-Quellcode:

TFoo = class
private
  FBar : integer;
public
  property Bar : integer read FBar write FBar;
end;

den gleichen Code erzeugt wie

Delphi-Quellcode:

TFoo = class
private
  FBar : integer;
  procedure SetBar( const Value : integer );
  function GetBar : integer;
public
  property Bar : integer read FBar write FBar;
end;

procedure TFoo.SetBar( const Value : integer );
begin
  FBar := Value;
end;

function TFoo.GetBar : integer;
begin
  Result := FBar;
end;

[himitsu]

Nein, Delphi erzeugt da keine implizite Methoden.

In der RTTI ist in diesem Integer codiert, ob es sich um einen Zeiger (Offset) auf ein Feld handelt oder um eine Referenz auf eine Methode (Getter/Setter).


Es ist vielmehr so, daß der Delphi-Compiler ohne Getter/Setter intern oftmals den Code so erzeigt, als wenn man direkt auf das Feld zugreift. (zumindest im Windows ... k.A. wie das beim neuen Compiler aussieht)

[Uwe Raabe]

Zitat von Dejan Vu:

Weil der backing store ein privates Feld sein muss und nicht die Property eines privaten Feldes.

Interessanterweise geht sowas aber mit einem Record, wenn man beim read wieder ein Feld des Records anspricht. Und mit privat oder nicht hat das auch nichts zu tun.

Offenbar möchte der Compiler das direkt auslösen können. Das ist bei einer Klasseninstanz, die ja erst zur Laufzeit erzeugt wird, aber nicht möglich.

[himitsu]

Die RTTI nutzt, wie erwähnt, einen Offset.
Im compilierten Code wäre es praktisch kein Problem, aber es wird auch alles nochmal in der RTTI hinterlegt.

Bei einem Record ist immer alles direkt in dem Record und kann somit auch direkt angesprochen werden.
Bei einer Klasse werden praktisch zwei Adressen verschachtelt, was eben nicht "direkt" geht, vorallem da es auch noch eine Mischung aus direktem Feldzugriff und Getter/Setter sein kann.