Как скрыть консольное окно запускаемой программы?

Ситуация такая: из программы на Freebasic (GUI) нужно запустить консольную утилиту. Как можно скрыть консольное окно запускаемой программы?

valdimir пишет:Ситуация такая: из программы на Freebasic (GUI) нужно запустить консольную утилиту. Как можно скрыть консольное окно запускаемой программы?

Вариант ниже для windows. Как сделать подобное на Linux не знаю. Компилировать как консольное приложение.

Код:

#Include "windows.bi"

MessageBox(0,"Сейчас консольное окно видно, нажмите ОК","",0)
ShowWindow(GetConsoleWindow(), SW_HIDE)
MessageBox(0,"Консольное окно скрыто, нажмите ОК и окно появится","",0)
ShowWindow(GetConsoleWindow(), SW_SHOWNORMAL)
? "Press ESC to exit"

Do
   
Loop Until MultiKey(1)

Пример прекрасно работает. Как раз для Windows и нужно. Но нужное мне окно он не скрывает.
А именно:

#Include "windows.bi"
Exec ("c:\Program Files\WinRAR\rar.exe","a c:\Temp\11.rar c:\Temp\11")
ShowWindow(GetConsoleWindow(), SW_SHOWNORMAL)

Всё равно появляется консольное окно. Можно его как-то спрятать?

valdimir пишет:Пример прекрасно работает. Как раз для Windows и нужно. Но нужное мне окно он не скрывает.
А именно:

#Include "windows.bi"
Exec ("c:\Program Files\WinRAR\rar.exe","a c:\Temp\11.rar c:\Temp\11")
ShowWindow(GetConsoleWindow(), SW_SHOWNORMAL)

Всё равно появляется консольное окно. Можно его как-то спрятать?

У меня нет winrar, но на примере 7-ZIP (принцип такой же):

Код:

#Include "windows.bi"
#Include "win/shellapi.bi"
ShellExecute(0,"open","7z","a 55.7z 55.txt","",SW_HIDE)

Спасибо, работает!

Есть еще OpenPipe