Hi all,
how can i simple get type of variable in freepascal?

For example:

procedure RawWrite(v:anyvariable)
begin
if GETTYPE(v)=string_type then begin;stringwork(v);end;
if GETTYPE(v)=byte_type then begin;dobyte(v);end;
if GETTYPE(v)=pchar_type then...
if GETTYPE(v)=pointer_type then...
etc...
etc...
end;

or use a CASE statement

Is there any way to detect variable type?

Thank you.

How is anyvariable defined? If it's a simple array of bytes or words then there is not, since you've lost the type when assigning to it. If it's a variant record with a tag then you've got the tag. Otherwise consider using variants as supported by the language and RTL.

Mark Morgan Lloyd wrote the following on 09/02/12 14:10:56:

I've seen several languages which permitted what the OP asked, but they were all interpreted.

Am 09.02.2012 14:49, schrieb

The best you can do is using Variant as variable type. See here: http://www.freepascal.org/docs-html/ref/refse18.html#refsu20.html Also take a look at unit Variants (for which no documentation exists yet though).

Regards,
Sven

Suggestion:
Overload the procedure for each type you'd like to support instead.

________________________________

Thank you all pointing me out to Variant.

Thank you and have a nice day.

______________________________________________________________