精華答案: 位數有幾個嗎?要是要查詢位數有幾個可以用pos函數. edit1.text為要查詢的 ShowMessage(IntToStr( Length(Trim(Edit1.Text) ) - Pos('.',Trim(Edit1.Text)) ));
wenwen.sogou.com