169 похожих чатов

Вечера всем, я по той же проблеме, сейчас не догоняю,

как я могу сделать по совету с форума:
"If TAnyObject would derive from TInterfacedObject and the interface contract is obeyed by all descendants that is indeed possible."

Но как мне это сделать? Если в описании интерфейса я уже возвращяю свой TAnyObject? (например методом getItem:TAnyObject)

Тоесть TAnyObject должен быть описан до IAnyObject, но тогда получается мне два раза повторять функционал TAnyObject в TMotoObject=class(TInterfacedObject,IAnyObject)

WTH?

5 ответов

24 просмотра

сделайте чтобы getItem возвращало интерфейс IAnyObject и проблем не будет

Anthony86z- Автор вопроса
Green
сделайте чтобы getItem возвращало интерфейс IAnyO...

Спасибо. В общем сделал я через возврат IAnyObject. Но тогда в потомках TAnyObject появляется конфликт при их getItem. Напишу через as 😔Оставлю этот вопрос на потом уже. https://forum.lazarus.freepascal.org/index.php/topic,56786.0.html

Anthony86z
Спасибо. В общем сделал я через возврат IAnyObject...

а я вообще проблемы непонял, у тебя 2 мапа с объектами разных типов зачем as

Anthony86z- Автор вопроса
zamtmn
а я вообще проблемы непонял, у тебя 2 мапа с объек...

Их сейчас два, для примера. А так потом потомков TAnyObject будет куча. Соответственно будут списки потомки TAnyObjectList =class (specialize TFPGMap<string,TAnyObject>). Поэтому переопределять или переписать не вариант, если есть функционал уже в основном.

Похожие вопросы

Обсуждают сегодня

30500 за редактор? )
Владимир
47
а через ESC-код ?
Alexey Kulakov
29
Чёт не понял, я ж правильной функцией воспользовался чтобы вывести отладочную информацию? но что-то она не ловится
notme
18
У меня есть функция где происходит это: write_bit(buffer, 1); write_bit(buffer, 0); write_bit(buffer, 1); write_bit(buffer, 1); write_bit(buffer, 1); w...
~
14
Недавно Google Project Zero нашёл багу в SQLite с помощью LLM, о чём достаточно было шумно в определённых интернетах, которые сопровождались рассказами, что скоро всех "ибешни...
Alex Sherbakov
5
Ребят в СИ можно реализовать ООП?
Николай
33
Как передать управляющий символ в открытую через CreateProcess консоль? Собсна, есть процедура: procedure TRedirectThread.WriteData(Data: OEMString); var Written: Cardinal;...
Serjone
6
в JclConsole объявлено так: function CtrlHandler(CtrlType: DWORD): BOOL; stdcall; - где ваше объявление с stdcall? у вас на картинке нет stdcall
Karagy
8
https://github.com/erlang/otp/blob/OTP-27.1/lib/kernel/src/logger_h_common.erl#L174 https://github.com/erlang/otp/blob/OTP-27.1/lib/kernel/src/logger_olp.erl#L76 15 лет назад...
Maksim Lapshin
20
~ 2m21s  nix shell github:nixos/nixpkgs#stack ~  stack ghc -- --version error: … while calling the 'derivationStrict' builtin at /builtin/derivation.nix:...
Rebuild your mind.
6
Карта сайта