[delphi] aplikacje konsolowe

0

Jak w delphi w aplikacji konsolowej wywołać tryb pełno ekranowy i zmienić kolor tła na np. niebieski? Za odpowiedzi z góry dziękuję.

0

a co to wg Ciebie jest ten tryb pełnoekranowy?

0

przypuszczam, że to co widzisz, kiedy naciśniesz w aplikacji konsolowej [Alt+Enter]. Ale nie wiem, jak ten włączyć programowo.

0
  procedure SetFullScreen;
  //switch console into full screen mode
  begin
    keybd_event( VK_MENU, MapVirtualKey( VK_MENU, 0 ), 0, 0 );
    keybd_event( VK_RETURN, MapVirtualKey( VK_RETURN, 0 ), 0, 0 );
    keybd_event( VK_RETURN, MapVirtualKey( VK_RETURN, 0 ),KEYEVENTF_KEYUP, 0 );
    keybd_event( VK_MENU, MapVirtualKey( VK_MENU, 0 ), KEYEVENTF_KEYUP, 0);
  end;

hehehe sprytne :D

0

Bezczelne :D Ale działa świetnie, aż sobie to zapamiętam, bo taka banalna metoda by mi do głowy nie przyszła ;D

1 użytkowników online, w tym zalogowanych: 0, gości: 1