Hola debes usar las funciones GetVariable y SetVariable.
Código Delphi
[-]
var
XXX : String;
begin
XXX := ShockwaveFlash1.GetVariable('NombreVariable')
end;
y para enviar
Código Delphi
[-]
var
XXX : String;
begin
XXX := Edit1.text
ShockwaveFlash1.SetVariable('NombreVariable',XXX)
end;
espero que esto sea lo que buscas.
un saludo