Topic: Close text screen

[alanjt]

Man, it is way to early to be coding, or doing anything for that matter.

Well in that case... 

Oh yeah, well...

[Matt__W]

Man, it is way to early to be coding, or doing anything for that matter.

Well in that case... 

Oh yeah, well...

   

Every time I see Penn & Teller, in my head I hear Teller yelling "ARE WE LIVE?!!!?"   

[alanjt]

Man, it is way to early to be coding, or doing anything for that matter.

Well in that case... 

Oh yeah, well...

   

Every time I see Penn & Teller, in my head I hear Teller yelling "ARE WE LIVE?!!!?"   

I always hear him trying to get H.S. Thompson to pay to have his face on a giant cowboy.

[ribarm]

But original (graphscr) already works fine...

I thought, you would supply (textscrchk) that will return T if textscreen is active and nil if not...
Sorry, for this remark, but I don't really see where I can use (_graphscr) and that it has more sense then just closing textscreen...

M.R.

[alanjt]

But original (graphscr) already works fine...

I thought, you would supply (textscrchk) that will return T if textscreen is active and nil if not...
Sorry, for this remark, but I don't really see where I can use (_graphscr) and that it has more sense then just closing textscreen...

M.R.

Have more than one monitor, move the textscreen to the opposite monitor with the drawing window active, then activate (graphscr) and see what happens.

[ribarm]

Sorry, I use just one monitor (don't have dual monitor system)... But I was wondering if you could code (textscrchk)?
Thanks Alan...

[Matt__W]

Sorry, I use just one monitor (don't have dual monitor system)... But I was wondering if you could code (textscrchk)?
Thanks Alan...

?? o_0

What is textscrchk supposed to be/do?

[ribarm]

When you use (vl-cmdf "textscr") it will activate textscreen and return T always... If you use (command "textscr") it will activate textscreen and return nil always... Simply, there are no sys variables that will show weather textscreen is active or not, there is only "SCREENMODE" variable that is on my system read-only and set to "3" representing that both text and display screen is displayed and configured :

SCREENMODE - sysvar
Indicates the state of the display.

The setting is stored as a bitcode using the sum of the following values:

0   Text screen is displayed
1   Drawing area is displayed
2   Dual-screen display is configured

I need something that will when text screen is displayed return value ex. T and if drawing area is displayed return value ex. nil... Function that I named (textscrchk)...

M.R.

[Lee Mac]

When you use (vl-cmdf "textscr") it will activate textscreen and return T always... If you use (command "textscr") it will activate textscreen and return nil always... Simply, there are no sys variables that will show weather textscreen is active or not, there is only "SCREENMODE" variable that is on my system read-only and set to "3" representing that both text and display screen is displayed and configured :

SCREENMODE - sysvar
Indicates the state of the display.

The setting is stored as a bitcode using the sum of the following values:

0   Text screen is displayed
1   Drawing area is displayed
2   Dual-screen display is configured

I need something that will when text screen is displayed return value ex. T and if drawing area is displayed return value ex. nil... Function that I named (textscrchk)...

M.R.

Not the best approach, but all I could think of:

Code: [Select]

(defun textscrchk ( / wsh res )
    (setq wsh (vlax-create-object "WScript.Shell"))
    (setq res
        (vlax-invoke wsh 'appactivate
            (strcat "AutoCAD Text Window - "
                (if (eq (getenv "ShowFullPathInTitle") "1")
                    (getvar 'DWGPREFIX)
                    ""
                )
                (getvar 'DWGNAME)
            )
        )
    )
    (vlax-release-object wsh)
    (= -1 res)
)

[alanjt]

I thought about that, but it just makes it the active window if it's been opened but not active.

[Lee Mac]

I thought about that, but it just makes it the active window if it's been opened but not active.

I thought that was the request? To see if it was open or not?

[alanjt]

I thought about that, but it just makes it the active window if it's been opened but not active.

I thought that was the request? To see if it was open or not?

Right, but that will also make it active, even if it's not.

Open the text screen, click on your drawing window to activate it, putting the text screen behind the autocad drafting screen (text screen now open, but not active) and then active your check.

[ribarm]

I thought that was the request? To see if it was open or not?

I didn't really wanted to make someone so seriously approach to my request... I don't see its possible purpose, but for me even info is enough for now... Maybe someone can make this code has more useful meaning... Greatly appreciated your interest and thanks to both of you...

Marko R.

[alanjt]

I thought that was the request? To see if it was open or not?

I didn't really wanted to make someone so seriously approach to my request... I don't see its possible purpose, but for me even info is enough for now... Maybe someone can make this code has more useful meaning... Greatly appreciated your interest and thanks to both of you...

Marko R.

It's just fun to hack away at the computer.

[Lee Mac]

I thought that was the request? To see if it was open or not?

I didn't really wanted to make someone so seriously approach to my request... I don't see its possible purpose, but for me even info is enough for now... Maybe someone can make this code has more useful meaning... Greatly appreciated your interest and thanks to both of you...

Marko R.

It's just fun to hack away at the computer.

1+