计算器——小数点右边不能输入数字？！

小数点右边不能输入数字！！！！！！！
我用panel来显示运算结果，刚刚开始学Delphi,还不懂得如何写代码让Edit.text右对齐，只好用panel了。
==================================

==================================
定义了三个全局变量：
  xsd:boolean=true;//xsd是小数点的意思，默认是没有点击小数点，设为true。当点击小数点的时候，其值为 false
  y:string;
  m:integer;
当按下“1”的时候，代码如下
if xsd then
   if panel1.Caption='0.' then
      panel1.Caption:='1.'
   else
      if panel1.Caption<>'0.' then
         begin
            y:=panel1.Caption;
            m:=length(y);
            setlength(y,m-1);
            panel1.Caption:=y+'1'+'.'
         end
else
  if xsd=false then //问题应该在这里了，但我不知道错在哪里！
    begin
      y:=panel1.Caption;
      panel1.Caption:=y+'1'
    end;

end;
如何写代码让Edit.text右对齐?大家帮帮忙吧！