tstrings als property

[Andreas L.]

Hi,

Delphi-Quellcode:

type
  Tblabla = class(TComponent)
  private
    ...
    fComment: TStrings;
    ...
    procedure SetComment(Value: TStrings);
  published
    property Comment: TStrings read fComment write SetComment;
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
  end;

...

procedure TMozillaCookies.SetComment(Value: TStrings);
begin

 fComment.Assign(Value);

end;

Sollte doch ohne Probleme gehen, oder? Wenn ich aber im OI den TStrings-Editor öffnen will, kommt folgendes:

Zitat:

---------------------------
Fehler
---------------------------
nil kann nicht zu TRichEditStrings zugewiesen werden.
---------------------------
OK Details >>
---------------------------

Jemand eine Idee?

[mirage228]

Delphi-Quellcode:

procedure TMozillaCookies.SetComment(Value: TStrings); 
begin 
  if Value <> nil then  
    fComment.Assign(Value); 
// eventuell:
// else fComment.Clear;
end;

mfG
mirage228

[Andreas L.]

Danke für deine Antwort aber der Fehler kommt immer noch. Noch eine Idee :?:

[mkinzler]

Der Fehler kommt auch eher beim Auslesen der Eigenschaft.

[Hawkeye219]

Hallo,

Zitat:

Zitat von mkinzler

Der Fehler kommt auch eher beim Auslesen der Eigenschaft.

vielleicht, weil die Stringliste nicht im Constructor der Komponente erzeugt wurde?

Gruß Hawkeye

[mirage228]

Zitat:

Zitat von Hawkeye219

vielleicht, weil die Stringliste nicht im Constructor der Komponente erzeugt wurde?

Hm, dann hätte ich bei der Fehlermeldung aber eher eine Access-Violation erwartet... aber wer weiß :gruebel:

mfG
mirage228

[Andreas L.]

Zitat:

Zitat von mkinzler

Der Fehler kommt auch eher beim Auslesen der Eigenschaft.

Mitn Getter kommt die selbe Meldung:

Delphi-Quellcode:

function TMozillaCookies.GetComment:TStrings;
begin

 Result := fComment;

end;

[Andreas L.]

Zitat:

Zitat von Hawkeye219

Hallo,

Zitat:

Zitat von mkinzler

Der Fehler kommt auch eher beim Auslesen der Eigenschaft.

vielleicht, weil die Stringliste nicht im Constructor der Komponente erzeugt wurde?

Gruß Hawkeye

TStrings sollte nicht instanziiert werden und ne StringList verwende ich nicht.

[mirage228]

Zitat:

Zitat von Andreas L.

TStrings sollte nicht instanziiert werden und ne StringList verwende ich nicht.

Also machst du gar nichts mit FComments? Du musst schon eine Instanz erzeugen...

[Andreas L.]

Zitat:

Zitat von mirage228

Zitat:

Zitat von Andreas L.

TStrings sollte nicht instanziiert werden und ne StringList verwende ich nicht.

Also machst du gar nichts mit FComments? Du musst schon eine Instanz erzeugen...

Folgendes löst eine "Abstrakten Fehler" aus:

Delphi-Quellcode:

 fComment := TStrings.create;
 //fComment.create; ebenfalls