Jodman
(Just in Town)
2009-08-06 04:16 PM
Setting Console Window Position and Size

Please excuse this newbie, but is there a way to center the console window and/or modify the size. I can maximize it using the SETCONSOLE ("Maximize") but I wanted to set the window a certain size and center it on the screen.

Any help is greatly appreciated.

Jodman

Mart
(KiX Supporter)
2009-08-06 04:20 PM
Re: Setting Console Window Position and Size

Hi and welcome to the board.

As far as I know it cannot be done with the normal console window.
You might want to take a look at kixforms. It's and add on to kixtart and enables you to use a GUI that you can position wherever you want with the size you want.

click here for the kixforms website

Jodman
(Just in Town)
2009-08-06 04:22 PM
Re: Setting Console Window Position and Size

Thanks for the quick response. I will give that a try.

Richard H.Administrator
(KiX Supporter)
2009-08-07 12:22 PM
Re: Setting Console Window Position and Size

You may change the windowed console width/height with the CMD built-in mode command:
 Code:
Shell "cmd /C MODE CON: lines=40 cols=80"

NTDOCAdministrator
(KiX Master)
2009-08-07 08:24 PM
Re: Setting Console Window Position and Size

I've not played with it in a long time, but if its using the same one as the DOS console then you could modify the Registry to do that.

Something like this, but if it is using its own then it probably will not work but Richards method might.


 Code:
Function SetUpConsole()
  Dim $BK1,$BK2,$W
  $BK1='HKCU\Console'
  $BK2='HKCU\Console\Command Prompt'
  $W=WriteValue($BK1,'ColorTable00',0,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable01',8388608,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable02',32768,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable03',8421376,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable04',128,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable05',8388736,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable06',32896,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable07',12632256,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable08',8421504,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable09',16711680,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable10',65280,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable11',16776960,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable12',255,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable13',16711935,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable14',65535,REG_DWORD)
  $W=WriteValue($BK1,'ColorTable15',16777215,REG_DWORD)
  $W=WriteValue($BK1,'CursorSize',25,REG_DWORD)
  $W=WriteValue($BK1,'FontFamily',0,REG_DWORD)
  $W=WriteValue($BK1,'FontSize',0,REG_DWORD)
  $W=WriteValue($BK1,'FontWeight',0,REG_DWORD)
  $W=WriteValue($BK1,'FullScreen',0,REG_DWORD)
  $W=WriteValue($BK1,'HistoryBufferSize',250,REG_DWORD)
  $W=WriteValue($BK1,'HistoryNoDup',1,REG_DWORD)
  $W=WriteValue($BK1,'InsertMode',1,REG_DWORD)
  $W=WriteValue($BK1,'NumberOfHistoryBuffers',25,REG_DWORD)
  $W=WriteValue($BK1,'PopupColors',245,REG_DWORD)
  $W=WriteValue($BK1,'QuickEdit',1,REG_DWORD)
  $W=WriteValue($BK1,'ScreenBufferSize',163840150,REG_DWORD)
  $W=WriteValue($BK1,'ScreenColors',11,REG_DWORD)
  $W=WriteValue($BK1,'WindowPosition',1310840,REG_DWORD)
  $W=WriteValue($BK1,'WindowSize',2621540,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable00',0,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable01',8388608,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable02',32768,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable03',8421376,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable04',128,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable05',8388736,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable06',32896,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable07',12632256,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable08',8421504,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable09',16711680,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable10',65280,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable11',16776960,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable12',255,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable13',16711935,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable14',65535,REG_DWORD)
  $W=WriteValue($BK2,'ColorTable15',16777215,REG_DWORD)
  $W=WriteValue($BK2,'CursorSize',25,REG_DWORD)
  $W=WriteValue($BK2,'FontFamily',0,REG_DWORD)
  $W=WriteValue($BK2,'FontSize',0,REG_DWORD)
  $W=WriteValue($BK2,'FontWeight',0,REG_DWORD)
  $W=WriteValue($BK2,'FullScreen',0,REG_DWORD)
  $W=WriteValue($BK2,'HistoryBufferSize',250,REG_DWORD)
  $W=WriteValue($BK2,'HistoryNoDup',1,REG_DWORD)
  $W=WriteValue($BK2,'InsertMode',1,REG_DWORD)
  $W=WriteValue($BK2,'NumberOfHistoryBuffers',25,REG_DWORD)
  $W=WriteValue($BK2,'PopupColors',245,REG_DWORD)
  $W=WriteValue($BK2,'QuickEdit',1,REG_DWORD)
  $W=WriteValue($BK2,'ScreenBufferSize',163840150,REG_DWORD)
  $W=WriteValue($BK2,'ScreenColors',11,REG_DWORD)
  $W=WriteValue($BK2,'WindowPosition',1310840,REG_DWORD)
  $W=WriteValue($BK2,'WindowSize',2621540,REG_DWORD)
EndFunction