إستدعاء البرنامج

بعد إضافة ShellApi في Uses أكتب

shellexecute(handle,'open','c:\windows\notepad.exe','','',SW_SHOWNORMAL);

هذه طريقة من الطرق

شكرا لك وبارك الله فيك

لقد بحثت في الديلفي 7على SHELLAPI في القسم USES

لو أمكن شرح باصورة

بدون فتح اي مكتبه اخري

winexec('c:\windows\notepad.exe',1);

الكود كامل كمثال

unit Unit1;

interface

uses
  Windows, Messages,  Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
	Button1: TButton;
	procedure Button1Click(Sender: TObject);
  private
	{ Private declarations }
  public
	{ Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
winexec('c:\windows\notepad.exe',1);
end;

end.

أخي الكريم

shellapi يتم إضافتها يدويا كما في الصورة في دلفي 5 تأخذ المسار

c:\Program Files\Borland\Delphi5\Source\Rtl\win\shellapi.pas

لا أعرف إن كانت موجودة في دلفي 7 لكن بعد البحث أظن أنها موجودة

من لديه دلفي 7 قد يفيدك أكثر في ذلك

قمت بعمل مثال على الأمر السابق و أرفقت مكتبة shellapi التي مع دلفي 5 مع المرفق

أرجو الفائدة

shellapi.rar