Printing in Greek

Posted by: jayasangeetha on 4 August 2017, 3:04 pm EST

  • Posted 4 August 2017, 3:04 pm EST

    Hi,


    I am using Activex Reports 2.0. I want to print in Greek Letter.


    I have assigned recordset to DataControl,  and have assigned


    dataField to Field Control.  The data is strored in Greek (Sql


    Server 2000, nvarchar datatype). But when i run the report its


    not showing up as greek characters. This doesnt work for


    RichEdit Control too. How do i fix this up?


    I can type greek letter in RichEdit Control in Designmode only.


    Is it Possible to display Greek Letters in ActiveReport


    Controls?


    Thanks in advance for your efforts.


    Regards


    Sangeetha

  • Replied 4 August 2017, 3:04 pm EST

    Field.Font.Charset = GREEK_CHARSET
  • Replied 4 August 2017, 3:04 pm EST

    Hi,


    I am getting the Greek Language Display for all the  Controls in a form without any localizing VB6 applications. Is it  possible to display Activereport in Greek?


    Thanks in advance for your effort


    Regards,


    Sangeetha

  • Replied 4 August 2017, 3:04 pm EST

     Thanks a lot .It is working...
  • Replied 4 August 2017, 3:04 pm EST

    Hi,


    I am using Active Reports Designer 2.0. Designing the Report at run time and assigning the charset to 161 for all the  fields in Report at run time and  have assigned recordset to DataControl,  and also have assigned dataField to Field Control.  The data is strored in Greek (Sql Server 2000, nvarchar datatype). But when i run the report its not showing up as greek characters. How do i fix this up?


    Thanks in advance for your efforts.


    Regards


    Sangeetha

  • Replied 4 August 2017, 3:04 pm EST

    Hi,


    Thanks for your continous support. Plz find attached VB Project that contains the form with two textboxes and one commandbutton. The first textbox  will display in English and the second textbox will display in Greek. Commandbutton for displaying the ActiveReport. Operating System is XP with SP2, i have also enabled greek in the advanced tab of the regional settings..


    For textboxes, I have retrived the data from Backend(Sql Server) and assigned to it. Its working fine, the same recordset i'm assigning it to the datacontrol of ActiveReport, Greek is not coming.


    Thanks in advance for your help.


     


    Regards,


    Sangeetha. J


     


    2007/07/F_Greek.zip
  • Replied 4 August 2017, 3:04 pm EST

    Unfortunately, even though VB6 stores strings internally as unicode,
    the IDE only supports ANSI. If you set values using the properties
    window, uncode characters will display as question marks.

    If you wish to see the characters at design time, be sure to set your Regional and Language Settings to Greek on the Advanced tab under the "Langauge for non-Unicode programs".

    For more information on localizing VB6 applications, see the following MSDN article: http://msdn2.microsoft.com/en-us/library/150x5ys0(VS.80).aspx

    -Jon
  • Replied 4 August 2017, 3:04 pm EST

    When testing this on my own machine using SQL Server 2005 Express
    Edition with a sample table containing greek text stored as nvarchar,
    even without setting the character set of the labels and textboxes the
    characters display fine in the ActiveReport.



    Which build are you currently using? Also, which operating system are you targeting for deployment?

    If you can provide a small sample which reproduces this issue that will help me to assist you further.

    Thanks,
    Jon
  • Replied 4 August 2017, 3:04 pm EST

    Hello Jon,


    Its very much similiar what u have created. The only difference is that  i am trying it in bound mode, but i doubt that make any difference. can you confirm the sample application that i sent is working without any issues (i mean printing in Greek)?


    I cheked this with 2.4.1.1283, but am not lucky. Not sure what is the critical link i'm missing.


    Also i tested the sample code that you have provided (unbound mode), i am not getting any results.


    Looking forward to your feedback.


    Regards,


    Sangeetha.


     


     

  • Replied 4 August 2017, 3:04 pm EST

    Unfortunately, I'm not sure I understand exactly what you're asking for. The sample I provided in an earlier post properly displays Greek characters on the ActiveReport. So could you provide more details about your issue?

    Do you receive similar results when running the sample code I provided above on your machine?

    Thanks,
    Jon Smith
  • Replied 4 August 2017, 3:04 pm EST

    Hi,


    Thanks for your continous support. Plz find attached VB Project that contains the form with two textboxes and one commandbutton. The first textbox  will display in English and the second textbox will display in Greek. Commandbutton for displaying the ActiveReport. Operating System is XP with SP2, i have also enabled greek in the advanced tab of the regional settings..


    For textboxes, I have retrived the data from Backend(Sql Server) and assigned to it. Its working fine, the same recordset i'm assigning it to the datacontrol of ActiveReport, Greek is not coming.


    Thanks in advance for your help.


     


    Regards,


    Sangeetha


    2007/07/F_Greek-2.zip
  • Replied 4 August 2017, 3:04 pm EST

    Hi Jon,


    Our Application is visual basic Application. We take the input in Greek in Form's control(Example:Textbox) and store it in SQl Server's nvarchar field. This works perfectly,you can confirm this sample application that i have sent. This is NOT working only in ActiveReports.


    Kindly let me know the solution for this at the earlier.


    Thanks in advance for your effort.


     


     


    Regards,


    Sangeetha

  • Replied 4 August 2017, 3:04 pm EST

    Using your sample, with only modifying the connection string I still have no issues displaying Greek text on the ActiveReport.

    See the images in the attached zip file. One image is of the ActiveReport, the other is of the Windows Form, the '?' marks displayed in the TextBox on the Form is expected due to those controls not being unicode aware.

    2007/07/sample.zip
  • Replied 4 August 2017, 3:04 pm EST

    Using build 2.4.1.1283, I've tested this using my own sample data with both bound and unbound reports.

    For a bound report, I simply set the connection string on an ADO DataControl on the report along with the SQL statement.

    For the unbound report I used the following code:

    Form1:

    Private Sub Command1_Click()
        Dim rpt As New ActiveReport1
       
        Dim connection As New connection
        Dim command As New command
       
        connection.ConnectionString = "Driver={SQL Native Client};Server=.\SQLEXPRESS;Database=MultiLanguage;Trusted_Connection=yes;"
        connection.Open
       
        command.ActiveConnection = connection
        command.CommandText = "SELECT * FROM MultiLanguage"
       
        rpt.RecordSet = command.Execute()
        rpt.Show
    End Sub

    ActiveReport1:

    Private rs As RecordSet

    Public Property Let RecordSet(ByVal value As RecordSet)
        Set rs = value
    End Property


    Private Sub ActiveReport_DataInitialize()
        Fields.Add "English"
        Fields.Add "Greek"
    End Sub

    Private Sub ActiveReport_FetchData(EOF As Boolean)
        If rs.EOF Then Exit Sub
        EOF = False
       
        Fields("English").value = rs!English
        Fields("Greek").value = rs!Greek
       
        rs.MoveNext
    End Sub

    Is this similar to what you are attempting to accomplish?

    Thanks,
    Jon

    2007/07/multilanguage.JPG
Need extra support?

Upgrade your support plan and get personal unlimited phone support with our customer engagement team

Learn More

Forum Channels