I have an application created with Lazarus. One user is getting this message 
when I create a form.
He's the only user that is seeing it, and the only thing different about his 
system is it is running
XP-SP3 Swedish.

TAboutForm is a basic form with some labels, a memo and a TBitmap on it. The 
code that creates it
is as follows, and it never makes it past the create call.

When it's reproducible it's 100% reproducible and stays constant. The problem is whether it happens varies from build to build (let's say out of 7 builds it has happened 3 times). It's got me stuffed. I'm in the process of acquiring a copy of Swedish XP to test on in a VM, but as he's over the other side of the globe from me, and asking him to download lots of 30MB debug builds is a bit onerous, I thought I'd ask here also.

I have absolutely no idea as to what is going on, but this has only been a problem since I upgraded to 2.4.0 (I'm running fpc 2.4 fixes branch svn : r14896 and the App was built with Lazarus svn : r23855)

There are 19 forms in this application, and this is the *only* one it happens 
with !?!

procedure Tbstmainform.MenuAboutClick(Sender: TObject);
Var
   About : TAboutForm;
   ZS : TDecompressionStream;
   Res : TResourceStream;
begin

  About := TAboutForm.Create(bstmainform);


Exception :

TApplication.HandleException Failed to create win32 control, error: 0 : ┼tgõrden
 har slutf÷rts.
  Stack trace:
  $0055994D  FINISHCREATEWINDOW,  line 225 of win32wscontrols.pp
  $0052D7EF  TWIN32WSCUSTOMMEMO__CREATEHANDLE,  line 1288 of win32wsstdctrls.pp
  $004D7982  TWINCONTROL__CREATEWND,  line 7018 of ./include/wincontrol.inc
  $00519A1A  TCUSTOMEDIT__CREATEWND,  line 31 of ./include/customedit.inc
  $004D7585  TWINCONTROL__CREATEHANDLE,  line 6919 of ./include/wincontrol.inc
  $004D85CA  TWINCONTROL__HANDLENEEDED,  line 7379 of ./include/wincontrol.inc
  $004D7B51  TWINCONTROL__CREATEWND,  line 7047 of ./include/wincontrol.inc
  $004158A1  TSCROLLINGWINCONTROL__CREATEWND,  line 32 of ./include/scrollingwin
control.inc
  $0041A29F  TCUSTOMFORM__CREATEWND,  line 2137 of ./include/customform.inc
  $0041B229  TFORM__CREATEWND,  line 2538 of ./include/customform.inc
  $004D7585  TWINCONTROL__CREATEHANDLE,  line 6919 of ./include/wincontrol.inc
  $004D2E0A  TWINCONTROL__UPDATESHOWING,  line 4207 of ./include/wincontrol.inc
  $0041A84D  TCUSTOMFORM__UPDATESHOWING,  line 2351 of ./include/customform.inc
  $004D60FD  TWINCONTROL__UPDATECONTROLSTATE,  line 5971 of ./include/wincontrol
.inc
  $004D942B  TWINCONTROL__CMVISIBLECHANGED,  line 7813 of ./include/wincontrol.i
nc
  $0040B8BA  TOBJECT__DISPATCH,  line 467 of /home/brad/devel/fpc/fpc_2.4.0/fpc/
rtl/inc/objpas.inc
  $004D4A32  TWINCONTROL__WNDPROC,  line 5116 of ./include/wincontrol.inc

--
Dolphins are so intelligent that within a few weeks they can
train Americans to stand at the edge of the pool and throw them
fish.


--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to