Stream im Object als publisched property

[Taladan]

Hallo.
Ich möchte gern einen Stream als publisched property deklarieren. Doch irgendwie sagt mir Delphi immer incompatible Typen...

Delphi-Quellcode:

  TName = class(TBaseObject)
   private
    fStream : TStream;
    procedure SetStream(aStream : TStream);
    function GetStream(aStream:TStream):TStream;
   public
    constructor Create;
   published
    property Stream : TStream read GetStream write SetStream;
   end;

procedure TName.SetStream(aStream : TStream);
begin
  fStream := aStream;
end;

function TName.GetStream(aStream:TStream):TStream;
begin
  result := fStream;
end;

constructor TName.Create;
begin
  inherited;
  fStream := TStream.Create;
end;

[TStringlist]

Hallo

1. TStream würde ich nicht nehmen, weil da TStream.Read u. TStream.Write doch nur abstrakte Methoden sind, dh.: bei dem Versuch diese zu nutzen gibt's eine Exception.

2. public ja, aber published? Angenommen die Komponente steht danach im OI, was soll man denn da bei dieser published stream-Property dann einstellen können?

3. Wozu hat denn TName.GetStream da eine Parameterliste? Das könnte event. auch die Fehlerursache sein.

[dahead]

Zitat:

3. Wozu hat denn TName.GetStream da eine Parameterliste? Das könnte event. auch die Fehlerursache sein.

das ist die fehlerursache.

beim deklarieren könntest du das nächste mal einfach "Strg-Shift-C" drücken, also z. b. hier:

Delphi-Quellcode:

TName = class(TBaseObject)
   private
    fStream:  TStream;
   public
    constructor Create;
   published
    property Stream: TStream read GetStream write SetStream; <-- hier an dieser stelle
   end;

delphi vervollständigt dann deinen code autom.

[SirThornberry]

@dahead: er hat eine Personal, da ist nix mit vervollständigen durch diese Tastenkombination.

[Taladan]

Der Stream kommt aus anderen VCL. Z.b. einer ListBox. Der Inhalt soll zusmammen mit den anderen Published Propertys ausgelesen werden und dadurch kann ich sie dann speichern.

[Taladan]

*push*

Kann denn keiner helfen?

[TStringlist]

Zitat:

Zitat von Taladan

... Doch irgendwie sagt mir Delphi immer incompatible Typen...

Sofern es noch darum geht, war's doch eigentlich schon gesagt: Die Get-Routine "TName.GetStream" hat normal keine Parameterliste.

[Dax]

Und für jeden Typen, der im OI angezeigt werden soll, braucht man einen Property-Editor. Bei Stringlisten ist das diese Box, in der man die einzelnen Strings in ein Memo eingibt ;)

Für Streams gibt es sowas imho nicht, also werden sie auch nicht im OI angezeigt.

[Taladan]

Es handelt sich hier nicht um ein DesignObject sondern um ein Laufzeitobject. Jedoch muß die Eigenschaft in publisched stehen, sonnst wird sie nicht per

Delphi-Quellcode:

GetPropList(Self.ClassInfo, PropList)

angezeigt. Und das haut meine Komponente um

[mirage228]

Ja, die Deklaration des Getters von Stream sieht trotzdem so aus ;)

Delphi-Quellcode:

function GetStream: TStream; // keine PARAMETER!

mfG
mirage228