SigSegv on chaotic on
procedure freepanel(var apanel: tkeypanelfo);
begin
if apanel <> nil then begin
apanel.visible:= false;
apanel.release; // <<<HERE
apanel:= nil;
end;
end;
===================
using :
#0 00436204 frmkeyboard.pas:68 FREEPANEL(APANEL=0x0)
#1 00436342 frmkeyboard.pas:96
TFRMKEYBOARDFO__UNLINKINPUTWIDGET(this=<error reading variable>)
#2 0043652D frmkeyboard.pas:143
TFRMKEYBOARDFO__WIDGETACTIVECHANGEEXE(OLDWIDGET=0x183dc38,
NEWWIDGET=0x184a9d8, this=<error reading variable>)
#3 004EE6F3 mseforms.pas:1163
TCUSTOMMSEFORM__DOWIDGETACTIVECHANGED(OLDWIDGET=0x183dc38,
NEWWIDGET=0x184a9d8, this=<error reading variable>)
#4 0042EA57 msegui.pas:14820
TONWIDGETCHANGELIST__DOWIDGETCHANGE(OLDWIDGET=0x183dc38,
NEWWIDGET=0x184a9d8, this=<error reading variable>)
#5 0042AD6D msegui.pas:12953
TWINDOW__INTERNALACTIVATE(WINDOWEVENT=false, FORCE=false, this=<error
reading variable>)
#6 0042DA52 msegui.pas:14187 TWINDOW__ACTIVATE(FORCE=false,
this=<error reading variable>)
#7 00423E4B msegui.pas:9632 TWIDGET__SETFOCUS(AACTIVATE=true,
this=<error reading variable>)
#8 00423DB1 msegui.pas:9616 TWIDGET__CHECKSUBFOCUS(AACTIVATE=true,
this=<error reading variable>)
#9 00423E10 msegui.pas:9627 TWIDGET__SETFOCUS(AACTIVATE=true,
this=<error reading variable>)
#10 00423190 msegui.pas:9222 TWIDGET__MOUSEEVENT(INFO={EVENTKIND =
EK_BUTTONPRESS, SHIFTSTATE = [SS_LEFT], POS = {X = 97, Y = 30},
EVENTSTATE = [], TIMESTAMP = 4202761112, BUTTON = MB_LEFT},
this=<error reading variable>)
#11 004BF71B msewidgets.pas:4827
TACTIONWIDGET__MOUSEEVENT(INFO={EVENTKIND = EK_BUTTONPRESS, SHIFTSTATE
= [SS_LEFT], POS = {X = 97, Y = 30}, EVENTSTATE = [], TIMESTAMP =
4202761112, BUTTON = MB_LEFT}, this=<error reading variable>)
#12 0042C9EC msegui.pas:13650 TWINDOW__DISPATCHMOUSEEVENT(INFO={MOUSE
= {EVENTKIND = EK_BUTTONPRESS, SHIFTSTATE = [SS_LEFT], POS = {X = 97,
Y = 30}, EVENTSTATE = [], TIMESTAMP = 4202761112, BUTTON = MB_LEFT},
WHEEL = {EVENTKIND = EK_BUTTONPRESS, SHIFTSTATE = [SS_LEFT], POS = {X
= 97, Y = 30}, EVENTSTATE = [], TIMESTAMP = 4202761112, WHEEL = MW_UP,
DELTA = 0}}, CAPTURE=0x1849328, this=<error reading variable>)
#13 0043029D msegui.pas:15320
TINTERNALAPPLICATION__PROCESSMOUSEEVENT(EVENT=0x1820210, this=<error
reading variable>)
#14 00432246 msegui.pas:16264
TINTERNALAPPLICATION__EVENTLOOP(ONCE=false, this=<error reading
variable>)
#15 004336C7 msegui.pas:16859
TINTERNALAPPLICATION__DOEVENTLOOP(ONCE=false, this=<error reading
variable>)
#16 0046B5B5 mseapplication.pas:1607
TCUSTOMAPPLICATION__RUN(this=<error reading variable>)
#17 004021AC virtualkeyboard.pas:12 main()
===================================
But how can it be after the blocking check : apanel <> nil
------------------------------------------------------------------------------
CenturyLink Cloud: The Leader in Enterprise Cloud Services.
Learn Why More Businesses Are Choosing CenturyLink Cloud For
Critical Workloads, Development Environments & Everything In Between.
Get a Quote or Start a Free Trial Today.
http://pubads.g.doubleclick.net/gampad/clk?id=119420431&iu=/4140/ostg.clktrk
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
