anchor.diff:    
     cal := TfpgComboBox.Create(self);
     cal.SetPosition(10, 10, 120, 23);
  +  
  +  edtTest := CreateEdit(self, 10, 60, 100, 23);
   end;
   
   
  
positive.code:   
    cal := TfpgComboBox.Create(self);
    cal.SetPosition(10, 10, 120, 23);
  end;
  
  
  
negative.code:     frm := TForm2.Create(nil);
      frm.ShowModal;
      writeln('Form2: This should only appear after the form closes.');
      edtTest.SetFocus;
    finally
      frm.Free;
    end;
  