Dňa 23.4.2018 o 13:52 Maciej Izak napísal(a):
2018-04-23 13:45 GMT+02:00 Maciej Izak <hnb.c...@gmail.com
<mailto:hnb.c...@gmail.com>>:
https://github.com/maciej-izak/PascalSmartPointers/tree/master/examples
<https://github.com/maciej-izak/PascalSmartPointers/tree/master/examples>
small mistake, this is more proper url :)
https://github.com/maciej-izak/PascalSmartPointers/tree/master/sources
<https://github.com/maciej-izak/PascalSmartPointers/tree/master/sources>
--
Thank you.
Can you give small example for my use case ? I can not understand from
above mentioned examples.
So I need to have:
unit A;
type
TClassA = class
public
procedure Method1;
end;
unit B;
type
TClassAHelper1 = class helper for TClassA
public
procedure MethodB1;
procedure MethodB2;
end;
unit C;
type
TClassAHelper2 = class helper for TClassA
public
procedure MethodC1;
procedure MethodC2;
end;
and in program:
use A,B,C;
var instanceA: TClassA;
...
instanceA := TClassA.Create;
instanceA.Method1;
instanceA.MethodB1; // defined in unit B
instanceA.MethodC1; // defined in unit C
...
L.
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
