Codejock Forums Homepage
Forum Home Forum Home > Codejock Products > ActiveX COM > Report Control
  New Posts New Posts RSS Feed - [SOLVED] EditControlStyle = xtpEditStyleMultiline
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

[SOLVED] EditControlStyle = xtpEditStyleMultiline

 Post Reply Post Reply
Author
Message
Aaron View Drop Down
Senior Member
Senior Member
Avatar

Joined: 29 January 2008
Status: Offline
Points: 2192
Post Options Post Options   Thanks (0) Thanks(0)   Quote Aaron Quote  Post ReplyReply Direct Link To This Post Topic: [SOLVED] EditControlStyle = xtpEditStyleMultiline
    Posted: 26 April 2011 at 8:34am
Hi,
 
When setting a column EditControlStyle = xtpEditStyleMultiline (with TextFont set to a larger size) the selection is only partially and other part is cutoff. See image below
 
 
 
Set Me.wndReportControl.PaintManager.TextFont = Me.Font (just set larger size)
Me.wndReportControl.SetCustomDraw xtpCustomBeforeDrawRow + xtpCustomMeasureRow
 
 
 
 
Add column:
 
With .Columns.Add(Me.wndReportControl.Columns.Count, "Name", 200, True)
            .Alignment = xtpAlignmentVCenter
            .AutoSortWhenGrouped = True
            .Sortable = False
            .Groupable = True
            .Visible = True
            .AutoSize = True
            .Editable = False
            With .EditOptions
                .MaxLength = 40
                .EditControlStyle = xtpEditStyleMultiline *
                .SelectTextOnEdit = True
            End With
        End With
 
Private Sub wndReportControl_MeasureRow(ByVal Row As XtremeReportControl.IReportRow, ByVal hdc As stdole.OLE_HANDLE, ByVal Width As Long, Height As Long)
     On Error Resume Next
    If Not Row.GroupRow Then
        Height = 30
    Else
        Height = 50
    End If
End Sub
 
 
 
* This will produce:
 
 
 
 
Thanks
 
 
edit: It's a Windows flaw, nothing can be done here.
 
 
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 2
Language: Visual Basic 6.0

Zero replies is not an option....
Back to Top
ABuenger View Drop Down
Newbie
Newbie
Avatar

Joined: 02 February 2006
Status: Offline
Points: 1075
Post Options Post Options   Thanks (0) Thanks(0)   Quote ABuenger Quote  Post ReplyReply Direct Link To This Post Posted: 08 May 2011 at 9:57am
Hi Aaron,

I've tried to reproduce your bug, but everything works fine for me. Please create a support ticket and attach some sample code that reproduces your problem.

Andre

Codejock support
Back to Top
Aaron View Drop Down
Senior Member
Senior Member
Avatar

Joined: 29 January 2008
Status: Offline
Points: 2192
Post Options Post Options   Thanks (0) Thanks(0)   Quote Aaron Quote  Post ReplyReply Direct Link To This Post Posted: 08 May 2011 at 4:54pm

Hi Andre,

"Submitting ticket" will always be in forum...  I have still a bad taste in my mouth since... Tongue

Well here it is:
 
 
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 2
Language: Visual Basic 6.0

Zero replies is not an option....
Back to Top
gibra View Drop Down
Senior Member
Senior Member


Joined: 31 October 2008
Location: Italy
Status: Offline
Points: 288
Post Options Post Options   Thanks (0) Thanks(0)   Quote gibra Quote  Post ReplyReply Direct Link To This Post Posted: 08 May 2011 at 7:35pm
I confirm the issue. Confused
gibra
CJ SuiteControl v: 13.x to 19.x
Windows 10 64bit
VS2019 - VB6.0 SP6
<a href="http://nuke.vbcorner.net/Home/tabid/36/language/en-US/Default.aspx" rel="nofollow">VS/VB 6.0 Installer v6.8
Back to Top
ABuenger View Drop Down
Newbie
Newbie
Avatar

Joined: 02 February 2006
Status: Offline
Points: 1075
Post Options Post Options   Thanks (0) Thanks(0)   Quote ABuenger Quote  Post ReplyReply Direct Link To This Post Posted: 09 May 2011 at 10:38pm
Hi,

this is a bug of the Windows edit control. Please use a appropriate row height to resolve the problem. In the provided sample at least 38px.

As you can see here, it is a bug of the underlying Windows control. Just put a standard edit control on the form and set it to multiline and the font to Tahoma 22.




Andre

Codejock support
Back to Top
Aaron View Drop Down
Senior Member
Senior Member
Avatar

Joined: 29 January 2008
Status: Offline
Points: 2192
Post Options Post Options   Thanks (0) Thanks(0)   Quote Aaron Quote  Post ReplyReply Direct Link To This Post Posted: 10 May 2011 at 1:46am
Hi Andre,
 
It's indeed Windows flaw, nothing can be done here...
 
Thanks
 
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 2
Language: Visual Basic 6.0

Zero replies is not an option....
Back to Top
 Post Reply Post Reply
  Share Topic   

Forum Jump Forum Permissions View Drop Down

Forum Software by Web Wiz Forums® version 12.04
Copyright ©2001-2021 Web Wiz Ltd.

This page was generated in 0.203 seconds.