Нашел решение:
AS3:
Код AS3:
import flash.external.ExternalInterface;
flash.external.ExternalInterface.addCallback('setBalance', setBalance);
function setBalance(str:String):Boolean
{
credit.text = str;
return (true);
}
Delphi:
Код:
var callStr, balance, result:string;
begin
balance := 'значение';
callStr := '<invoke name=''setBalance'' returntype=''xml''><arguments><string>'+balance+'</string></arguments></invoke>';
result:= ShockwaveFlash1.CallFunction(callStr);
end;