PDA

Просмотр полной версии : [Помогите!] windows + Delphi


Avtomatik
11.04.2013, 22:16
Прошу помочь с проектом , я хочу сделать так чтобы от кнопки запускать с windows любую программу которому дам значение .
// прошу помочь с кодом .

metraz
12.04.2013, 00:21
команда shellexecute

Avtomatik
12.04.2013, 00:33
если я вас снова понял ) то ...

ShellExecute (Form1.Handle, nil, '[Ссылки могут видеть только зарегистрированные и активированные пользователи]', nil, nil, SW_RESTORE); //запуск нашей странички

ShellExecute (Form1.Handle, nil, PChar (Application.ExeName), nil, nil, SW_RESTORE); //запуск второй копии этой программы

ShellExecute (Form1.Handle, nil, 'iexplore', '[Ссылки могут видеть только зарегистрированные и активированные пользователи]', nil, SW_RESTORE); //запуск в отдельном окне

ShellExecute (Form1.Handle, nil, 'mailto:[Ссылки могут видеть только зарегистрированные и активированные пользователи]?subject=delphi', nil, nil, SW_RESTORE); //написать мне письмо

ShellExecute (Form1.Handle, nil, 'c:\1.doc', nil, nil, SW_RESTORE); //открыть документ


но в Uses будет код следующего типа : uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, ShellAPI , Vcl.Dialogs;