formato de pantalla

[gallet]

como consigo en delphi programar una sentencia para k la consola de programa me la abra a tamaño full screen y k no se pueda salir excepto k uses la funcion exit, lo que quiero es correr el ms2 y k se ejecute en toda la pantalla y me tape vista, gracias

[[coso]]

Hola, puedes crear un form, maximizarlo, y poner su borderstyle a bsNone. Ahora bien, para lo que quieres hacer (correr ms-dos) no se yo si es lo mas conveniente.

[gallet]

en realidad no kiero correr ms2 lo k kiero es k la console aplication o el form sea en full screen hay alguna sentencia para que la consola salga en full screen? o sino alguna opcion que al compilar el .exe haga que este sea a full screen sin tener k maximizarlo? ademas si maximizo vista solo lo ace con la mitad de la pantalla

[[enecumene]]

Pones en la propiedad BorderStyle en None, WindowState en Maximized, FormStyle en fsStayOnTop, y pones el siguiente código en el evento OnCreate:

Código Delphi [-]
Form1.Width := Screen.Width;
Form1.Height := Screen.Height;

Y ya tienes tu aplicación en fullScreen, no sé si eso es lo que buscas.

Saludos.

[[coso]]

quieres ejecutar un ... batch file?

[[cHackAll]]

Código Delphi [-]
program MuchOjO;
 
uses Windows;
 
function SetConsoleDisplayMode(hConsoleOutput, dwFlags: Cardinal; lpNewScreenBufferDimensions: PCOORD): LongBool; stdcall external 'kernel32';
function GetConsoleWindow: Cardinal; stdcall external 'kernel32';
 
var hOutput: Cardinal;
begin
 AllocConsole;
 SetForegroundWindow(GetConsoleWindow);
 hOutput := GetStdHandle(STD_OUTPUT_HANDLE);
 SetConsoleDisplayMode(hOutput, 1{CONSOLE_FULLSCREEN_MODE}, nil);
 
 WriteLn('Sper0 k no c-a pa mal !');
 ReadLn;
end.