Forum: Algorithmen, Datenstrukturen und Klassendesign
by ConnorMcLeod,
20. Jan 2023
Meine Lösung:
ISimpleInterface = interface
function GetID: Integer;
procedure SetID(AValue: Integer);
property ID: Integer read GetID write SetID;
end;
IModule = interface(ISimpleInterface)
function GetModNo: Integer;
procedure SetModNo(AValue: Integer);
property ModNo: Integer read GetModNo write SetModNo;
Forum: Algorithmen, Datenstrukturen und Klassendesign
by ConnorMcLeod,
19. Jan 2023
Mmh, Zweiteres bringt mich auf eine Idee. Das probier ich gleich nach dem Aufstehen, danke!
Forum: Algorithmen, Datenstrukturen und Klassendesign
by ConnorMcLeod,
19. Jan 2023
Kommt man da tatsächlich nicht weiter oder seh ich es einfach nicht?
Bitte keine guten Ratschläge zu TList/IList<T>/Spring4D und so weiter weil es sich um eine nicht diskutierbare Vorgabe handelt TList zu verwenden ;-)
Es sei ein Interface
ISimpleInterface = interface
function GetID: Integer;
procedure SetID(AValue: Integer);
property ID: Integer read GetID write SetID;
...