Utilizar Um Botão Do Flash No Delphi

[Vivendo&Aprendendo]

Pessoal eu utilizo animações do flash em minhas aplicações, mas agora a duvida é a seguinte:

Criei um botão no flash com animações.

Para colocar ele no delphi ta tudo certo, o problema é o seguinte:

- Em qual evento do componente Shockwave do delphi eu faço a progrmação para o clica por exemplo? Já que este componente não possui a propriedade OnClick.

Alexandre

[Jhonas]

utilize o component ShockwaveFlash1,

na propriedade movie voce coloca o caminho do arquivo ex: c:\adm\relog1.swf

na propriedade Loop voce deixa true

na propriedade Scale voce deixa ShowAll

na propriedade ScaleMode voce deixa 0

e na propriedade PlayIng voce deixa true para executar o arquivo flash

Obs: funções inerentes ao proprio arquivo flah serão executadas sem problemas

Editado Setembro 25, 2007 por Jhonas

[Vivendo&Aprendendo]

Obrigado Jhonas

Bom obrigado pelas dicas, mas como falei já uso o flash, já sei qual é o componente usado pelo delphi para ativar o arquivo flash, só que agora preciso usar um botão feito em flash no delphi e o componente ShockwaveFlash1 não possui o evento OnClick e gostaria de saber qual evento substitiu este.

Ou se preciso fazer de forma diferente.

Obrigado

Alexandre

[Micheus]

Vivendo&Aprendendo, você tentou utilizar o evento FSCommand?

Este artigo é voltado a VB mas pode ser facilmente adaptado ao Delphi, talvez ele possa lhe ser útil => Macromedia Flash and VB: A Potent Combination (Mindfire Solutions)

[Jhonas]

Obrigado Jhonas

Bom obrigado pelas dicas, mas como falei já uso o flash, já sei qual é o componente usado pelo delphi para ativar o arquivo flash, só que agora preciso usar um botão feito em flash no delphi e o componente ShockwaveFlash1 não possui o evento OnClick e gostaria de saber qual evento substitiu este.

Passeando na Net , pesquisando sobre um outro assuto, me deparei com o que voce esta querendo, um componente ShockwaveFlash que possui os eventos :

FOnMouseDown: TMouseEvent; FOnMouseUp: TMouseEvent; FOnMouseMove: TMouseMoveEvent; FOnClick: TNotifyEvent; fLockMouseClick: boolean; WasDown: boolean; FOleObject: IOleObject;

Para download do componente:

http://www.delphiflash.com/codepas/flashax.zip

Para visualizar o codigo fonte:

http://www.delphiflash.com/library-play-swf-from-stream.php