能不能让tedit组件的text靠右边对齐

Question

可以啊！他有个属性叫ALIGN之类的（呵呵，记不很清楚）
里面选RIGHT 就可以了！

Answer 1

另烦请瞧瞧这两个贴子：一起结帐
http://www.csdn.net/expert/topic/173/173821.shtm
http://www.csdn.net/expert/topic/177/177949.shtm

Answer 2

Mark_zheng(Mark_zheng)
应该是Alignment
但我没找到tedit组件的这个属性

Answer 3

呵呵！没有这样的属性，我尝试用空格也不行，EDIT好象自动把空格过滤掉了。或者你可以尝试一下用LABEL代替EDIT显示，也就是用LABEL显示，输入的时候用EDIT，
在输入的时候把LABEL 的 VISIBLE设置为FALSE ，输入完后给LABEL赋值，把EDIT 的VISIBLE设置为FALSE。可能很麻烦！呵呵！
好象没有必要。

Answer 4

能不能让tedit组件的text的长度随窗体的宽度自动拉伸或缩小，象IE的地址栏？？？
（不用控件）

Answer 5

对齐吗？这个简单：
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, CoolCtrls;type
  TMyEdit=Class(TEdit)
  private
    FTextAlign: TAlignment;
    procedure SetTextAlign(const Value: TAlignment);
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  published
    property TextAlign: TAlignment read FTextAlign write SetTextAlign default taLeftJustify;
  end;  TForm1 = class(TForm)
    Button1: TButton;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    Edit1:TMyEdit;
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}{ TMyEdit }procedure TMyEdit.CreateParams(var Params: TCreateParams);
const
   Alignments: array [TAlignment] of DWord = (ES_LEFT, ES_RIGHT, ES_CENTER);
begin
  inherited CreateParams(Params);
  with Params do
    Style := Params.Style or ES_MULTILINE or Alignments[FTextAlign];
end;procedure TForm1.FormCreate(Sender: TObject);
begin
  Edit1:=TMyEdit.Create(Self);
  Edit1.Parent:=Self;
  Edit1.Align:=alTop;
  Edit1.Text:='aaaa';
end;procedure TMyEdit.SetTextAlign(const Value: TAlignment);
begin
  FTextAlign := Value;
  RecreateWnd;
end;procedure TForm1.Button1Click(Sender: TObject);
Var i:Word;
begin
  i:=ORD(Edit1.TextAlign)+1;
  i:=i MOD 3;
  Edit1.TextAlign:=TAlignment(i);
end;end.
要长度随窗体宽度变化也很简单啦：改变anchors属性成[akLeft,akTop,akRight]就可以了！

Answer 6

关于：http://www.csdn.net/expert/topic/173/173821.shtm：
答：你可能用了UpdateSQL控件，而没有设置其中的SQL语句。 或者关于TUpdateSql的属性设置不对。关于：http://www.csdn.net/expert/topic/177/177949.shtm:
我用query连结sql数据库，
cachedupdates:=true;
requestlive:=true;
如何判断我的表有没有修改数据
比如在三层时：clientdataset有一个changecount属性答：Query的UpdatesPending属性可以检查是否有记录未提交！用query连结sql数据库，再用dbgrid连结query用来浏览修改数据效率怎么样答：对于网络数据库，这种组合是Delphi数据库程序的标准组合，效率是最好的！