[Neon]

CODE

procedure TForm1.Button2Click(Sender: TObject);
begin
with TsTabSheet.Create(self) do begin
Caption:='Page '+inttostr(sPageControl1.PageCount);
PageControl:=sPageControl1;
Visible:=True;
end;
sPageControl1.ActivePageIndex:=sPageControl1.PageCount-1;
end;

And this works too, just make it visible after setting its PageControl.

[Neon]

Well that's strange… I'm using dynamically created sTabSheets quite often, but couldn't reproduce the problem you described.
The one difference in my code from listed above is:

CODE

ts:=TsTabSheet.Create(Pager);
ts.Parent:=Pager;
ts.ImageIndex:=0;
ts.PageControl:=Pager;

This way it works well.

[Neon]

Hmmm… try to increase button's height <img src="style_emoticons//rolleyes.gif” style=”vertical-align:middle” emoid=”:roll:” border=”0″ alt=”rolleyes.gif” />
I tried the effect with PNG glyph, and all worked perfectly.

[Neon]

You should describe your problem more clearly, if you want the community to help you. With error message and/or screenshot.

[Neon]

It controls the reflection of the button's glyph.

[Neon]

Имя шкуры и пишите. С чтением и подгрузкой его при запуске приложения. А уж как и куда писать – дело исключительно хозяйское.

[Neon]

Она же stable. А Саппорт обещал в следующей бете добавить <img src="style_emoticons//wink.gif” style=”vertical-align:middle” emoid=”;)” border=”0″ alt=”wink.gif” />

[Neon]

а PageControl->Invalidate() тоже не канает?

[Neon]

Я использую функцию CutText, чтобы текст заголовка не заезжал на кнопки. А первоначальное значение пишу в Hint.

[Neon]

Then put a TsFormProvider to the form and set it to TsSkinManager you need. I hadn't this problem you described, all worked well…

[Neon]

You should use two different TsSkinManager components and set one to Golden skin and another to Capuccino.

[Author]

Posts