Question CT LAB ver 7.40

Thanks
we will test and report

skrzat wrote:

There is bug with "Tab order" window.
New project > put one or more components > open "Tab Order" - there are all components from the form> close "Tab order" > add or remove components from the form > open "Tab order" - there are components from first opening this window.
After saving project, closing CT, opening project there are all components from the form in "Tab order" window.
It seems the windows "Tab order" isn't refreshed after first opening it.
Windows 10 64bit, newest CT 7.4 32bit or 64bit
 

Sir, we test this with LAB CT, but no problem found

Thanks
we will try to fix these problems.
It's a LAB version 

PS: Please your Linux Distribution ?

A quick fix

codetyphon\typhon\designer\taborderdlg.pas


  private
    FUpdating: Boolean;
    procedure SwapNodes(ANode1, ANode2, NewSelected: TTreeNode);
    procedure CheckButtonsEnabled;
    procedure CreateCandidates(OwnerComponent: TComponent; Candidates: TAvlTree);
    procedure CreateNodes(ParentControl: TWinControl; ParentNode: TTreeNode;
      Candidates: TAvlTree);
    procedure RefreshTree;
    procedure PersistentAdded({%H-}APersistent: TPersistent; {%H-}Select: boolean);
    procedure PersistentDeleting({%H-}APersistent: TPersistent);
    procedure DeletePersistent(var {%H-}APersistent: TPersistent);
    procedure SetSelection(const ASelection: TPersistentSelectionList);
  public       
    // Moved from private to used in ct_main.TMainIDE.DoViewTabOrderEditor
    procedure SomethingChanged; //<<< === ct9999 ============
  end;                              


codetyphon\typhon\ide\ct_main.pp

procedure TMainIDE.DoViewTabOrderEditor(State: TIWGetFormState);
begin
  if TabOrderDialog=nil then
    IDEWindowCreators.CreateForm(TabOrderDialog,TTabOrderDialog,
       State=iwgfDisabled,TyphonIDE.OwningComponent)
  else if State=iwgfDisabled then
    TabOrderDialog.DisableAlign;
  if State>=iwgfShow then
    IDEWindowCreators.ShowForm(TabOrderDialog,State=iwgfShowOnTop);

  TabOrderDialog.SomethingChanged; //<<<< === ct9999 ============
end; 

This is an other problem

Go to 
codetyphon\typhon\ide\customformeditor.pp
Line 649
Replace linewith
PersistentDeleting(AComponent) called to early (line 604) in this case...

Thanks Sir
Have Fun

Get ready for
CodeTyphon Studio and WebAssembly

We now prepare next CT LAB release
ETA: I think at the end of the day.

It's the first Pascal and WASM "Experimental" (for now) approach.

Thanks to FreePascal Team.

We release LAB CodeTyphon Studio Version 7.40 Revision 007350

Focus Items:
-Embedded Form Designer functionality.
-Embedded Form Designer with Multi-Source Editors (disabled on Cocoa)
-Embedded Form Designer with Multi-level Inherited Forms/Frames/DataModules
-New FreePascal WASM target

Thanks Sir