Why didn't translate?

[weichangmei]

hi, i write a simple program to test translation function.

The popup window by "ChartEditor1.Execute" don't translate. who can tell me why and how to?

=================== Main.pas =======================
unit Main;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, TeeProcs, TeeGalleryPanel, TeeGDIPlus, StdCtrls, TeEngine,
Chart, DBChart, TeeEdit, ComCtrls, TeeChineseSimp, Series;

type
TForm1 = class(TForm)
ChartEditor1: TChartEditor;
Panel1: TPanel;
Button1: TButton;
DBChart1: TDBChart;
Series1: TLineSeries;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
TeeSetChineseSimp;
TeeTranslateControl(Form1);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ChartEditor1.Execute;
end;

end.

[Yeray]

Hi,

Try adding TeeTranslate to your uses clause.

[weichangmei]

waoooo, i am so stupid.

thk u.