edit如何右对齐显示(20分)

S

sallun

Unregistered / Unconfirmed
GUEST, unregistred user!
edit如何右对齐显示
 
请看以前的回答
http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=141756
 
我不知道.
这么简单的问题从每想过不会.但
但事实就是我不会...
用别的控件试试,如:rx的.
 
以前回答过.
 
<a href=http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=141756> 这儿:</a>
 
這問題以前我問的﹐
他們的辦法行是行﹐ 稍煩。
現在我靠右時干脆用TRichEdit or TMaskedit or TMemo﹐
靠左時用TEdit
 
setwindowlong(edit.handle, GWL_STYLE, getwindowlong(edit.handle, GWL_STYLE)
and not ES_AUTOHSCROLL or ES_MULTILINE or ES_RIGHT);
edit.invalidate;
 
Hey, Another_eYes 说的完全不可行,不知您自己试过没有?我用的是D5:

procedure TForm1.Edit1Exit(Sender: TObject);
begin
setwindowlong(edit1.handle, GWL_STYLE,
getwindowlong(edit1.handle, GWL_STYLE)
and not ES_AUTOHSCROLL or ES_MULTILINE or ES_Right);
edit1.invalidate;
end;

不论在那个事件中做都是一样。
 
顶部