Please help me, what's wrong?
...
Private Const FPCM_SETVARIABLEA As Long = (FPCM_FIRST + 285)
Private Type sfpc_txt
txt As String
len1 As Long
End Type
'SFPCSetVariable ansi
Private Type SFPCSetVariable
name As sfpc_txt
data As sfpc_txt
hr As Long
End Type
...
Dim FPCSetVariable As SFPCSetVariable
FPCSetVariable.name.txt = "cdchecked"
FPCSetVariable.name.len1 = Len(FPCSetVariable.name)
FPCSetVariable.data.txt = "1"
FPCSetVariable.data.len1 = Len(FPCSetVariable.data)
'sendmessage передает в анси кодировке
Call sendMessage(FlashPlayerControlWnd,FPCM_SETVARIABLEA,0&, FPCSetVariable)
But "cdchecked" variable in flash<>1
And ShockwaveFlash2.SetVariable "cdchecked", "1" worked fine.