Wozu willst du mehrere Interfaces vererben?
IRead und IWrite und dann wird eines von Beiden oder Beides bei den entsprechenden Klassen angegeben.
Sowas geht zwar auch
Delphi-Quellcode:
type
IRead = interface
function ReadInt: Integer;
end;
IWrite = interface
procedure WriteInt(Value: Integer);
end;
IReadWrite = interface
function ReadInt: Integer;
procedure WriteInt(Value: Integer);
end;
oder sowas
Delphi-Quellcode:
type
IRead = interface
function ReadInt: Integer;
end;
IWrite = interface
procedure WriteInt(Value: Integer);
end;
IReadWrite = interface(IRead)
procedure WriteInt(Value: Integer);
end;
Aber da muß man dann bei den Funktionen, welche auf diese Interfaces prüfen, die Interfaces doppelt abfragen, da es je "Funktion" zwei Interfaces gibt.
Read = IRead oder IReadWrite
Write = IWrite oder IReadWrite