注册 登录
编程论坛 Delphi论坛

delphi2010问题

csjn1 发布于 2012-03-07 21:34, 575 次点击
设置edit的alignment属性,结果造成光标消失,请朋友们尝试一下,共同讨论
procedure TForm1.FormCreate(Sender: TObject);
begin
  edit2.Alignment:=taRightJustify;
  edit2.Text:='¥0.00';
end;

procedure TForm1.Edit2Enter(Sender: TObject);
begin
  edit2.Text:='';
  edit2.Alignment:=taLeftJustify;
end;

procedure TForm1.Edit2Exit(Sender: TObject);
begin
  edit2.Alignment:=taRightJustify;
  edit2.Text:='¥0.00';
end;



[ 本帖最后由 csjn1 于 2012-3-7 21:35 编辑 ]
0 回复
1