Rocksolid Light - comp.lang.tcl - Problem with changing the tab position in a ttk::notebook.

Problem with changing the tab position in a ttk::notebook.

<9e4e43fa-adc0-400a-a089-1ffd2b7e9271n@googlegroups.com>

https://news.novabbs.org/devel/article-flat.php?id=12615&group=comp.lang.tcl#12615

X-Received: by 2002:a05:620a:8596:b0:76f:513:7a8c with SMTP id pf22-20020a05620a859600b0076f05137a8cmr19340qkn.2.1697699158118;
Thu, 19 Oct 2023 00:05:58 -0700 (PDT)
X-Received: by 2002:a05:6808:9ac:b0:3ae:5aab:a6f3 with SMTP id
e12-20020a05680809ac00b003ae5aaba6f3mr447829oig.5.1697699157877; Thu, 19 Oct
2023 00:05:57 -0700 (PDT)
Path: i2pn2.org!i2pn.org!weretis.net!feeder8.news.weretis.net!proxad.net!feeder1-2.proxad.net!209.85.160.216.MISMATCH!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.tcl
Date: Thu, 19 Oct 2023 00:05:57 -0700 (PDT)
Injection-Info: google-groups.googlegroups.com; posting-host=8.39.134.218; posting-account=FxE2oAoAAACLDChqNDEvoUKW4RME9Sjc
NNTP-Posting-Host: 8.39.134.218
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <9e4e43fa-adc0-400a-a089-1ffd2b7e9271n@googlegroups.com>
Subject: Problem with changing the tab position in a ttk::notebook.
From: don.rozenberg@gmail.com (Donald Rozenberg)
Injection-Date: Thu, 19 Oct 2023 07:05:58 +0000
Content-Type: text/plain; charset="UTF-8"

by: Donald Rozenberg - Thu, 19 Oct 2023 07:05 UTC

Hi,
I am working on a GUI generator based on the tk and ttk widget sets and am having a problem with moving the tab position to the bottom edge of a ttk::notebook. It doesn't show the tabs but leaves room for them.

Consider the code:

ttk::notebook .nb -width 200 -height 100
ttk::frame .nb.f1; # first page
ttk::frame .nb.f2; # second page
..nb add .nb.f1 -text "One"
..nb add .nb.f2 -text "Two"
pack .nb
button .tn -text "Tabs to North" -command \
"ttk::style configure TNotebook -tabposition n"
pack .tn
button .ts -text "Tabs to South" -command \
"ttk::style configure TNotebook -tabposition s"
pack .ts
button .td -text "Default position" -command \
"ttk::style configure TNotebook -tabposition \"\""
pack .td

When you execute the code you see a ttk::notebook with two tabs in the default position. If you select the "Tabs to North" button the expected behavior
occurs.

If you select "Tabs to South" space is created for tabs at the bottom edge but the tabs do not appear.

If you select the Default position button the tabs go to nw as hoped for.

What am I doing wrong?

Re: Problem with changing the tab position in a ttk::notebook.

<30280751-d85f-4421-8746-a4b364be8997n@googlegroups.com>

copy mid

https://news.novabbs.org/devel/article-flat.php?id=12617&group=comp.lang.tcl#12617

copy link Newsgroups: comp.lang.tcl

X-Received: by 2002:ac8:738a:0:b0:41b:7738:2a20 with SMTP id t10-20020ac8738a000000b0041b77382a20mr34439qtp.9.1697715674572;
Thu, 19 Oct 2023 04:41:14 -0700 (PDT)
X-Received: by 2002:a05:6830:104f:b0:6b2:a87b:e441 with SMTP id
b15-20020a056830104f00b006b2a87be441mr615534otp.3.1697715674367; Thu, 19 Oct
2023 04:41:14 -0700 (PDT)
Path: i2pn2.org!i2pn.org!usenet.blueworldhosting.com!diablo1.usenet.blueworldhosting.com!peer02.iad!feed-me.highwinds-media.com!news.highwinds-media.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.tcl
Date: Thu, 19 Oct 2023 04:41:13 -0700 (PDT)
In-Reply-To: <9e4e43fa-adc0-400a-a089-1ffd2b7e9271n@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=109.197.204.235; posting-account=VcikiQoAAAB8qn43rZQzxdhWq0g1FGMy
NNTP-Posting-Host: 109.197.204.235
References: <9e4e43fa-adc0-400a-a089-1ffd2b7e9271n@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <30280751-d85f-4421-8746-a4b364be8997n@googlegroups.com>
Subject: Re: Problem with changing the tab position in a ttk::notebook.
From: aplsimple@gmail.com (Alex P)
Injection-Date: Thu, 19 Oct 2023 11:41:14 +0000
Content-Type: text/plain; charset="UTF-8"
X-Received-Bytes: 1839

by: Alex P - Thu, 19 Oct 2023 11:41 UTC

package require Tk
proc ::TabOrientation {{pos ""}} {
lassign [split [wm geometry .] x+] w h x y
ttk::style configure TNotebook -tabposition $pos
incr w 1
wm geometry . ${w}x${h}+${x}+${y}
update
incr w -1
wm geometry . ${w}x${h}+${x}+${y}
update
} ttk::notebook .nb -width 200 -height 100
ttk::frame .nb.f1; # first page
ttk::frame .nb.f2; # second page
..nb add .nb.f1 -text "One"
..nb add .nb.f2 -text "Two"
pack .nb -fill both -expand 1
button .tn -text "Tabs to North" -command {::TabOrientation n}
pack .tn
button .ts -text "Tabs to South" -command {::TabOrientation s}
pack .ts
button .td -text "Default position" -command ::TabOrientation
pack .td

Re: Problem with changing the tab position in a ttk::notebook.

<b4db909b-39cb-4d75-bc09-f997a3fd9b5dn@googlegroups.com>

copy mid

https://news.novabbs.org/devel/article-flat.php?id=12618&group=comp.lang.tcl#12618

copy link Newsgroups: comp.lang.tcl

X-Received: by 2002:a05:620a:8596:b0:76f:513:7a8c with SMTP id pf22-20020a05620a859600b0076f05137a8cmr28399qkn.2.1697716153780;
Thu, 19 Oct 2023 04:49:13 -0700 (PDT)
X-Received: by 2002:a05:6870:ac10:b0:1e9:af97:9fa3 with SMTP id
kw16-20020a056870ac1000b001e9af979fa3mr1005923oab.5.1697716153584; Thu, 19
Oct 2023 04:49:13 -0700 (PDT)
Path: i2pn2.org!i2pn.org!weretis.net!feeder8.news.weretis.net!feeder1.feed.usenet.farm!feed.usenet.farm!peer01.ams4!peer.am4.highwinds-media.com!peer02.iad!feed-me.highwinds-media.com!news.highwinds-media.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.tcl
Date: Thu, 19 Oct 2023 04:49:13 -0700 (PDT)
In-Reply-To: <30280751-d85f-4421-8746-a4b364be8997n@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=109.197.204.235; posting-account=VcikiQoAAAB8qn43rZQzxdhWq0g1FGMy
NNTP-Posting-Host: 109.197.204.235
References: <9e4e43fa-adc0-400a-a089-1ffd2b7e9271n@googlegroups.com> <30280751-d85f-4421-8746-a4b364be8997n@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <b4db909b-39cb-4d75-bc09-f997a3fd9b5dn@googlegroups.com>
Subject: Re: Problem with changing the tab position in a ttk::notebook.
From: aplsimple@gmail.com (Alex P)
Injection-Date: Thu, 19 Oct 2023 11:49:13 +0000
Content-Type: text/plain; charset="UTF-8"
X-Received-Bytes: 1361

by: Alex P - Thu, 19 Oct 2023 11:49 UTC

Re: Problem with changing the tab position in a ttk::notebook.

<65344889$0$7538$426a34cc@news.free.fr>

copy mid

https://news.novabbs.org/devel/article-flat.php?id=12642&group=comp.lang.tcl#12642

copy link Newsgroups: comp.lang.tcl

Path: i2pn2.org!i2pn.org!news.nntp4.net!news.gegeweb.eu!gegeweb.org!usenet-fr.net!proxad.net!feeder1-2.proxad.net!cleanfeed1-b.proxad.net!nnrp6-1.free.fr!not-for-mail
Date: Sat, 21 Oct 2023 23:54:16 +0200
MIME-Version: 1.0
User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:102.0) Gecko/20100101
Thunderbird/102.15.1
Subject: Re: Problem with changing the tab position in a ttk::notebook.
To: Donald Rozenberg <don.rozenberg@gmail.com>
Newsgroups: comp.lang.tcl
References: <9e4e43fa-adc0-400a-a089-1ffd2b7e9271n@googlegroups.com>
Content-Language: en-US
From: francois.vogel.fv.NOSPAM@gmail.com (Francois Vogel)
In-Reply-To: <9e4e43fa-adc0-400a-a089-1ffd2b7e9271n@googlegroups.com>
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
X-Antivirus: Avast (VPS 231019-6, 19/10/2023), Outbound message
X-Antivirus-Status: Clean
Lines: 14
Message-ID: <65344889$0$7538$426a34cc@news.free.fr>
Organization: Guest of ProXad - France
NNTP-Posting-Date: 21 Oct 2023 23:54:17 CEST
NNTP-Posting-Host: 82.65.57.56
X-Trace: 1697925257 news-4.free.fr 7538 82.65.57.56:51279
X-Complaints-To: abuse@proxad.net

by: Francois Vogel - Sat, 21 Oct 2023 21:54 UTC

Le 19/10/2023 à 09:05, Donald Rozenberg a écrit :
> I am having a problem with moving the tab position to the bottom edge of a ttk::notebook. It doesn't show the tabs but leaves room for them.

Thanks for the report and the ticket you have filed.

Follow-up to:

https://core.tcl-lang.org/tk/tktview/198376af5a

I have crafted a fix for this bug.

Regards,
Francois

Re: Problem with changing the tab position in a ttk::notebook.

<uh2kes$2afvh$1@dont-email.me>

copy mid

https://news.novabbs.org/devel/article-flat.php?id=12646&group=comp.lang.tcl#12646

copy link Newsgroups: comp.lang.tcl

Path: i2pn2.org!i2pn.org!eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: wortkarg3@yahoo.com (Harald Oehlmann)
Newsgroups: comp.lang.tcl
Subject: Re: Problem with changing the tab position in a ttk::notebook.
Date: Sun, 22 Oct 2023 09:54:05 +0200
Organization: A noiseless patient Spider
Lines: 24
Message-ID: <uh2kes$2afvh$1@dont-email.me>
References: <9e4e43fa-adc0-400a-a089-1ffd2b7e9271n@googlegroups.com>
<65344889$0$7538$426a34cc@news.free.fr>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
Injection-Date: Sun, 22 Oct 2023 07:54:04 -0000 (UTC)
Injection-Info: dont-email.me; posting-host="789808b47a8ae0e001a0ba1d8f3c7bf5";
logging-data="2441201"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX1+t+DkE5WHq2xRTbjB99sXq"
User-Agent: Mozilla Thunderbird
Cancel-Lock: sha1:ZQLPtfkfvxM+UXYjp5EMCADbOMg=
Content-Language: en-GB
In-Reply-To: <65344889$0$7538$426a34cc@news.free.fr>

by: Harald Oehlmann - Sun, 22 Oct 2023 07:54 UTC

Am 21.10.2023 um 23:54 schrieb Francois Vogel:
> Le 19/10/2023 à 09:05, Donald Rozenberg a écrit :
>> I am having a problem with moving the tab position to the bottom edge
>> of a ttk::notebook. It doesn't show the tabs but leaves room for them.
>
> Thanks for the report and the ticket you have filed.
>
> Follow-up to:
>
> https://core.tcl-lang.org/tk/tktview/198376af5a
>
> I have crafted a fix for this bug.
>
> Regards,
> Francois
>

Great action, Francois, I appreciate !

Perhaps, Csaba, the visual magican, may comment on the question about
visual defects when the labels are left/right.

Take care,
Harald

"The voters have spoken, the bastards..." -- unknown

devel / comp.lang.tcl / Problem with changing the tab position in a ttk::notebook.

Subject	Author
Problem with changing the tab position in a ttk::notebook.	Donald Rozenberg
Problem with changing the tab position in a ttk::notebook.	Alex P
Problem with changing the tab position in a ttk::notebook.	Alex P
Problem with changing the tab position in a ttk::notebook.	Francois Vogel
Problem with changing the tab position in a ttk::notebook.	Harald Oehlmann