[lazarus] Some new Tests

[Jens Arm]

Hi

Here are some new results from my tests:

1. If you select some text in the editor and then try to drag and drop 
this text at another position I get the following SegFault:

must be nil
Exiting ControlClick
 
Gtk-WARNING **: invalid cast from `(unknown)' to `GtkObject'
 
Gtk-WARNING **: invalid cast from `(unknown)' to `GtkObject'
 
Gtk-CRITICAL **: file gtkwidget.c: line 2725 (gtk_widget_event): 
assertion `GTK_IS_WIDGET (widget)' failed.
[TCustomSynEdit.Destroy]
An unhandled exception occurred at 0x2D2D2073 :
Access violation
  0x2D2D2073  main,  line 35 of graphics.pplcllinux.pp
  0x454C4255  main,  line 35 of graphics.pplcllinux.pp
An unhandled exception occurred at 0x0811661A :
Access violation
  0x0811661A
  0x3020200C  main,  line 35 of graphics.pplcllinux.pp
  0x00000000
 
[TgtkObject.Destroy] WARNING: There are 148 unreleased DCs and 540 
unreleased GDIObjects
[TgtkObject.Destroy] WARNING: There are 4 messages left in the queue! 
I'll free them                                                          





2. Start Lazarus then choose „Project/Compiler Options“ then say „cancel“ 
and If you now move the mouse over the Speedbuttons in the 
component-notebook the speedbuttons get an bevel (like a normal button) 
and then the speedbuttons act like buttons (the look changes from 
speedbuttons to buttons)





3. If you try to drag a component on the form you get a SegFault:

***************************
In TDesigner.UpOnControl
X,Y = 140,109
***************************
Setting designing
Set
[TCustomFormEditor.CreateComponent] Class='TLABEL'
Parent is 'Form1'
ParentCI <> nil
TempName is 'LABEL'
TempName + num = LABEL1
SetPropByName Name='Visible'
Index = 0
Boolean....
SETPROPBYNAME result = true
SetPropByName Name='Designing'
SETPROPBYNAME result = false
Setting designing
Set
[TCustomComboBox] DoChange
An unhandled exception occurred at 0x0805BDBC :
Access violation
  0x0805BDBC  TSOURCEEDITOR__GETANCESTOR,  line 1170 of uniteditor.pp
  0x00000001
  0x4037E1F4  main,  line 35 of graphics.pplcllinux.pp
 
must be nil
An unhandled exception occurred at 0x080723A5 :
Access violation
  0x080723A5  TIDECOMPLIST__FINDCOMPBYREGCOMPONENT,  line 162 of 
idecomp.pp
  0x0811BE70
  0x080BDCFA  TMAINIDE__CONTROLCLICK,  line 1102 of main.pp
  0x080CE2EE  TCUSTOMNOTEBOOK__CHANGE,  line 422 of 
./include/customnotebook.inc
  0x080CE338  TCUSTOMNOTEBOOK__CNNOTIFY,  line 436 of 
./include/customnotebook.inc
  0x0811B985
  0x080EEF24  TCONTROL__WNDPROC,  line 483 of ./include/control.inc
  0x080ECC57  TWINCONTROL__WNDPROC,  line 707 of ./include/wincontrol.inc
  0x080EE999  TCONTROL__PERFORM,  line 226 of ./include/control.inc
  0x080EAB97  DOCONTROLMSG,  line 890 of controls.pp
 
[TgtkObject.Destroy] WARNING: There are 144 unreleased DCs and 527 
unreleased GDIObjects                                                     
 



cu Jens