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 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
GetPropList(Self.ClassInfo, PropList) angezeigt. Und das haut meine Komponente um

[mirage228]

Ja, die Deklaration des Getters von Stream sieht trotzdem so aus
function GetStream: TStream; // keine PARAMETER! mfG
mirage228