Maximum CD 2007 January/maximum-cd-2007-01.iso/main.dxr/Internal_209_searchBox.b.ls

Text File | 2006-07-19 | 379 b | 25 lines

property ds

on beginSprite me
  sprite(me.spriteNum).member.text = "TYPE SEARCH CRITERIA HERE"
  ds = 0
end

on mouseEnter me
  if sprite(me.spriteNum).member.text = "TYPE SEARCH CRITERIA HERE" then
    sprite(me.spriteNum).member.text = EMPTY
  end if
end

on exitFrame me
  if ds then
    sendSprite(91, #doSearch)
    ds = 0
  end if
end

on keyDown me
  ds = 1
  pass()
end