pq05326.txt DELETING A GROUP BOX LABEL IN THE PROPERTIES SHEET CAUSES A WALKBACK

1. Add a group box to a visual part            
2. Open the properties table on the group box  
3. Swipe and delete the label value            
4. Select OK  - a Walkback occurs

Workaround:
1. In AbtRunViewsApp open the Public Interface Editor on  
   AbtGroupBoxView                                        
2. Select the attribute "label"                           
3. Click the "Edit time properties..." button             
4. Select editPolicySelector and in the Value cell enter  
   labelEditPolicy:propertyData:                          
5. Select Ok, then Update and save the changes.           
                                                          
6.File in the following code...                           

!AbtGroupBoxView privateMethods !                                     
                                                                      
labelEditPolicy: initialValue propertyData: aPartPropertyData         
 "Answer the label edit policy with the specified initial value."     
                                                                      
 ^AbtEwObjectTextEditPolicy new                                       
  value: initialValue;                                                
  valueBlock: [:aString | (aString notNil and: [aString isString])    
   ifTrue: [aString]                                                  
   ifFalse: ['']];                                                    
  yourself                                                            
                                                                      
! !