Hi,
I am looking at http://www.freepascal.org/mantis/view.php?id=7723
When the exception is risen the following error is given: Program received signal EXC_BAD_ACCESS, Could not access memory. Reason: KERN_PROTECTION_FAILURE at address: 0x0000004f 0x0019409e in GTKAPIWIDGETCLIENT_DRAWCARET (CLIENT=0x4d38e00, CALLEDBYTIMER=false) at gtkwinapiwindow.pp:730
730 gtkwinapiwindow.pp: No such file or directory. in gtkwinapiwindow.pp
What kind of exception is this?
Line 730 contains:
if Visible and Blinking and (Timer = 0)
The same variables are used earlier in the procedure, so I don't think the pointer to the complete record is wrong (e.g. nil).
The variables accessed are fields in a TCaretInfo record acessed within a with block
TCaretInfo = record
X: Integer;
Y: Integer;
Width: Integer;
Height: Integer;
Visible: Boolean; // Caret is on
IsDrawn: Boolean; // Caret is visible at the moment
Blinking: Boolean; // Caret should blink
Pixmap: PGDKPixMap;
BackPixmap: PGDKPixMap;
Timer: guint;
ShowHideOnFocus: boolean; // true = hide on loose focus, show on get focus
end;Vincent