Dynamic variable names: Difference between revisions

Content added Content deleted
(Added Quackery.)
Line 913: Line 913:
{$ENDIF}
{$ENDIF}


(*
(*)
* Free Pascal Compiler version 3.2.0 [2020/06/14] for x86_64
Free Pascal Compiler version 3.2.0 [2020/06/14] for x86_64
* The free and readable alternative
The free and readable alternative
* compiles natively to almost any platform, including raspberry PI
compiles natively to almost any platform, including raspberry PI
*
* This demo uses a dictionary because it is compiled: it cannot make
This demo uses a dictionary because it is compiled: it cannot make
* dynamic variables at runtime.
dynamic variables at runtime.
*)
(*)


uses
uses
Line 942: Line 942:


FUNCTION SetType ( strVal: ansistring ): variant;
FUNCTION SetType ( strVal: ansistring ): variant;
(*)
(* If the value is numeric, store it as numeric, otherwise store it as ansistring *)
If the value is numeric, store it as numeric, otherwise store it as ansistring
(*)
BEGIN
BEGIN
TRY
TRY