上網找到下面的程式碼，修了一下測試，真的可以耶!!!!最近的程式剛好有UTF8編碼的困擾，使用這方式轉是方便多了，不過還要測試會不會有問題。
討論區：http://delphi.ktop.com.tw/board.php?cid=30&fid=76&tid=89562
procedure TForm1.Button1Click(Sender: TObject); var S:UTF8String; F:TextFile; TntEdit1: TStringList; begin TntEdit1 := TStringList.Create; TntEdit1.Add(’我是天才我是天才我是天才’); S:=UTF8Encode(TntEdit1.Text); [...]
近期迴響