Re: [fpc-pascal] Interface delegates and the implements property specifier

2019-12-22 Thread Sven Barth via fpc-pascal
Adriaan van Os schrieb am So., 22. Dez. 2019, 20:53: > I have always wondered why hierarchies in object-oriented programming are > idolized, where in the > database world hierarchical databases are something of the past and > everything is relational there > now

Re: [fpc-pascal] Interface delegates and the implements property specifier

2019-12-22 Thread Sven Barth via fpc-pascal
Ryan Joseph via fpc-pascal > > > On Dec 22, 2019, at 5:26 AM, Sven Barth via fpc-pascal < > fpc-pascal@lists.freepascal.org> wrote: > > > > You don't seem to understand what implementing an interface means in > Object Pascal. It means that a class can be cast to an interface. It does > *not* mean

Re: [fpc-pascal] Passing a CORBA interface as parameter

2019-12-22 Thread Adriaan van Os
Zamrony P. Juhara via fpc-pascal wrote: If you need to know if an instance implement certain interface, you can use is operator if anInstance is IInterface1 then begin end Thanks for the reply, but that is not what I meant. Regards, Adriaan van Os

Re: [fpc-pascal] Interface delegates and the implements property specifier

2019-12-22 Thread Adriaan van Os
Ryan Joseph via fpc-pascal wrote: I guess I'm not seeing the design pattern which they was invented for and I've never come across it in my own work. Not against the idea in any way however. My mind went in the same direction as Adriaan's did when I saw "implements" I thought that one class

Re: [fpc-pascal] Interface delegates and the implements property specifier

2019-12-22 Thread Ryan Joseph via fpc-pascal
> On Dec 22, 2019, at 5:26 AM, Sven Barth via fpc-pascal > wrote: > > You don't seem to understand what implementing an interface means in Object > Pascal. It means that a class can be cast to an interface. It does *not* mean > that the interface's methods are available from that class. I g

[fpc-pascal] StringList encoding question

2019-12-22 Thread Bart via fpc-pascal
Hi, Consider this code: {$codepage utf8} {$mode objfpc} {$H+} uses SysUtils, Classes; var SL: TSTringList; S: String; begin writeln('DefaultSystemCodePage = ',DefaultSystemCodePage); SL := TStringList.Create; {$if fpc_fullversion > 30200} SL.WriteBom := False; {$endif} SL.Ski

Re: [fpc-pascal] Interface delegates and the implements property specifier

2019-12-22 Thread Sven Barth via fpc-pascal
Am 22.12.2019 um 04:44 schrieb Ryan Joseph via fpc-pascal: On Dec 21, 2019, at 10:49 AM, Adriaan van Os wrote: I had hoped that procedure IMyInterface2.P2 would now be visible as a method of TMyClass. This would be quite helpful in implementing multiple-inheritance. But no, the implements s