kbmMWTCPIPIndyMessagingClientTransport1.SendMessage problem?

[zoran]

Hi Kim

I have this code:

ci.Username := ActorName;
ci.Token := DM.kbmMWSimpleClient1.Token;
DM.kbmMWTCPIPIndyMessagingClientTransport1.SendMessage
(
‘MSG.SYS.’ + lDBAlias + ‘.’ + UserId.ToString + ‘.>’,
”,
ci,
nil,
[msg, arrId]
);

All works fine when arrId: TArray<integer>, but when arrId: TArray<int64> I get error ‘Error creating variant of safe array.’

Is this Delphi limitation or something in SendMessage?

Thanks

Zoran

Rio 10.3.3, kbmMW 5.10.10 Ent, Win 10 Ent

[zoran]

Never mind.

If I define arrId: variant and do

arrId := VarArrayCreate([0,0], varVariant);

and then  populate it with my int64 values, all works fine…

I’m puzzled why it also works when arrId: TArray<integer> and not when arrId: TArray<int64>?

Sorry for the false alert…

[Author]

Posts