請問下列程式沒放TXPManifest元件時中文字貼上正常,
但是有放TXPManifest元件時中文字貼上便亂碼,
不知TXPManifest元件在處理中文字是否有問題?
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, XPMan;
type
  TForm1 = class(TForm)
    Memo1: TMemo;
    Button1: TButton;
    XPManifest1: TXPManifest;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
uses Clipbrd;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var str: String;
begin
  str := '測試';
  ClipBoard.AsText := str;
  memo1.PasteFromClipboard;
  ClipBoard.Clear;
end;
end.    

引言: 我的環境是Windows XP Professional 多國語言板 地區設台灣與語言設中文,請問還有什麼地方要設定? Delphi follower

我在 Win2000 上試也 ok,抱歉我沒有 XP Professional 版可以試... ---- 我只會兩件事,這也不會,那也不會 ---- 眼見不一定為真