Avatar billede nop Nybegynder
23. november 2009 - 16:21 Der er 3 kommentarer og
1 løsning

Tpagecontrol i scrollbox - minHeight/widt

Hej,
Jeg har en form med en scrollbox.
I scrollbox'en er der en TpageControl med 2 tabs.
Scrollbox er anchoret til formen alle fire veje.
Tpagecontrol er align=alClient, og har minHeight = 200

Når formen resizes så resize alt som det skal.
Når formen bliver lille så forbliver Tpagecontrol på 200 som den skal, men scrollboxen får ikke scrollbars på.

Hvordan sætter man ovenståen rigtigt op, så scrollbox får scrollbars når Tpagecontrolen når minimum size?
Avatar billede nop Nybegynder
23. november 2009 - 16:24 #1
Man kan også få samme resultat med en Tedit i scrollboxen.
Når editboxen når sit minimum, så stikker den uden for scrollboxen, uden at scrollbars enables.
Avatar billede kroning Nybegynder
23. november 2009 - 17:02 #2
Hvis du styre højden på din TpageControl manuelt i scrollbox'ens OnResize så virker det.

procedure TForm1.ScrollBox1Resize(Sender: TObject);
begin
    PageControl1.Width:=ScrollBox1.ClientWidth;

    if ScrollBox1.ClientHeight>200 then
        PageControl1.Height:=ScrollBox1.ClientHeight;
end;
Avatar billede nop Nybegynder
23. november 2009 - 22:16 #3
Smid et svar kroning
Avatar billede kroning Nybegynder
23. november 2009 - 23:17 #4
ok
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester