search

da-baranov / SciDe

Sciter component for Delphi
76 stars 26 forks source link

why MOUSE_CLICK didn't work? #11

Open kylin30 opened 5 years ago

kylin30 commented 5 years ago 
  sctr1 := TSciter.Create(Self);
  sctr1.Parent := Self;
  sctr1.Visible := True;
  sctr1.Align := alClient;
  sctr1.LoadURL(ExtractFilePath(ParamStr(0)) + 'index.html');

  ele := sctr1.Root.CreateElement('div','text');
  ele.Attr['class'] := 'app';
  sctr1.Root.AppendChild(ele);
  sctr1.Root.SubscribeMouse('.app',MOUSE_CLICK,OnElementMouse);

no response on click div.app.

modified code to:

  sctr1 := TSciter.Create(Self);
  sctr1.Parent := Self;
  sctr1.Visible := True;
  sctr1.Align := alClient;
  sctr1.LoadURL(ExtractFilePath(ParamStr(0)) + 'index.html');

  ele := sctr1.Root.CreateElement('div','text');
  ele.Attr['class'] := 'app';
  sctr1.Root.AppendChild(ele);

  showmessage('a'); // <-- add this line

  sctr1.Root.SubscribeMouse('.app',MOUSE_CLICK,OnElementMouse);

it work now~why? please help me.