[fpc-devel] How to call (access) to an external procedure!
Aavani at iust.ac.ir
Tue Jan 31 07:35:27 CET 2006
I know that if want to use an external variable/procedure in fpc, i
should use the following code:
function GetEnvironment (const Name: PChar): PChar; cdecl; external 'c'
but how could i add for example GetEnvironment function to a class
Is there any good (OO) way?
Is it a good idea to use a following method:
TGetEnvironmentFunction= function : PChar;
TEnvironment= class (TObject)
procedure SetGetEnvironmentFunction (AFunction: TGetEnvironmentFunction);
procedure TEnvironment.SetGetEnvironmentFunction (AFunction:
More information about the fpc-devel