Re: CMD window properties

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance

From: Clay Calvert (ccalvert_at_Wanguru.com)
Date: 08/05/04


Date: Wed, 04 Aug 2004 21:11:24 -0400

On Wed, 4 Aug 2004 15:13:48 +0200, "Matthias Tacke"
<Matthias.Tacke@web.de> wrote:

Thank you very much.

>::ConsoleSizes.cmd::::::::::::::::::::::::::::::::::::::::::::::::::::
>@echo off
>setlocal
>echo Window_X*Y_^|_Buffer_X*Y_^|_App-key_____________________________
>for /F "tokens=1-2,*" %%A in (
>'reg query hkcu\console /s^|findstr "\ ScreenBufferS WindowS"') do (
>if "%%B" NEQ "REG_DWORD" (set "HKCUCon=%%A %%B %%C"&set "SBS="&SET "WS=")
>if "%%A" EQU "ScreenBufferSize" set "SBS=%%C"
>if "%%A" EQU "WindowSize" set "WS=%%C" & call :display)
>goto :eof
>:display
>set /A "WSW=WS&0xffff, WSH=WS>>16"
>set "WSW= %WSW%"&set "WSH=%WSH% "
>set /A "SBW=SBS&0xffff, SBH=SBS>>16"
>set "SBW= %SBW%"&set "SBH=%SBH% "
>set "HKCUCon=%HKCUCon:HKEY_CURRENT_USER=HKCU%"
>echo/%WSW:~-5%*%WSH:~,5%^|%SBW:~-5%*%SBH:~,5% ^| %HKCUCon%
>::ConsoleSizes.cmd::::::::::::::::::::::::::::::::::::::::::::::::::::

Clay Calvert
CCalvert@Wanguru.com
Replace "W" with "L"