Отправлено: 24.06.08 17:47. Заголовок: Как запуcкать приложения без использования __Run

Здравствуйте ! Подскажите пожалуйста, как можно запустить приложение не используя командную строку ?

 Отправлено: 24.06.08 18:05. Заголовок: SkyNET пишет: как м..

SkyNET пишет:

цитата:

как можно запустить приложение

С помощью функции ShellExecute()

Универсальный пример:

function RunExternal( cCmd, cVerb, cFile )
local lRet := .t.

#ifdef __CLIPPER__
lRet := SwpRunCmd( cCmd, 0, '', '' )
#endif

#ifdef __HARBOUR__
if cVerb <> nil
ShellExecute( GetDeskTopWindow(), cVerb, cFile, , , 1 )
else
__Run( cCmd )
endif
#endif

return lRet

 Отправлено: 27.07.08 16:30. Заголовок: gfilatov пишет: Get..

gfilatov пишет:

цитата:

ShellExecute( GetDeskTopWindow(), cVerb, cFile, , , 1 )

А где взять функцию GetDeskTopWindow() для хХарбора отдельно ?

И что за параметр cVerb ?

А вообще-то лучше привести примеры вызова этой функции ...

 Отправлено: 27.07.08 16:50. Заголовок: Andrey пишет: где в..

Andrey пишет:

цитата:

где взять эту функцию

HB_FUNC( GETDESKTOPWINDOW )
{
hb_retnl( (HWND)GetDesktopWindow() );
}

 Отправлено: 27.07.08 17:01. Заголовок: Я вообще-то не силен..

Я вообще-то не силен в С и поставил так:

#pragma BEGINDUMP
// из минигуи
#include <windows.h>
#include <hbapi.h>
#include <shlobj.h>

HB_FUNC( GETDESKTOPWINDOW )
{
hb_retnl( (HWND)GetDesktopWindow() );
}

#pragma ENDDUMP

Выдает ошибку :
Error E2342 test3.prg 36: Type mismatch in parameter 'lNumber' (wanted 'long', got 'HWND__ *') in function HB_FUN_GETDESKTOPWINDOW
*** 1 errors in Compile ***

Где править ?

 Отправлено: 27.07.08 18:08. Заголовок: Andrey пишет: Где п..

Andrey пишет:

цитата:

Где править ?

HB_FUNC( GETDESKTOPWINDOW )
{
hb_retnl( (LONG)GetDesktopWindow() );
}

 Отправлено: 28.07.08 01:44. Заголовок: Нет функции ShellExe..

Нет функции ShellExecute() в чистом хХарборе !
Пришлось цеплять what32.lib и заработало ...
А без этой библы обойтись можно ?

 Отправлено: 28.07.08 10:41. Заголовок: Andrey пишет: Нет ф..

Andrey пишет:

цитата:

Нет функции ShellExecute()

HB_FUNC( SHELLEXECUTE )
{
hb_retnl( (LONG) ShellExecute( (HWND) hb_parnl( 1 ) ,
(LPCSTR) hb_parcx( 2 ) ,
(LPCSTR) hb_parcx( 3 ) ,
ISNIL(4) ? NULL : (LPCSTR) hb_parcx( 4 ) ,
(LPCSTR) hb_parcx( 5 ) ,
hb_parni( 6 )
) ) ;
}

 Отправлено: 28.07.08 11:12. Заголовок: Получилось , заработ..

Получилось , заработало !!!

А где можно посмотреть синтаксис этой функции ?
В хелпе по хХарбору нет.
Методом проб и смотря здесь на форуме получил для себя образцы:

#define SW_SHOWNORMAL 1 - а за что этот параметр отвечает ?

ShellExecute(GetDeskTopWindow(), 'open', 'myHelp.Chm' , , , SW_SHOWNORMAL)

ShellExecute( GetDeskTopWindow(), "open", "notepad.exe", "test5.prg" , , 1 )

 Отправлено: 28.07.08 11:33. Заголовок: Andrey пишет: где м..

Andrey пишет:

цитата:

где можно посмотреть синтаксис этой функции ?

Документация WinAPI

ShellExecute Function

Performs an operation on a specified file.

Syntax
HINSTANCE ShellExecute(
HWND hwnd,
LPCTSTR lpOperation,
LPCTSTR lpFile,
LPCTSTR lpParameters,
LPCTSTR lpDirectory,
INT nShowCmd
);

Parameters
hwnd
[in] Handle to the owner window used for displaying a user interface (UI) or error messages. This value can be NULL if the operation is not associated with a window.
lpOperation
[in] Pointer to a null-terminated string, referred to in this case as a verb, that specifies the action to be performed. The set of available verbs depends on the particular file or folder. Generally, the actions available from an object's shortcut menu are available verbs. For more information about verbs and their availability, see Object Verbs. See Extending Shortcut Menus for further discussion of shortcut menus. The following verbs are commonly used.
edit
Launches an editor and opens the document for editing. If lpFile is not a document file, the function will fail.
explore
Explores the folder specified by lpFile.
find
Initiates a search starting from the specified directory.
open
Opens the file specified by the lpFile parameter. The file can be an executable file, a document file, or a folder.
print
Prints the document file specified by lpFile. If lpFile is not a document file, the function will fail.
NULL
For systems prior to Microsoft Windows 2000, the default verb is used if it is valid and available in the registry. If not, the "open" verb is used.
For Windows 2000 and later systems, the default verb is used if available. If not, the "open" verb is used. If neither verb is available, the system uses the first verb listed in the registry.
lpFile
[in] Pointer to a null-terminated string that specifies the file or object on which to execute the specified verb. To specify a Shell namespace object, pass the fully qualified parse name. Note that not all verbs are supported on all objects. For example, not all document types support the "print" verb.
lpParameters
[in] If the lpFile parameter specifies an executable file, lpParameters is a pointer to a null-terminated string that specifies the parameters to be passed to the application. The format of this string is determined by the verb that is to be invoked. If lpFile specifies a document file, lpParameters should be NULL.
lpDirectory
[in] Pointer to a null-terminated string that specifies the default directory.
nShowCmd
[in] Flags that specify how an application is to be displayed when it is opened. If lpFile specifies a document file, the flag is simply passed to the associated application. It is up to the application to decide how to handle it.
SW_HIDE
Hides the window and activates another window.
SW_MAXIMIZE
Maximizes the specified window.
SW_MINIMIZE
Minimizes the specified window and activates the next top-level window in the z-order.
SW_RESTORE
Activates and displays the window. If the window is minimized or maximized, Windows restores it to its original size and position. An application should specify this flag when restoring a minimized window.
SW_SHOW
Activates the window and displays it in its current size and position.
SW_SHOWDEFAULT
Sets the show state based on the SW_ flag specified in the STARTUPINFO structure passed to the CreateProcess function by the program that started the application. An application should call ShowWindow with this flag to set the initial show state of its main window.
SW_SHOWMAXIMIZED
Activates the window and displays it as a maximized window.
SW_SHOWMINIMIZED
Activates the window and displays it as a minimized window.
SW_SHOWMINNOACTIVE
Displays the window as a minimized window. The active window remains active.
SW_SHOWNA
Displays the window in its current state. The active window remains active.
SW_SHOWNOACTIVATE
Displays a window in its most recent size and position. The active window remains active.
SW_SHOWNORMAL
Activates and displays a window. If the window is minimized or maximized, Windows restores it to its original size and position. An application should specify this flag when displaying the window for the first time.

Return Value
Returns a value greater than 32 if successful, or an error value that is less than or equal to 32 otherwise. The following table lists the error values. The return value is cast as an HINSTANCE for backward compatibility with 16-bit Windows applications. It is not a true HINSTANCE, however. The only thing that can be done with the returned HINSTANCE is to cast it to an int and compare it with the value 32 or one of the error codes below.

 Отправлено: 28.07.08 12:30. Заголовок: Блин, с моим английс..

Блин, с моим английским буду разбираться долго....
Так бы сразу и сказал, что искать в WinAPI нужно ....

 Отправлено: 28.07.08 12:33. Заголовок: Ура, нашел на нашем ..

Ура, нашел на нашем языке......

Функция ShellExecute модуль ShellAPI
Группа ссылок: Диски, Папки и Файлы

Описание:
function ShellExecute(hWnd: HWND; Operation, FileName, Parameters,
Directory: PChar; ShowCmd: Integer): HINST;

Функция может открыть или напечатать определенный файл. Исполняет как Windows-приложения так и открывает файлы-документы.
Например с файлами типа ".txt" связан Блокнот "Notepad.exe" и запуск файла "my.txt" приведет к тому, что будет запущен Блокнот и в него будет передан параметр с именем файла.

Также с помощью этой функци можно в проводнике открыть папку.

Параметры:
hWnd: Хендл родителя запускаемого приложения.

Operation: Строка определяющая команду для исполнения. Может содержать:
"open" - открыть файл определенный параметром FileName.
"print" - напечатать файл определенный параметром FileName.
"explore" - открыть папку определенную параметром FileName.
Если параметр Operation равен nil, то по умолчанию выполняется операция "open".

FileName: Определяет имя файла или папки для открытия или печати. Функция может запускать файл на исполнение или документ на печать.

Parameters: определяет параметры передаваемые при запуске исполняемого приложения. Бессмысленно его использовать при запуске документа. Параметр можеть быть равен Nil.

Directory: опеределяет каталог по умолчанию(рабочий каталог). Получить\установить можно с помощью функций GetCurrentDirectory, SetCurrentDirectory.

ShowCmd: определяет режим открытия файла. См. константы открытия\показа SW_.

Возвращаемые значения
Функция возвращает Хендл открытого приложения или сервера DDE. Возвращаемое значение должно быть больше 32. В противном случае это ошибка:

0 - Системе не хватает памяти, выполняемый файл испорчен или нехватает ресурсов.
ERROR_FILE_NOT_FOUND - файл не найден.
ERROR_PATH_NOT_FOUND - путь не найден.
ERROR_BAD_FORMAT - .EXE-Файл неверен (не-Win32.EXE или ошибка в .EXE).
SE_ERR_ACCESSDENIED - Операционная Система отвергла доступ к файлу.
SE_ERR_ASSOCINCOMPLETE - неправильная или неполная ассоциация с файлом.
SE_ERR_DDEBUSY - транзакция DDE не может завершаться поскольку были запущены другие транзакции.

SE_ERR_DDEFAIL - транзакция DDE потерпела неудачу.
SE_ERR_DDETIMEOUT - транзакция DDE не могла завершаться поскольку запрос несинхронизированный.
SE_ERR_DLLNOTFOUND - динамическая библиотека(.DLL) не обнаружена.
SE_ERR_FNF - файл не найден.
SE_ERR_NOASSOC - нет приложения ассоцированного с данным типом файла.
SE_ERR_OOM - недостаточно памяти для завершения операции.
SE_ERR_PNF - путь не найден.
SE_ERR_SHARE - разделение(shared) файла неверно.

См. также: FindExecutable, ShellExecuteEx

Функция находится в файле shell32.dll

 Отправлено: 28.07.08 12:35. Заголовок: И еще про окна: Ко..

И еще про окна:

Константы состояния окна при открытии\показе.
Группа ссылок: Окна

SW_HIDE - Прячет окно и переводит в активное состояние другое окно.
SW_MINIMIZE - Минимизирует окно и активизирует окно верхнего уровня в списке менеджера окон.
SW_RESTORE - Действует так же, как и SW_SHOWNORMAL.
SW_SHOW - Активизирует окно и выводит его в текущей позиции и текущего размера.
SW_SHOWDEFAULT - Активизирует окно и выводит его с использованием текущих умолчаний.

SW_SHOWMAXIMIZED - Активизирует окно и выводит его с максимально размером.
SW_SHOWMINIMIZED - Активизирует окно и выводит его в виде пиктограммы.
SW_SHOWMINNOACTIVATE - Выводит окно как пиктограмму; бывшее активныь в данный момент окно остается активным.
SW_SHOWNA - Выводит окно с учетом его состояния в данный момент; активное в данный момент окно остается активным.
SW_SHOWNOACTIVATE - Выводит окно в его прежней позиции и прежнего размера; активное в данный момент окно остаета активным.

SW_SHOWNORMAL - Активизирует окно и выводит его на экран. Если окно было увеличено или уменьшено до пиктограммы, то система Windows восстановит начальное положение и размер окна.
SW_SHOWSMOOTH - Выводит окно так, чтобы оно меньше всего перекрывалось с другими окнами.

 Отправлено: 28.07.08 14:17. Заголовок: Спасибо Григорий !!!..

Спасибо Григорий !!!

Кому нужно, привожу пример полностью (на чистом хХарборе):

скопировать в файл test4.prg

// компилировать без библиотеки what32.lib
// ------ смотри #include "winuser.h"
/*
* ShowWindow() Commands
*/
#define SW_HIDE 0
#define SW_SHOWNORMAL 1
#define SW_NORMAL 1
#define SW_SHOWMINIMIZED 2
#define SW_SHOWMAXIMIZED 3
#define SW_MAXIMIZE 3
#define SW_SHOWNOACTIVATE 4
#define SW_SHOW 5
#define SW_MINIMIZE 6
#define SW_SHOWMINNOACTIVE 7
#define SW_SHOWNA 8
#define SW_RESTORE 9
#define SW_SHOWDEFAULT 10
#define SW_FORCEMINIMIZE 11
#define SW_MAX 11


FUNCTION MAIN()

//ShellExecute(GetDeskTopWindow(), 'open', 'myHelp.Chm' , '', '', SW_SHOWNORMAL)
ShellExecute(GetDeskTopWindow(), 'open', "notepad.exe", "test4.prg", '', SW_SHOWMAXIMIZED)

ShellExecute(GetDeskTopWindow(), 'explore', CurDrive()+":"+DirName(), , , SW_SHOWNORMAL)

RunExternal( "","open","notepad.exe", "test4.prg")

wait
RETURN NIL
///////////////////////////////////////////////////////
function RunExternal( cCmd, cVerb, cFile, cPar4 )
local lRet := .t.

#ifdef __CLIPPER__
lRet := SwpRunCmd( cCmd, 0, '', '' )
#endif

#ifdef __HARBOUR__
if cVerb <> nil
ShellExecute( GetDeskTopWindow(), cVerb, cFile, cPar4 , , 1 )
else
__Run( cCmd )
endif
#endif

return lRet
///////////////////////////////////////////////////////////
#pragma BEGINDUMP

#include <windows.h>
#include <hbapi.h>
#include <shlobj.h>

HB_FUNC( GETDESKTOPWINDOW )
{
hb_retnl( (LONG)GetDesktopWindow() );
}

HB_FUNC( SHELLEXECUTE )
{
hb_retnl( (LONG) ShellExecute( (HWND) hb_parnl( 1 ) ,
(LPCSTR) hb_parcx( 2 ) ,
(LPCSTR) hb_parcx( 3 ) ,
ISNIL(4) ? NULL : (LPCSTR) hb_parcx( 4 ) ,
(LPCSTR) hb_parcx( 5 ) ,
hb_parni( 6 )
) ) ;
}
#pragma ENDDUMP

 Отправлено: 01.09.08 18:50. Заголовок: А как сделать запуск..

А как сделать запуск, если строка запуска слишком длинная ?
Типа:

C:\ABON\UTIL\AbonentCheck.exe C:\ABON\TEMP\chk4.dbf C:\ABON\TEMP\chk4_frm.dbf C:\ABON\TEMP\tarif.dbf

Приходиться делать бат-файл, запускаеть его через
ShellExecute(GetDeskTopWindow(), 'open', "C:\ABON\myrun.bat", "", '', SW_HIDE)
а потом удалять этот бат-файл.

А по другому нельзя ?

 Отправлено: 03.09.08 13:51. Заголовок: Спасибо, сам разобра..

Спасибо, сам разобрался .....

ShellExecute(GetDeskTopWindow(), 'open', "C:\ABON\UTIL\AbonentCheck.exe", "C:\ABON\TEMP\chk4.dbf C:\ABON\TEMP\chk4_frm.dbf C:\ABON\TEMP\tarif.dbf ", '', SW_HIDE)

 Отправлено: 13.10.08 21:09. Заголовок: Проблема с запуском ..

Проблема с запуском BAT-файла, процесс стартует скрытным и никак не виден на экране !!!
Дело в том что я запускаю процесс архивации, а он не виден на экране....
А в Диспечере задач он запускается и потом делает архив....

Как можно исправить ???

// ------ смотри #include "winuser.h"
/*
* ShowWindow() Commands
*/
#define SW_HIDE 0
#define SW_SHOWNORMAL 1
#define SW_NORMAL 1
#define SW_SHOWMINIMIZED 2
#define SW_SHOWMAXIMIZED 3
#define SW_MAXIMIZE 3
#define SW_SHOWNOACTIVATE 4
#define SW_SHOW 5
#define SW_MINIMIZE 6
#define SW_SHOWMINNOACTIVE 7
#define SW_SHOWNA 8
#define SW_RESTORE 9
#define SW_SHOWDEFAULT 10
#define SW_FORCEMINIMIZE 11
#define SW_MAX 11


FUNCTION MAIN()
LOCAL cFile

cFile := CurDrive()+":"+DirName()+"\backup_db.bat"
ShellExecute(GetDeskTopWindow(), 'open',cFile, "", "" , , SW_SHOWNORMAL)

wait

RETURN NIL
///////////////////////////////////////////////////////
#pragma BEGINDUMP

#include <windows.h>
#include <hbapi.h>
#include <shlobj.h>

HB_FUNC( GETDESKTOPWINDOW )
{
hb_retnl( (LONG)GetDesktopWindow() );
}

HB_FUNC( SHELLEXECUTE )
{
hb_retnl( (LONG) ShellExecute( (HWND) hb_parnl( 1 ) ,
(LPCSTR) hb_parcx( 2 ) ,
(LPCSTR) hb_parcx( 3 ) ,
ISNIL(4) ? NULL : (LPCSTR) hb_parcx( 4 ) ,
(LPCSTR) hb_parcx( 5 ) ,
hb_parni( 6 )
) ) ;
}
#pragma ENDDUMP


Сам backup_db.bat:
@echo off
U:\UTILI\rar.exe a -m5 -r -dh C:\ARHIV\arx_2008.10.06.rar U:\MyProg\*.*
U:\UTILI\rar.exe a -m5 -r -dh C:\ARHIV\arx_2008.10.06.rar C:\MyProg\*.*
echo .
echo .
echo =============== АРХИВИРОВАНИЕ ЗАКОНЧЕНО ============================
echo .
echo .
echo ===== АРХИВ-БД создан в папке ==== C:\ARHIV\arx_2008.10.06.rar

 Отправлено: 14.10.08 08:44. Заголовок: Извиняйте, а почему ..

Извиняйте, а почему не пользоваться для архивации встроенным в xHarobour зипом (hbzip.lib в контрибах) ? Тогда и с батником проблем не будет.

 Отправлено: 14.10.08 13:35. Заголовок: Кроме ZIP'a есть..

Кроме ZIP'a есть еще вызов батников. А их тогда как вызывать. Это в качестве примера, чтоб разобраться с CMD....

 Отправлено: 14.10.08 16:12. Заголовок: WAPI функция ShellEx..

WAPI функция ShellExecute принимает в качестве аргументов 6 параметров, а вы, что передаете

цитата:

ShellExecute(GetDeskTopWindow(), 'open',cFile, "", "" , , SW_SHOWNORMAL)

 Отправлено: 14.10.08 19:37. Заголовок: Семён Семёнович ......

Семён Семёнович ...... уже склероз !!!
Спасибо Петр !
Всегда так бывает, все баги на поверхности лежат .....