豪翔天下 发表于 2013-8-15 07:55:24

edt窗口的光标右显问题

procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Edt1.Handle, GWL_STYLE, GetWindowLong(Edt1.Handle, GWL_STYLE) or ES_RIGHT);
Edt1.Invalidate;
end;
用了这个怎么还是在左边呢,是不是哪个属性还要选上

comeheres 发表于 2013-8-15 08:41:12

代码是对的,你一定是哪里搞错了

豪翔天下 发表于 2013-8-15 09:22:47

comeheres 发表于 2013-8-15 08:41 static/image/common/back.gif
代码是对的,你一定是哪里搞错了

我想知道是哪里:cry

ColbySuns 发表于 2013-8-15 11:39:54

FormCreate比FormShow早执行。你试下FormShow可能是Edit还没准备好。。。。 = =

豪翔天下 发表于 2013-8-15 15:36:47

ColbySuns 发表于 2013-8-15 11:39 static/image/common/back.gif
FormCreate比FormShow早执行。你试下FormShow可能是Edit还没准备好。。。。 = =

还是不行,会不会是软件有问题,但是我直接打开小甲鱼的源码,那个就可以

clb929 发表于 2013-8-15 22:08:37

你的这个代码是自己手动敲进去的还是在双击了FORM1的ON CREAT属性后敲进去的。。。

clb929 发表于 2013-8-15 22:22:32

干脆把你的源代码整个贴上来

豪翔天下 发表于 2013-8-16 17:45:05

clb929 发表于 2013-8-15 22:22 static/image/common/back.gif
干脆把你的源代码整个贴上来

我知道问题所在了,谢谢

clb929 发表于 2013-8-16 18:50:43

晕,你既然知道了那就说出来和大家分享下啊

豪翔天下 发表于 2013-8-16 23:17:43

clb929 发表于 2013-8-16 18:50 static/image/common/back.gif
晕,你既然知道了那就说出来和大家分享下啊

恩恩,就是后来对比了一下小甲鱼的,发现是edit窗口events里的onenter没有选上这个procedure,不过看了后面的视频好像直接在创建form的时候选oncreate就行

clb929 发表于 2013-8-17 22:44:58

{:5_109:}是啊,直接在FORM创建的时候就居中了

tongkanhua1 发表于 2013-8-18 23:31:48

kkk得到的顶顶顶顶顶顶顶顶顶顶

爱你一辈子 发表于 2015-7-25 20:12:08

我来看看

wanggeba 发表于 2015-8-18 08:03:55

妈呀,一不小心又学一招。。

鱼C工作室.YCGZS 发表于 2015-12-3 12:22:23

牛啊,相互学习

bsmao 发表于 2015-12-12 23:22:58

豪翔天下 发表于 2013-8-16 23:17
恩恩,就是后来对比了一下小甲鱼的,发现是edit窗口events里的onenter没有选上这个procedure,不过看了后 ...

感谢!呵呵
页: [1]
查看完整版本: edt窗口的光标右显问题