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;