custom pageControl

[turan]

Асалаумағалейкум!  Можно ли программным методом добавить кнопку TUniButton в панельку с табами?

[Sherzod]

30 minutes ago, =GGG= said:

Асалаумағалейкум!  Можно ли программным методом добавить кнопку TUniButton в панельку с табами?

Здравствуйте,

Попробуем проанализировать.

[turan]

1 minute ago, Sherzod said:

Здравствуйте,

Попробуем проанализировать.

получилось используя css, костылеобразным способом. Хотелось бы более правильно

[Sherzod]

1 minute ago, =GGG= said:

получилось используя css, костылеобразным способом.

Можете поделиться скрином?

[x11]

2 hours ago, =GGG= said:

получилось

 

Ну если не сложно, можно было бы и поделиться примерами

вдруг кому-то пригодится, кто-то сможет улучшить

[Sherzod]

57 minutes ago, x11 said:

вдруг кому-то пригодится

procedure TMainForm.UniFormReady(Sender: TObject);
begin
  with UniPageControl1.JSInterface do
  begin
    JSCode(#1'.tabPanel.tabBar.add({xtype: "tbfill"});');
    JSCall('tabPanel.tabBar.add', [UniButton1.JSControl]); //UniButton1 in HiddenPanel
  end;
end;

 

[turan]

31 minutes ago, Sherzod said:

procedure TMainForm.UniFormReady(Sender: TObject);
begin
  with UniPageControl1.JSInterface do
  begin
    JSCode(#1'.tabPanel.tabBar.add({xtype: "tbfill"});');
    JSCall('tabPanel.tabBar.add', [UniButton1.JSControl]); //UniButton1 in HiddenPanel
  end;
end;

 

Рахмет!

[turan]

31 minutes ago, Sherzod said:

procedure TMainForm.UniFormReady(Sender: TObject);
begin
  with UniPageControl1.JSInterface do
  begin
    JSCode(#1'.tabPanel.tabBar.add({xtype: "tbfill"});');
    JSCall('tabPanel.tabBar.add', [UniButton1.JSControl]); //UniButton1 in HiddenPanel
  end;
end;

 

то что нужно!

[x11]

ну так а к JS-кнопке нужно еще какой-то код прикрутить? Как?

[turan]

6 minutes ago, x11 said:

ну так а к JS-кнопке нужно еще какой-то код прикрутить? Как?

просто обработчик по клику кнопке напишите

[x11]

ааа, т.е. UniButton1 просто кинуть куда-нибудь на форму и всё?

[turan]

Just now, x11 said:

ааа, т.е. UniButton1 просто кинуть куда-нибудь на форму и всё? 

на форму кидаете UniHiddenPanel1, в нее кнопку. Все контролы в ней не видимы

[turan]

JSCall('tabPanel.tabBar.add', [UniButton1.JSControl]); //UniButton1 in HiddenPanel

Шерзод тут подсказал в комменте

[x11]

7 minutes ago, =GGG= said:

на форму кидаете UniHiddenPanel1

 

1 hour ago, =GGG= said:

//UniButton1 in HiddenPanel

 

мдаа... в пятницу уже совсем голова не варит, нужно отдохнуть немножко

спасибо