ThaiPBL.com

สวัสดีครับ เมื่อเราเลื่อน เมาส์ไปบน static text แล้วต้องการให้มีการเปลี่ยนสีของตัวอักษรให้เป็นสีอื่นตามที่เราต้องการ และเมื่อเลื่อนเมาส์ ออกไป ก็ให้กลับมาเป็นสีเดิม ไม่ยากครับให้ทำตามขั้นตอนดังนี้ครับ

ไปที่ mousemove event ของ object ตัวนั้น แล้วเขียนสคริปต์ลงไป

st_1.text = string(xpos) + ", " + string(ypos)

IF xpos >= st_1.X AND (xpos <= st_1.x + st_1.Width) AND ypos >= st_1.y AND (ypos <= st_1.y + st_1.Height) THEN
st_1.textcolor = 255
ELSE
st_1.textcolor = 0
END IF

จากตัวอย่างด้านบน เมื่อเราเลื่อนเมาส์ไปบน static text ตัวหนังสือจะเปลี่ยนเป็น สีแดง และเมื่อเราเลื่อนเมาส์ออกมา ตัวหนังสือจะกลับกลายเป็น สีดำ ทดลองดูนะครับ