|
[BUG?] BeforeDrawRow Erase my Picture |
Post Reply 
|
| Author | |
MottoDoki 
Newbie 
Joined: 16 September 2010 Status: Offline Points: 5 |
 Post Options
 Thanks(0)
 Quote Reply
 Topic: [BUG?] BeforeDrawRow Erase my PicturePosted: 27 September 2011 at 11:28am |
|
Hello, I'm trying to insert a picture into a ReportControl first but when i invoke RPPrint.SetCustomDraw xtpCustomBeforeDrawRow the picture disappear , here is the code : -------------------------------------------------------------------------------------------------- -- declaring my column then adding data : Dim rptRec As XtremeReportControl.ReportRecord Dim rptItm As XtremeReportControl.ReportRecordItem Dim rptCol As XtremeReportControl.ReportColumn i = 1001 With RPPrint.Icons .LoadBitmap App.Path & "\Res\BNPPARIBAS_SMALL_S027E001.png", i, xtpImageNormal End With Set rptRec = RPPrint.Records.Add() Set rptItm = rptRec.AddItem("") Set rptItm = rptRec.AddItem("") rptItm.Alignment = xtpAlignmentIconRight Or xtpAlignmentRight rptItm.Icon = i Set rptItm = rptRec.AddItem("") Set rptItm = rptRec.AddItem("") Set rptItm = rptRec.AddItem("") Set rptItm = rptRec.AddItem("") Set rptItm = rptRec.AddItem("") Set rptItm = rptRec.AddItem("") Set rptItm = rptRec.AddItem("") '------------------here the picture is merge on 7 col cos it's big rptRec.Records.MergeItems 0, 0, 1, 7 Set rptRec = RPPrint.Records.Add() Set rptItm = rptRec.AddItem("0123456789") rptItm.Alignment = xtpAlignmentLeft Or xtpAlignmentWordBreak Set rptItm = rptRec.AddItem("RAISON SOCIALE LONGUE") rptItm.Alignment = xtpAlignmentLeft Or xtpAlignmentWordBreak Set rptItm = rptRec.AddItem("0123456789") rptItm.Alignment = xtpAlignmentLeft Set rptItm = rptRec.AddItem("0123456789") rptItm.Alignment = xtpAlignmentLeft Set rptItm = rptRec.AddItem("0123456789") rptItm.Alignment = xtpAlignmentLeft Set rptItm = rptRec.AddItem("0123456789") rptItm.Alignment = xtpAlignmentLeft Set rptItm = rptRec.AddItem("31/01/2011") rptItm.Alignment = xtpAlignmentCenter Set rptItm = rptRec.AddItem("31/01/2011") rptItm.Alignment = xtpAlignmentCenter Set rptItm = rptRec.AddItem("999 999 999,99") rptItm.Alignment = xtpAlignmentRight RPPrint.SetCustomDraw xtpCustomBeforeDrawRow With RPPrint .Populate For Each rptCol In .Columns rptCol.BestFit Next End With -------------------------------------------------------------------------------------------------- i still don't do anything in the BeforeDrawRow event !! Is it a bug ? Thanks for you help |
|
 |
|
|
ABuenger
Newbie
Joined: 02 February 2006 Status: Offline Points: 1075 |
Post Options
Thanks(0)
Quote Reply
Posted: 27 September 2011 at 5:55pm |
|
Hi,
please note that custom support is only available through our support: http://forum.codejock.com/forum_posts.asp?TID=14125&FID=124&PR=3&title=notice-codejock-support-policy Andre |
|
|
Codejock support
|
|
|
|
|
MottoDoki
Newbie
Joined: 16 September 2010 Status: Offline Points: 5 |
Post Options
Thanks(0)
Quote Reply
Posted: 28 September 2011 at 1:32am |
|
Done
|
|
|
|
|
McKloony
Senior Member 
Joined: 09 January 2007 Location: Germany Status: Offline Points: 340 |
Post Options
Thanks(0)
Quote Reply
Posted: 28 September 2011 at 8:33am |
|
The idea behind it is brilliant. I would be interested to know how to turn the reportcontrol into a thumbnail viewer :-)
|
|
|
Product: Xtreme SuitePro (ActiveX) 16.2.5
Platform: XP / Windows 7 Language: Visual Basic 6.0 SP6 |
|
|
|
|
Post Reply
|
|
Tweet
|
| Forum Jump | Forum Permissions You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |
![RSS Feed - [BUG?] BeforeDrawRow Erase my Picture](forum_images/rss.png "RSS Feed: [BUG?] BeforeDrawRow Erase my Picture")
Topic Options