Axis Modifications

nawaf
Offline
New Member

1 year 9 months ago - 1 year 9 months ago #318923 by nawaf

Replied by nawaf on topic Axis Modifications

Thank you, Phill, that was very helpful.How can I make the file list display with larger sizes? I want to increase the size of the text and icons.

Code:

if {[info proc tkgof] == ""} {rename tk_getOpenFile tkgof}
proc tk_getOpenFile {args} {
    # location and size on screen:
    variable xoff    50
    variable yoff    10
    variable width    900
    variable height    500
    variable padx    10
    variable pady    20

    after 0 {
        wm geometry .__tk_filedialog ${width}x${height}+${xoff}+${yoff};
        .__tk_filedialog.contents.f1.lab configure -padding [list $padx $pady $padx $pady];
        .__tk_filedialog.contents.f1.menu configure -direction below;
        .__tk_filedialog.contents.f1.menu.menu configure -font {Sans 20};
        .__tk_filedialog.contents.f1.up configure -padding [list $pady $pady $pady $pady];
        .__tk_filedialog.contents.f2.lab configure -padding [list $padx $pady $padx $pady];
        .__tk_filedialog.contents.f2.ent configure -font {Sans 18};
        .__tk_filedialog.contents.f2.lab2 configure -padding [list $padx $pady $padx $pady];
        .__tk_filedialog.contents.f2.menu configure -padding [list 5 10 5 10];
        .__tk_filedialog.contents.f2.ok configure -padding [list $padx $pady $padx $pady];
        .__tk_filedialog.contents.f2.cancel configure -padding [list $padx $pady $padx $pady];
        .__tk_filedialog.contents.f2.hidden configure -padding [list 10 10 10 10]
    }
    
    return [eval tkgof $args]
    
}

Attachments:

Last edit: 1 year 9 months ago by nawaf.

Please Log in or Create an account to join the conversation.

cakeslob
Offline
Platinum Member

1 year 9 months ago - 1 year 9 months ago #318994 by cakeslob

Replied by cakeslob on topic Axis Modifications

holy shit I am not sure why they made this so hard. they are using a different font class
for changing the font size in the file menu -

Code:

rC('font','configure','TkIconFont','-family', fontName, '-size', fontSize)
rC('font','configure','TkTextFont','-family', fontName, '-size', fontSize)

for posteriority heres how I got there. fbox takes the files and makes them into an Iconlist, which then uses the font family TkIconFont to configure this megawidget "Iconlist"

I thought it was odd that some of the widgets configured to our textsize and font but some did not. Its the same case for the entry widget that loads the file name. The colours dont change for most widgets unless you change the colour after you open, and even then only some widgets configure. The options in the listbox configure colour but none of the other text changes colour.

nawaf are you using regularmac800? that will make this easier. you can just add those 2 lines, or get the update from the github.

unfortunately this doesnt make it a better file browser. there are some alternative ones i want to try out when i figure out how

Last edit: 1 year 9 months ago by cakeslob.

The following user(s) said Thank You: nawaf

Please Log in or Create an account to join the conversation.

phillc54
Offline
Platinum Member

1 year 9 months ago #318998 by phillc54

Replied by phillc54 on topic Axis Modifications

holy shit I am not sure why they made this so hard

Yeah, these are mostly themed widgets so some options require setting via styles. It can be a PITA.

I want to increase the size of the text and icons

It seems to need an update for the first run, the below bigfileopen.tcl touches every widget in the dialog and includes the update.

Warning: Spoiler!

Code:

if {[info proc tkgof] == ""} {rename tk_getOpenFile tkgof}
proc tk_getOpenFile {args} {

    # location and size on screen:
    variable xoff   50
    variable yoff   10
    variable width  900
    variable height 500
    variable padx   0
    variable pady   20
    variable font   {Sans 18}

    variable f1 .__tk_filedialog.contents.f1
    variable f2 .__tk_filedialog.contents.f2
    variable padding [list $padx $pady $padx $pady]

    after 0 {wm geometry .__tk_filedialog ${width}x${height}+${xoff}+${yoff}; # set window size

             #set some styles
             ttk::style configure My.TButton {*}[ttk::style configure TButton] -font $font -padding $padding; # button
             ttk::style configure My.TCheckbutton {*}[ttk::style configure TCheckbutton] -font $font -padding $padding; # menu button
             ttk::style configure My.TMenubutton {*}[ttk::style configure TMenubutton] -font $font -padding $padding; # check button
             ttk::style configure My.Horizontal.TScrollbar {*}[ttk::style configure Horizontal.TScrollbar] -arrowsize 32; # scrollbar

             #top panel
             $f1.lab configure -font $font; # -padding $padding; # directory label
             $f1.menu configure -style My.TMenubutton; # directory button
             $f1.menu.menu configure -font $font; # directory drop down
             $f1.up configure -padding [list $pady $pady]; # up arrow

             # middle panel
             .__tk_filedialog.contents.icons configure -font $font; # directory list
             ::tk::dialog::file::Update .__tk_filedialog; # update required or first view uses original font
             .__tk_filedialog.contents.icons.cHull.sbar configure -style My.Horizontal.TScrollbar; # scrollbar

             # bottom panel
             $f2.lab configure -font $font; # filename label
             $f2.ent configure -font $font; # filename entry
             $f2.lab2 configure -font $font; # filetype label
             $f2.menu configure -style My.TMenubutton; # filetype button
             $f2.menu.m configure -font $font; # filetype drop down
             $f2.ok configure -style My.TButton; # open/save button
             $f2.cancel configure -style My.TButton; # cancel button
             $f2.hidden configure -style My.TCheckbutton; # hidden file check button
    }
    return [eval tkgof $args]
}

The following user(s) said Thank You: nawaf

Please Log in or Create an account to join the conversation.

nawaf
Offline
New Member

1 year 9 months ago #319084 by nawaf

Replied by nawaf on topic Axis Modifications

nawaf are you using regularmac800?

Yeah, thanks, cakeslob, for the GUI mod.
I am using a 10-inch touchscreen with a resolution of 1024x600 and I want to use the Axis GUI with buttons that are large enough, and I saw your mod and tried it. It's great because the buttons are big enough.
But for the open file dialog, the buttons are not big enough for my fingers, making it a bit difficult to touch them on my screen

Please Log in or Create an account to join the conversation.

nawaf
Offline
New Member

1 year 9 months ago - 1 year 9 months ago #319085 by nawaf

Replied by nawaf on topic Axis Modifications

Thank you, Pill, this works great for me

Warning: Spoiler!

Code:

if {[info proc tkgof] == ""} {rename tk_getOpenFile tkgof}
proc tk_getOpenFile {args} {

    # location and size on screen:
    variable xoff   50
    variable yoff   10
    variable width  900
    variable height 500
    variable padx   0
    variable pady   20
    variable font   {Sans 18}

    variable f1 .__tk_filedialog.contents.f1
    variable f2 .__tk_filedialog.contents.f2
    variable padding [list $padx $pady $padx $pady]

    after 0 {wm geometry .__tk_filedialog ${width}x${height}+${xoff}+${yoff}; # set window size

             #set some styles
             ttk::style configure My.TButton {*}[ttk::style configure TButton] -font $font -padding $padding; # button
             ttk::style configure My.TCheckbutton {*}[ttk::style configure TCheckbutton] -font $font -padding $padding; # menu button
             ttk::style configure My.TMenubutton {*}[ttk::style configure TMenubutton] -font $font -padding $padding; # check button
             ttk::style configure My.Horizontal.TScrollbar {*}[ttk::style configure Horizontal.TScrollbar] -arrowsize 32; # scrollbar

             #top panel
             $f1.lab configure -font $font; # -padding $padding; # directory label
             $f1.menu configure -style My.TMenubutton; # directory button
             $f1.menu.menu configure -font $font; # directory drop down
             $f1.up configure -padding [list $pady $pady]; # up arrow

             # middle panel
             .__tk_filedialog.contents.icons configure -font $font; # directory list
             ::tk::dialog::file::Update .__tk_filedialog; # update required or first view uses original font
             .__tk_filedialog.contents.icons.cHull.sbar configure -style My.Horizontal.TScrollbar; # scrollbar

             # bottom panel
             $f2.lab configure -font $font; # filename label
             $f2.ent configure -font $font; # filename entry
             $f2.lab2 configure -font $font; # filetype label
             $f2.menu configure -style My.TMenubutton; # filetype button
             $f2.menu.m configure -font $font; # filetype drop down
             $f2.ok configure -style My.TButton; # open/save button
             $f2.cancel configure -style My.TButton; # cancel button
             $f2.hidden configure -style My.TCheckbutton; # hidden file check button
    }
    return [eval tkgof $args]
}

Last edit: 1 year 9 months ago by nawaf.

Please Log in or Create an account to join the conversation.

freemoore
Offline
Premium Member

1 year 3 months ago - 1 year 3 months ago #331949 by freemoore

Replied by freemoore on topic Axis Modifications

Hi all.

As I write this I'm suddenly uncertain whether it counts as a poor use of AI; in any case, I asked the chatGPT 4o for a mod and the result appears to work. I wanted better file search abilities since lcnc's default behaviour means it takes a lot of clicks and scrolling for me to find the files I want to run - particularly 'last modified' sorting.

Do sudo apt-get install zenity,

Follow BigJohnT's instructions regarding bigfileopen.tcl

Then use the attached as your bigfileopen.tcl (copy it in to your config folder and change the extension)

This calls the zenity app on using file Open within Axis. It should default to the Desktop the first time, then to the last folder used. Hope it's some use.

Andy

File Attachment:

File Name: bigfileopen.txt
File Size:1 KB

Last edit: 1 year 3 months ago by freemoore. Reason: typos

Please Log in or Create an account to join the conversation.

Time to create page: 0.532 seconds