請教一個問題我怎麼把一個字串中的空白字元給刪除謝謝

笨方法 用pos找到空白字元的位置 將字串分割成二個部份 使用trim將二者後面空白去除 最後再將二個部份加起來就好 努力會更接近成功

------
努力會更接近成功

Hi sundy6719,    使用 StringReplace 函數    StringReplace function Returns a string with occurrences of one substring replaced by another substring.

procedure TForm1.Button2Click(Sender: TObject);
begin
  Edit1.Text := StringReplace(Edit1.Text,' ','',[rfReplaceAll]);
end;

---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

trim 左右全刪不含中間 trimleft 刪左 trimright 刪右