Inkompatiblen Typen Fehler

[ozz]

Hallo Zusammen,
ich bekomme irgendwie das Problem mit den inkompatiblen Typen nicht in den Griff. Die Read Function der Property Documentinfo liefert diesen Fehler. Den Typ TCLDocumentinfo habe ich oben definiert, und ohne Read funktioniert es. Hat jemand ein Tip für mich? Den Source Code Ausschnitt habe ich unten angehängt.

Herzlichen Dank!

Delphi-Quellcode:

type TCLDocumentinfo = record
     firstvisit:string;
     lastvisit: string;
     assigedCategory:integer;
end;

type MYCLass = class (TComponent)
..
  function GetDocumentinfo(const URL:String):TCLDocumentinfo;
  procedure PutDocumentinfo(value:TCLDocumentinfo);
  ..
Published
 property Documentinfo:TCLDocumentinfo read GetDocumentinfo write PutDocumentinfo;

[Der_Unwissende]

Hi,
deine Methode, die du beim read einträgst darf keine Parameter haben. Auf ein Property greifst du halt sehr transparent (wie auf eine Variable) zu. Was dabei an Methoden aufgerufen wird, willst du gerade nach aussen verdecken. Deshalb kannst du nicht eine URL übergeben. (Ausnahmen gibt es imho nur für Felder/Arrays)

Gruß Der Unwissende

[ozz]

Danke Der_Unwissende,
jetzt fällt es mit wie Schuppen aus den Haaren. :wall: :wall: :wall: :wall: :wall:
Besten Danke