Watch, Follow, &
Connect with Us

For forums, blogs and more please visit our
Developer Tools Community.


Welcome, Guest
Guest Settings
Help

Thread: Problem with TBitBtn. The canevas can't be drawn



Permlink Replies: 0
Frederic GIROD

Posts: 18
Registered: 1/15/11
Problem with TBitBtn. The canevas can't be drawn
Click to report abuse...   Click to reply to this thread Reply
  Posted: Jul 7, 2014 12:36 AM
Hi,

I'm migrating projects from D2007 to Delphi XE2.

When I select Bit button, I have the messsage "The canvas can't be drawn" and the "Violation access to adress something in module designide.bpl. Read of adresse 000000. The detail give :

[5030F24B]{vcl160.bpl } Vcl.Graphics.TCanvas.RequiredState (Line 4191, "Vcl.Graphics.pas" + 8) + $12
[5030F141]{vcl160.bpl } Vcl.Graphics.TCanvas.GetHandle (Line 4141, "Vcl.Graphics.pas" + 2) + $B
[5049579B]{vcl160.bpl } Vcl.Buttons.TBitBtn.DrawItem (Line 1888, "Vcl.Buttons.pas" + 41) + $E
[500431FF]{rtl160.bpl } System.TInterfacedObject._Release (Line 30148, "System.pas" + 1) + $3
[5003C866]{rtl160.bpl } System.@IsClass (Line 13351, "System.pas" + 1) + $8
[50495637]{vcl160.bpl } Vcl.Buttons.TBitBtn.CNDrawItem (Line 1832, "Vcl.Buttons.pas" + 0) + $3
[50332995]{vcl160.bpl } Vcl.Controls.TControl.WndProc (Line 7204, "Vcl.Controls.pas" + 91) + $6
[503372F3]{vcl160.bpl } Vcl.Controls.TWinControl.WndProc (Line 9976, "Vcl.Controls.pas" + 152) + $6
[5003D222]{rtl160.bpl } System.TMonitor.Exit (Line 14600, "System.pas" + 9) + $7
[5035705C]{vcl160.bpl } Vcl.StdCtrls.TButtonControl.WndProc (Line 5002, "Vcl.StdCtrls.pas" + 13) + $4
[503325D0]{vcl160.bpl } Vcl.Controls.TControl.Perform (Line 6982, "Vcl.Controls.pas" + 10) + $8
[50337443]{vcl160.bpl } Vcl.Controls.DoControlMsg (Line 10045, "Vcl.Controls.pas" + 12) + $11
[50337FF6]{vcl160.bpl } Vcl.Controls.TWinControl.WMDrawItem (Line 10371, "Vcl.Controls.pas" + 1) + $8
[50332995]{vcl160.bpl } Vcl.Controls.TControl.WndProc (Line 7204, "Vcl.Controls.pas" + 91) + $6
[5003D50F]{rtl160.bpl } System.TMonitor.TryEnter (Line 14790, "System.pas" + 10) + $0
[5003D078]{rtl160.bpl } System.TMonitor.Enter (Line 14489, "System.pas" + 4) + $2
[5003CF1C]{rtl160.bpl } System.TMonitor.CheckOwningThread (Line 14411, "System.pas" + 2) + $0
[5003D222]{rtl160.bpl } System.TMonitor.Exit (Line 14600, "System.pas" + 9) + $7
[5003D25B]{rtl160.bpl } System.TMonitor.Exit (Line 14614, "System.pas" + 2) + $7
[500A45D2]{rtl160.bpl } System.Classes.TInterfaceList.GetCount (Line 4421, "System.Classes.pas" + 5) + $9
[500431FF]{rtl160.bpl } System.TInterfacedObject._Release (Line 30148, "System.pas" + 1) + $3
[5004311C]{rtl160.bpl } System.@IntfClear (Line 29967, "System.pas" + 10) + $0
[51D3F2E2]{vcldesigner160.bpl} VCLSurface.TVclDesignSurface.IsDesignMsg (Line 3314, "VCLSurface.pas" + 186) + $28
[503372F3]{vcl160.bpl } Vcl.Controls.TWinControl.WndProc (Line 9976, "Vcl.Controls.pas" + 152) + $6
[5003C866]{rtl160.bpl } System.@IsClass (Line 13351, "System.pas" + 1) + $8
[490F78C8]{JvCore160.bpl} JvExControls.DispatchIsDesignMsg + $68
[49117926]{JvCore160.bpl} JvExExtCtrls.TJvExCustomPanel.WndProc + $4A2
[50336948]{vcl160.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9689, "Vcl.Controls.pas" + 3) + $6
[500B6890]{rtl160.bpl } System.Classes.StdWndProc (Line 13878, "System.Classes.pas" + 8) + $0
[5030FC44]{vcl160.bpl } Vcl.Graphics.PaletteFromDIBColorTable (Line 4767, "Vcl.Graphics.pas" + 9) + $1
[500431C7]{rtl160.bpl } System.TInterfacedObject.QueryInterface (Line 30135, "System.pas" + 1) + $8
[503373F0]{vcl160.bpl } Vcl.Controls.TWinControl.DefaultHandler (Line 10017, "Vcl.Controls.pas" + 30) + $17
[50337C9B]{vcl160.bpl } Vcl.Controls.TWinControl.WMPaint (Line 10259, "Vcl.Controls.pas" + 4) + $7
[5004311C]{rtl160.bpl } System.@IntfClear (Line 29967, "System.pas" + 10) + $0
[51D3F2E2]{vcldesigner160.bpl} VCLSurface.TVclDesignSurface.IsDesignMsg (Line 3314, "VCLSurface.pas" + 186) + $28
[5003C866]{rtl160.bpl } System.@IsClass (Line 13351, "System.pas" + 1) + $8
[5003CA63]{rtl160.bpl } System.TObject.Dispatch (Line 13727, "System.pas" + 11) + $0
[50332995]{vcl160.bpl } Vcl.Controls.TControl.WndProc (Line 7204, "Vcl.Controls.pas" + 91) + $6
[50314688]{vcl160.bpl } Vcl.Graphics.CopyBitmap (Line 7763, "Vcl.Graphics.pas" + 184) + $A
[5003C866]{rtl160.bpl } System.@IsClass (Line 13351, "System.pas" + 1) + $8
[503367E2]{vcl160.bpl } Vcl.Controls.TWinControl.UpdateControlState (Line 9646, "Vcl.Controls.pas" + 20) + $8
[503394DE]{vcl160.bpl } Vcl.Controls.TWinControl.CMVisibleChanged (Line 11413, "Vcl.Controls.pas" + 3) + $2
[50332995]{vcl160.bpl } Vcl.Controls.TControl.WndProc (Line 7204, "Vcl.Controls.pas" + 91) + $6
[5003CF6C]{rtl160.bpl } System.TMonitor.Destroy (Line 14430, "System.pas" + 0) + $0
[5003C61F]{rtl160.bpl } System.TObject.CleanupInstance (Line 13138, "System.pas" + 20) + $0
[50037A9C]{rtl160.bpl } System.@FreeMem (Line 3502, "System.pas" + 20) + $0
[5003C55C]{rtl160.bpl } System.TObject.FreeInstance (Line 13006, "System.pas" + 2) + $2
[5003CCDA]{rtl160.bpl } System.@ClassDestroy (Line 14206, "System.pas" + 0) + $2
[50313A4D]{vcl160.bpl } Vcl.Graphics.TBitmapImage.Destroy (Line 7266, "Vcl.Graphics.pas" + 16) + $6
[50315BD0]{vcl160.bpl } Vcl.Graphics.TBitmap.NewImage (Line 8902, "Vcl.Graphics.pas" + 36) + $5
[50044062]{rtl160.bpl } SysInit.@GetTls (Line 725, "SysInit.pas" + 23) + $0
[500B3A89]{rtl160.bpl } System.Classes.TThread.GetCurrentThread (Line 11939, "System.Classes.pas" + 13) + $0
[503372F3]{vcl160.bpl } Vcl.Controls.TWinControl.WndProc (Line 9976, "Vcl.Controls.pas" + 152) + $6
[5035705C]{vcl160.bpl } Vcl.StdCtrls.TButtonControl.WndProc (Line 5002, "Vcl.StdCtrls.pas" + 13) + $4
[503325D0]{vcl160.bpl } Vcl.Controls.TControl.Perform (Line 6982, "Vcl.Controls.pas" + 10) + $8
[50337BDF]{vcl160.bpl } Vcl.Controls.TWinControl.PaintTo (Line 10237, "Vcl.Controls.pas" + 43) + $D
[5030F26F]{vcl160.bpl } Vcl.Graphics.TCanvas.RequiredState (Line 4195, "Vcl.Graphics.pas" + 12) + $7
[50337911]{vcl160.bpl } Vcl.Controls.TWinControl.PaintTo (Line 10166, "Vcl.Controls.pas" + 3) + $12
[51D39A35]{vcldesigner160.bpl} VCLSurface.PrintWindow (Line 755, "VCLSurface.pas" + 33) + $F
[51D42484]{vcldesigner160.bpl} VCLSurface.TDragImage.Create (Line 4716, "VCLSurface.pas" + 8) + $8
[51D39B20]{vcldesigner160.bpl} VCLSurface.TControlItem.GetDragImage (Line 824, "VCLSurface.pas" + 1) + $E
[20FA0A65]{designide160.bpl} Designer.TDesigner.DragBoxesOn (Line 904, "Designer.pas" + 12) + $A
[500431FF]{rtl160.bpl } System.TInterfacedObject._Release (Line 30148, "System.pas" + 1) + $3
[5004311C]{rtl160.bpl } System.@IntfClear (Line 29967, "System.pas" + 10) + $0
[20FA0869]{designide160.bpl} Designer.TDesigner.DragBegin (Line 861, "Designer.pas" + 38) + $2
[20FA31DF]{designide160.bpl} Designer.TDesigner.MouseDown (Line 1709, "Designer.pas" + 86) + $9
[51D3E21A]{vcldesigner160.bpl} VCLSurface.MouseEvent (Line 2906, "VCLSurface.pas" + 36) + $2A
[5003D25B]{rtl160.bpl } System.TMonitor.Exit (Line 14614, "System.pas" + 2) + $7
[51D3EE3F]{vcldesigner160.bpl} VCLSurface.TVclDesignSurface.IsDesignMsg (Line 3176, "VCLSurface.pas" + 48) + $6
[5003C866]{rtl160.bpl } System.@IsClass (Line 13351, "System.pas" + 1) + $8
[5033271B]{vcl160.bpl } Vcl.Controls.TControl.WndProc (Line 7117, "Vcl.Controls.pas" + 4) + $21
[50336B88]{vcl160.bpl } Vcl.Controls.TWinControl.IsControlMouseMsg (Line 9753, "Vcl.Controls.pas" + 9) + $25
[503372F3]{vcl160.bpl } Vcl.Controls.TWinControl.WndProc (Line 9976, "Vcl.Controls.pas" + 152) + $6
[5035705C]{vcl160.bpl } Vcl.StdCtrls.TButtonControl.WndProc (Line 5002, "Vcl.StdCtrls.pas" + 13) + $4
[50336948]{vcl160.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9689, "Vcl.Controls.pas" + 3) + $6
[500B6890]{rtl160.bpl } System.Classes.StdWndProc (Line 13878, "System.Classes.pas" + 8) + $0
[50454598]{vcl160.bpl } Vcl.Forms.TApplication.CancelHint (Line 10993, "Vcl.Forms.pas" + 6) + $7
[50453213]{vcl160.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 10164, "Vcl.Forms.pas" + 23) + $1
[50453256]{vcl160.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10194, "Vcl.Forms.pas" + 1) + $4
[50453595]{vcl160.bpl } Vcl.Forms.TApplication.Run (Line 10332, "Vcl.Forms.pas" + 26) + $3

Thanks for your help.
Legend
Helpful Answer (5 pts)
Correct Answer (10 pts)

Server Response from: ETNAJIVE02