notefind.hsp

sample\new35\notefind.hsp » Plain Format

	;	複数行文字列の検索
	;	(HSP3.5からnotefind命令が標準命令として追加されました)
	;
	sdim st,1000
	st={"peach
apple
orange
banana
kiwi
grape"}

	pos 0,0
	mes st

	findstr="apple"

	notesel st

	pos 320,0

	findstr="apple"
	i=notefind( findstr, notefind_match )
	mes "notefind(\""+findstr+"\",notefind_match) = "+i

	findstr="ora"
	i=notefind( findstr, notefind_first )
	mes "notefind(\""+findstr+"\",notefind_first) = "+i

	findstr="ape"
	i=notefind( findstr, notefind_instr )
	mes "notefind(\""+findstr+"\",notefind_instr) = "+i

	stop