初学delphi, 使用控件的问题 我刚刚才开始学delphi,在使用edit控件时我想在显示时,在最右边显示,怎样设置? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 头疼的问题,不过可以解决。如果不用别的控件,比较复杂,必须自己写程序画edit才行,呵呵。 procedure TForm1.FormCreate(Sender: TObject);begin SetWindowLong(edit1.Handle,GWL_STYLE,ES_RIGHT);end; 修改:procedure TForm1.FormCreate(Sender: TObject);begin SetWindowLong(edit1.Handle,GWL_STYLE,getwindowlong(edit1.handle,GWL_STYLE) or ES_RIGHT);end; 就是 xixuemao 的方法了! 不知道msg.message =WM_NCCREATE这个行不行? webgame的模式 怎样才能delphi用MSCOMM控件发送短信,高手救命!!! 关于虚拟磁盘的问题,如果您有过这方面的经验,请透落一点,感激不尽!!!! 怎样才能截取MPG格式文件中的图像?我想在播放中直接截取,请各位大侠给点提示。谢谢 有没有能按字串中指定的逗号分隔字符的函数?就像ASP中的split函数? 控件无法安装的问题!!!!!! 即刻给分,决不食言!!!! 找人做个查询系统 哪位大虾用过CREATEPROCESS,请可小弟指点一下,必定给分。 高手请进!TAdoQuery问题 关于dbgrideh的问题 从一表里向另一表的插入语句
如果不用别的控件,比较复杂,必须自己写程序画edit才行,呵呵。
begin
SetWindowLong(edit1.Handle,GWL_STYLE,ES_RIGHT);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(edit1.Handle,GWL_STYLE,getwindowlong(edit1.handle,GWL_STYLE) or ES_RIGHT);
end;