Is Variant.ToString() possible?

[nerobotParticipant]

I want to print a Map<String,Variant> type in such form:

Monkey

key1 => value1 key2 => value2 ......

1 2 3

key1 => value1 key2 => value2 ......

I wrote To:String() operator:

Monkey

Operator To:String() Local s:="" For Local key:=Eachin _items.Keys If s Then s+="~n" s+=key+"=>"+Cast<String>( _items[key] ) Next Return s End

1 2 3 4 5 6 7 8 9

Operator To:String()   Local s:="" For Local key:=Eachin _items.Keys If s Then s+="~n" s+=key+"=>"+Cast<String>( _items[key] ) Next Return s End

But we can cast a variant to string if only(!) it contains a string.

Maybe it’s possible to do in c++ side?

[abakoboParticipant]

I’m doing it this way. If you import reflection there should be a nicer way to do that but I’ve never used reflection so far. So that’s the way I could make it work…

Monkey

Namespace myapp #Import "<std>" Using std.. Function Main() Local map:=New StrVarMap() map["key_one"]=15 map["key_two"]=15.15 map["key_three"]="fifteen" map["key_four"]=True map["Vec_a"]=New Vec2f(0,0.1) map["Vec_b"]=New Vec2i(0,0) map["Stack_a"]=New IntStack() 'this one will be unkown Print map End Class StrVarMap Extends StringMap<Variant> Operator To:String() 'recording types of interrest (without the use of reflecion, there is probably a better way to do that?) Local variantVec2f:Variant=New Vec2f (0.1,0) Local variantVec2i:Variant=New Vec2i (0,0) Local s:="" For Local node:=Eachin Self If s Then s+="~n" s+=node.Key+" =>" If node.Value.Type.Name="Int" s+="(Int): "+Cast <Int>(node.Value) Elseif node.Value.Type.Name="Float" s+="(Float): "+Cast <Float>(node.Value) Elseif node.Value.Type.Name="Bool" s+="(Bool): "+Cast <Bool>(node.Value) Elseif node.Value.Type.Name="String" s+="(String): "+Cast <String>(node.Value) Elseif node.Value.Type=variantVec2f.Type s+="(Vec2f): "+Cast <Vec2f>(node.Value) Elseif node.Value.Type=variantVec2i.Type s+="(Vec2i): "+Cast <Vec2i>(node.Value) Else s+=node.Value.Type.Name End Next Return s+"~n" End End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57

Namespace myapp   #Import "<std>"   Using std..   Function Main()   Local map:=New StrVarMap() map["key_one"]=15 map["key_two"]=15.15 map["key_three"]="fifteen" map["key_four"]=True map["Vec_a"]=New Vec2f(0,0.1) map["Vec_b"]=New Vec2i(0,0) map["Stack_a"]=New IntStack() 'this one will be unkown Print map End   Class StrVarMap Extends StringMap<Variant> Operator To:String()   'recording types of interrest (without the use of reflecion, there is probably a better way to do that?) Local variantVec2f:Variant=New Vec2f (0.1,0) Local variantVec2i:Variant=New Vec2i (0,0) Local s:="" For Local node:=Eachin Self If s Then s+="~n" s+=node.Key+" =>" If node.Value.Type.Name="Int" s+="(Int): "+Cast <Int>(node.Value) Elseif node.Value.Type.Name="Float" s+="(Float): "+Cast <Float>(node.Value) Elseif node.Value.Type.Name="Bool" s+="(Bool): "+Cast <Bool>(node.Value) Elseif node.Value.Type.Name="String" s+="(String): "+Cast <String>(node.Value) Elseif node.Value.Type=variantVec2f.Type s+="(Vec2f): "+Cast <Vec2f>(node.Value) Elseif node.Value.Type=variantVec2i.Type s+="(Vec2i): "+Cast <Vec2i>(node.Value) Else s+=node.Value.Type.Name End Next Return s+"~n" End End

[nerobotParticipant]

It’s good when you have a constatnt range of types.

But you should extend this if-else block for any new type.

[abakoboParticipant]

Yes and it is not extending Variant so it’s not a Variant:To_String operator, which I have no clue how to get working. But it works fine for my use. As I said, using reflection could help here?
But do you really need to print a lot of other types that these ones? It does not not represent a lot of code in a whole app code.

[nerobotParticipant]

I think I can use your realization, for my purposes printing of variant.type.name is enough. Thanks!

[AmonParticipant]

I totally got all of that.

[Author]

Posts