Jump to content


Photo

Forms TDI - Tabs


  • Please log in to reply
12 replies to this topic

#1 NelsonFS

NelsonFS

    Active Member

  • uniGUI Subscriber
  • PipPipPip
  • 87 posts

Posted 12 June 2014 - 11:02 AM

This simple example show how to create a application that use a TUniPageControl to show forms inside TabSheet.

Based on examples, MegaDemo and Marlon code.

Thank you.

 

Version UniGui: 0.95.0.1046

Delphi: XE5

Attached Files


  • 5

#2 fikret

fikret

    Member

  • uniGUI Subscriber
  • PipPip
  • 39 posts

Posted 12 June 2014 - 11:09 AM

Which sample? :-)

You've forgotten to upload it


  • 0

#3 Nirlan

Nirlan

    Active Member

  • uniGUI Subscriber
  • PipPipPip
  • 94 posts
  • LocationBrasil - São Mateus/ES

Posted 12 June 2014 - 11:32 AM

+1


  • 0

#4 Nirlan

Nirlan

    Active Member

  • uniGUI Subscriber
  • PipPipPip
  • 94 posts
  • LocationBrasil - São Mateus/ES

Posted 13 June 2014 - 05:00 PM

very good !!!


  • 0

#5 Taha

Taha

    Member

  • Members
  • PipPip
  • 15 posts

Posted 14 June 2014 - 08:19 PM

+1


  • 0

#6 NelsonFS

NelsonFS

    Active Member

  • uniGUI Subscriber
  • PipPipPip
  • 87 posts

Posted 15 June 2014 - 01:38 PM

+1

Link is on!


  • 0

#7 uniguibbs

uniguibbs

    Advanced Member

  • Members
  • PipPipPipPip
  • 136 posts

Posted 16 June 2014 - 12:52 AM

good +1.
 
but, why create new panel ?
 
 
  //if not found, then create it...
  TabSheetNew              := TUniTabSheet.Create(NavPage);
  TabSheetNew.PageControl  := NavPage;
  TabSheetNew.Caption      := Titulo;
  TabSheetNew.Name         := Name;
  TabSheetNew.Closable     := True;
  TabSheetNew.OnClose      := CheckTab;
 
//  PanelTabSheetNew := TUniPanel.Create(TabSheetNew);
//  PanelTabSheetNew.Align := alClient;
//  PanelTabSheetNew.Parent := TabSheetNew;
 
//  FCurrentFrameTab := TUniFrameClass(FindClass(Name)).Create(Self);
//  FCurrentFrameTab.Parent := PanelTabSheetNew;
//  FCurrentFrameTab.Align := alClient;
 
  FCurrentFrameTab := TUniFrameClass(FindClass(Name)).Create(Self);
  FCurrentFrameTab.Parent := TabSheetNew;
  FCurrentFrameTab.Align := alClient;

 


  • 0

#8 NelsonFS

NelsonFS

    Active Member

  • uniGUI Subscriber
  • PipPipPip
  • 87 posts

Posted 02 July 2014 - 01:24 PM

This panel is usefull case you need add a accordion panel left side, or reorganize frame and form, example, hide/show all frame. You wont need to put all frame components in other place.. was just thinking in future.. just this.


  • 0

#9 uniguibbs

uniguibbs

    Advanced Member

  • Members
  • PipPipPipPip
  • 136 posts

Posted 16 July 2014 - 01:39 AM

+1


  • 0

#10 wilton_educasoft

wilton_educasoft

    Member

  • uniGUI Subscriber
  • PipPip
  • 26 posts

Posted 26 May 2015 - 02:34 AM

I tried to use his example, but did not work when using a legacy tuniframe
 
-> TfrmBase = class (TUniFrame)
 
TfrmEscola = class (TfrmBase) - here and an inherited form of TFrmBase
 
 
InsertFrameTab ('TfrmEscola', 'school');
 
the access violation error that line
   FCurrentFrameTab: = TUniFrameClass (FindClass (Name)) Create (Self);.
 
 
 
initialization
   RegisterClasses ([
                    TfrmBase,
                    TfrmEscola
                   ]);
   RegisterAppFormClass (TFrmPrincipal);
 
-------------------------------------------------------------------------------------
 
in forms of TUniFrame type usually works

 


  • 0

#11 devya

devya

    Member

  • Members
  • PipPip
  • 11 posts

Posted 23 February 2017 - 07:53 AM

Great...

 

Thanks


  • 0

Regards,

 

Devy


#12 leons

leons

    Member

  • uniGUI Subscriber
  • PipPip
  • 12 posts

Posted 24 February 2017 - 11:49 AM

Great! I had a problem with this, earlier this week. Thanks to you I have solved it.


  • 0

#13 otagomes

otagomes

    Newbie

  • Members
  • Pip
  • 9 posts
  • LocationBrazil

Posted 10 November 2017 - 02:46 PM

+1


  • 0




0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users