Page 1 of 1

teechart 8 Garbled:Page Language Chinese,Page Encode UTF8

Posted: Fri Feb 27, 2009 4:47 am
by 15051625
Image
I use teechart v8 Multi-language Unicode Version or Full Version, it display like the above picture.
the .Axis left title font charset is 134 ,also right ,bottom. these position display well, but the Legend ,Series Title Garbled.
I read the help file, I saw Series Title is a Widestring.

Look forward to helping! Thanks!

Posted: Fri Feb 27, 2009 10:19 am
by yeray
Hi Jon,

It's strange, I've tested it with the following code and it works fine with TeeChart v8 Multilanguage Unicode.

Code: Select all

public Form1()
        {
            InitializeComponent();

            InitializeChart();
        }

        private void InitializeChart()
        {
            axTChart1.AddSeries(TeeChart.ESeriesClass.scPoint);

            axTChart1.Series(0).FillSampleValues(25);

            axTChart1.Series(0).set_PointLabel(0, "시작 메뉴");
        }
Please, could you send us a simple example project we can run "as-is" to reproduce the problem here? You can either post your files at news://www.steema.net/steema.public.attachments newsgroup or at our upload page.

Posted: Fri Feb 27, 2009 11:02 am
by 15051625
Thank you ,Yeray!
This is The Code Segment!

Code: Select all

		dim	lsSeries
		With QMS_Chart
			k = 0
			.Legend.LegendStyle = lsSeries
			For i = 0 to 2 step 1
				.AddSeries(23)
				
				'.Series(i).asBar.MultiBar =1
				.legend.visible =1
			
				.Axis.left.Title.Caption = "例数" ' This is Display Well
				.Axis.bottom.Title.Caption = Row_x_name
	
'Set Charset
				.Axis.left.Title.Font.Charset=134
				.Axis.right.Title.Font.Charset=134
				.Axis.bottom.Title.Font.Charset=134
				.Axis.left.labels.Font.Charset=134
				.Axis.right.labels.Font.Charset=134
				.Axis.bottom.labels.Font.Charset=134
				
				
				'.Series(i).asLine.Pointer.Brush.Color = s_Color

				.Series(i).Marks.visible = 0 
				.Series(i).Marks.style = 1
				
				.Series(i).ShowInLegend = 2
				'response.write Col_n
				
				For j = 0 to Col_n-1
					if ToInt(left(Trim(Col_x(j)),len(Trim(Col_x(j)))-1))>=fdis then
						.Series(i).Add Cell(i,j), Col_x(j), .Series(i).color
						.Series(i).Title = ctitle(i)' This is Garbled! "尸体","活体","总数"

						'.Series(i).PointLabel(i) = ctitle(i)' It's Not Work!
						
					end if
				Next
				
			Next
			'.Legend.Title.Font.Charset = 134
			'.Legend.Visible = false

			.Export.SaveToJPEGFile gLocalPath & "\" & gpath & "\" & ChartInfo("ChartName") & ".JPG",False,1, 85,.Width, .Height
		end with
Look forward to your response!

Posted: Fri Feb 27, 2009 12:44 pm
by yeray
Hi Jon,

I couldn't reproduce the problem here. That makes me think that you could be trying to show some texts in a language not correctly installed in your machine. Could it be possible?

I'm afraid that we only have a korean machine to do this type of tests, so I've simplified a little bit your code and changed the texts for korean texts and everything seems to work as expected.

Please, could you try to change the strings of this code for your machine's language texts and see if they are shown as expected?

Code: Select all

Dim i As Integer

        With AxTChart1
            For i = 0 To 2
                .AddSeries(TeeChart.ESeriesClass.scBar)

                .Legend.Visible = 1

                .Axis.Left.Title.Caption = "例数"

                .Series(i).Marks.Visible = 0
                .Series(i).Marks.Style = 1

                .Series(i).ShowInLegend = 2

                .Series(i).Add(Rnd() * 100, "파일 폴더", .Series(i).Color)
                .Series(i).Add(Rnd() * 100, "로컬 디스크", .Series(i).Color)
                .Series(i).Add(Rnd() * 100, "검색 결과", .Series(i).Color)
            Next

            .Series(0).Title = "탐색기"
            .Series(1).Title = "명령 프롬프트"
            .Series(2).Title = "메모장"
        End With
Thanks in advance