اضافه کردن رویداد onclick به اکتیوایکس flash

[iamehsan56]

سلام
من می خوام به خصوصیات flash activeX رویدادهای onclick , on mousedown, onmousemove رو اضافه کنم
یه کامپوننت ساختم و از کلاس اصلی ارث گرفتم . حالا چطور بهش رویداد اضافه کنم
لطفا کمک کنید



unit MyShockFlash_U;

interface

uses
SysUtils, Classes, Controls, ExtCtrls,ShockwaveFlashObjects_TLB;

type
TMyShockwaveFlash = class(TShockwaveFlash)
private
{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }

//,




published



end;


procedure Register;

implementation

procedure Register;
begin
RegisterComponents('MyComp', [TMyShockwaveFlash]);
end;

end.

[zidane]

کامپوننت F-IN-BOX براي کار با فلش عاليه و کلي امکانات داره
فکر نمي کنم نياز باشه اين رويداد ها رو دوباره بنويسي

[iamehsan56]

درسته من fin box رو دارم . اما حالا می خوام بهش یه سری property اضافه کنم که واسه منظور خودمه اما مشکل من اینه که این کامپوننت من full source نیست . چه راهی پیشنهاد می کنید ؟

[zidane]

من نمی دونم دیگه چه property هست که f-in-box نداره
به هرحال فکر می کنم خوندن این مقاله کمک زیادی بهت می کنه:

http://farasun.files.wordpress.com/2007/10/writing-components-farsi.pdf