Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.12.04;
Скачать: CL | DM;

Вниз

Консоль   Найти похожие ветки 

 
otistarda   (2003-10-08 16:13) [0]

Господа, а можно ли спрятать "окно" консольного приложения?


 
FireHack ©   (2003-10-08 17:19) [1]

Наверно это не самый лучший способ, но ...:


var
H:HWND;

begin
AllocConsole;

SetConsoleTitle("MySuperConsoleWindow");
H:=FindWindow("ConsoleWindowClass","MySuperConsoleWindow");
ShowWindow(H, SW_HIDE);
..
FreeConsole;


 
otistarda   (2003-10-09 09:29) [2]

Предложенный вариант не работает, а именно, не выполняется
ShowWindow(H,SW_HIDE);
Сам Handle можно выяснить и проще:
H:= GetStdHandle(STD_INPUT_HANDLE);
H:= GetStdHandle(STD_OUTPUT_HANDLE);
Или я чего-то не понял?


 
Delirium ©   (2003-10-09 10:18) [3]

Гхм, может просто выкинуть директиву {$APPTYPE CONSOLE} ?


 
Виктор Щербаков ©   (2003-10-09 10:27) [4]

otistarda (09.10.03 09:29) [2]
FreeConsole тоже не работает?


 
otistarda   (2003-10-09 11:37) [5]

Дело в том, что в консоли можно создать что угодно (TЧтоУгодно.Create(...)), но как оказалось, для Console принцыпы Win не работают: например, для опеределения Handle работает только -> СМ. ВЫШЕ, а Application.Handle вернет 0. Кроме того, консолью, похоже, не интересуется никого в этом мире, т.к. в инете она (консоль) почти не рассматривается, а кто знает - тот, видимо, молчит.
И, наконец, самое обидное то, что при удалении {$APPTYPE CONSOLE} приложение даже не ругается (хотя, вроде, должно), продолжая вести себя так же.


 
otistarda   (2003-10-09 11:37) [6]

Дело в том, что в консоли можно создать что угодно (TЧтоУгодно.Create(...)), но как оказалось, для Console принципы Win не работают: например, для опеределения Handle работает только -> СМ. ВЫШЕ, а Application.Handle вернет 0. Кроме того, консолью, похоже, не интересуется никого в этом мире, т.к. в инете она (консоль) почти не рассматривается, а кто знает - тот, видимо, молчит.
И, наконец, самое обидное то, что при удалении {$APPTYPE CONSOLE} приложение даже не ругается (хотя, вроде, должно), продолжая вести себя так же.


 
Delirium ©   (2003-10-09 11:47) [7]

"что при удалении {$APPTYPE CONSOLE} приложение даже не ругается (хотя, вроде, должно), продолжая вести себя так же" - так-же это как? Нижеприведённый код не создаёт консоли в принципе.

program Project1;

uses
SysUtils, Dialogs;

begin
ShowMessage("Никаких консолей!");
end.


 
otistarda   (2003-10-09 12:09) [8]

Пардон, не ругается при компиляции, но работает криво.


 
nikkie ©   (2003-10-09 12:20) [9]

криво...
как написал так и работает


 
Nick Denry ©   (2003-10-09 13:06) [10]

Подробнее задчу...


 
otistarda   (2003-10-09 13:36) [11]

Еще раз прошу прощения, я сначала "по запарке" не понял идеи что "Удалить {$APPTYPE CONSOLE}" - это т.е.не создавать вобще ?


 
otistarda   (2003-10-09 13:57) [12]

Специально для nikkie могу предложить 2-3 чата, где можно поглумиться.
<pre>

Но, проблема не решена.
У меня когда-то был не то plugin для Far,
ни то мулька, которая прятала задачу
(а может быть только его) в SysTray.
Так что, Господа, проблема имеет решение, но как???
</pre>


 
Nick Denry ©   (2003-10-09 13:58) [13]

Ты задачку подробнеее опиши. А то и возникают всякие - разные предположения у людей...


 
Ketmar   (2003-10-09 18:59) [14]

>otistarda (09.10.03 13:36) [11]
специально для тех, кто в бронепоезде: уже ответили. советую выпрямить руки.
кстати, заодно советую разобраться, чем отличается хэндл ОКНА от хэндла ПОТОКА ВВОДА/ВЫВОДА.
опосля этого -- welcome back.


 
otistarda   (2003-10-10 21:02) [15]

ну и какой ты, к черту мастер? Знаешь в чем дело - ткни носом, e-mail есть.



Страницы: 1 вся ветка

Текущий архив: 2003.12.04;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.009 c
6-11697
Tik
2003-10-09 21:11
2003.12.04
UPD (Indy)


4-11714
Pavels
2003-10-10 10:16
2003.12.04
помогите с EnumWindows


6-11696
Elisa
2003-10-10 14:00
2003.12.04
при использовании NMHTTP выдает ошибку


1-11608
Jackson
2003-11-23 23:59
2003.12.04
печатать на французском


3-11585
Nick-From
2003-11-16 01:06
2003.12.04
Переменные TpFibDataSet и TpFibTransaction