[Gambas-user] Drop on Toolbutton

[Steven Lobbezoo]

Hi,

I have a problem with a drop on a toolbutton, I do :

PUBLIC SUB THed_Drop()
  ' first look if it's there allready, if so : refuse
  IF TB1.Text = Drag.Source.Name THEN RETURN
  IF TB2.Text = Drag.Source.Name THEN RETURN
  IF TB3.Text = Drag.Source.Name THEN RETURN
  IF TB4.Text = Drag.Source.Name THEN RETURN
  LAST.Picture = Drag.Data.Picture
  LAST.Text = Drag.Source.Name
END

The drop takes place, I see the image and text (that I put in name, since the 
text property does not exist), but i cannot read it. Al TBx.Text are empty.

Is this a bug ?

Steven