• Registered: 2016-07-28
  • Posts: 1,057

Topic: Splitter bar

Hi Guys,


Is it possible to have vertical and horizontal splitter bars in MVD? If so, how?

Adam
God... please help me become the person my dog thinks I am.
  • Registered: 2015-02-24
  • Posts: 446

Re: Splitter bar

Hello Adam,


A little tricky to implement, and probably a pain in the *** to use with other visual components on the form, but... here you go smile


Have a good week-end


Cheers



Mathias

Post's attachments

Attachment icon splitter3.zip 332.83 kb, 492 downloads since 2016-11-06 

I'm a very good housekeeper !
Each time I get a divorce, I keep the house
Zaza Gabor
  • Registered: 2016-07-28
  • Posts: 1,057

Re: Splitter bar

Hi Mathias,


Thanks for the example.....


I can see tricky aspects when there is other components on those panels and if it's a sizable window it may cause further headaches perhaps. Instead of creating panels with script can we use MVD panels and code splitter?


Please see the attached sample project.

Post's attachments

Attachment icon Splitter Bar.zip 4.65 kb, 471 downloads since 2016-11-06 

Adam
God... please help me become the person my dog thinks I am.
  • Registered: 2014-02-17
  • Posts: 375

Re: Splitter bar

Easy Example :
http://wiki.freepascal.org/TSplitter

https://s17.postimg.org/60nlaccbz/Image_005.png

https://s17.postimg.org/pii8qagzj/Image_006.png

procedure Form1_OnShow (Sender: TObject; Action: string);
var
splitter1,splitter2 : Tsplitter;
begin
Form1.Panel2.Align:= alLeft ;
Form1.Panel3.Align:= alClient ;
Splitter1:=TSplitter.Create(Form1);
with Splitter1 do begin
Splitter1.Name:='Splitter1';
Splitter1.Parent:= form1.Panel1;
Splitter1.Left:=100;
Splitter1.Align:=alLeft;
end;
Form1.Panel4.Align:= alTop ;
Form1.Panel5.Align:= alClient ;
Splitter2:=TSplitter.Create(Form1);
with Splitter2 do begin
Splitter2.Name:='Splitter2';
Splitter2.Parent:= form1.Panel3;
//Splitter1.Left:=100;
Splitter2.Align:=alTop;
end;
end;
begin
end.
Post's attachments

Attachment icon LessonTTSplitter.zip 3.21 kb, 379 downloads since 2018-03-24 

My Visual Database : I Love You
Easy For Beginner Student For Me
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Splitter bar

Thank you for the example.

Dmitry.