Re: [fpc-pascal] SIGSEGV in fpc_check_object

2017-06-14 Thread Sven Barth via fpc-pascal
Am 14.06.2017 11:13 schrieb "Gabor Boros" : > > 2017. 06. 14. 10:28 keltezéssel, José Mejuto írta: >> >> That's wrong for sure, x is not initialized to nil, not in Linux nor in Windows. > > > With the below code caption of the form not changed on Linux for me. > > > procedure

Re: [fpc-pascal] SIGSEGV in fpc_check_object

2017-06-14 Thread Gabor Boros
2017. 06. 14. 10:28 keltezéssel, José Mejuto írta: That's wrong for sure, x is not initialized to nil, not in Linux nor in Windows. With the below code caption of the form not changed on Linux for me. procedure TForm1.FormCreate(Sender: TObject); var x:TPanel; begin if Assigned(x) then

Re: [fpc-pascal] SIGSEGV in fpc_check_object

2017-06-14 Thread José Mejuto
El 13/06/2017 a las 21:04, Gabor Boros escribió: Cannot have a simple test case just a dumb example. procedure TForm1.FormCreate(Sender: TObject); var x:TPanel; begin x.Free; end; With Linux no error (x is Nil before the Free call), with Windows got SIGSEGV (x is not Nil before the

[fpc-pascal] SIGSEGV in fpc_check_object

2017-06-14 Thread Gabor Boros
Hi All, In my Lazarus application I use a TPanel descendant component (TMyPanel) which have subpanels (TMySubPanel) which are TPanel descendants also. The subpanels accessed through a TList. If add a new subpanel into the main panel added to the list with TList.Add if remove a subpanel from