神那，救救我吧（很急）关于在delphi中实现文本框光标（注意不是鼠标变换）转变

Question

delphi中文本框edit编译完运行时，光标是‘|’的竖线闪烁，我需要的是'_'这样的光标闪烁；注意不是鼠标，我查了很多帮助，都是鼠标的变化，没有光标变化方面的我知道在DOS中变成很容易实现，但在delphi中怎样实现，请告知，谢谢。                                               菜鸟敬上，各位大侠请拉一把

Answer 1

主　　题：  神那，救救我吧（很急）关于在delphi中实现文本框光标（注意不是鼠标变换）转变 
           ``````
CSDN里有神吗？^-^....

Answer 2

自己做一个光标，放入资源文件中，然后：
hCaret = LoadBitmap(HInstance, MAKEINTRESOURCE(120));  
CreateCaret(hwnd, hCaret, 0, 0);  
SetCaretPos(x, y); 
ShowCaret(hwnd);