دستور بستن یک برنامه؟؟

[pooldar]

سلام دوستان
من با استفاده از اکسترا Budapi دستوری برای اجرای یک برنامه ایکسترنال نوشتم

baRunProgram("data\MOVIE\VLCPortable\App\vlc\vlc.exe data\MOVIE\1.avi","maximised", false

و الان می خوام موقع خروج از اتوران این برنامه بسته بشه
دستوری برای بستن برنامه می خواستم
با تشکر

 

[ps2]

میتونید از این کد استفاده کنید "
این کد رو به دکمه اجرای برنامه فرعی اضافه کن :
set dir = baFindWindow( "Notepad" , "" )
بجای نوت پد اسم برنامه در حال اجرا رو قرار بده . اگر برنامه اجرلا شده باشده متغیر
dir
برابر با 1 مشه .
در دستور بستن برنامه اصلی هم بنویس :
on mouseup me
if dir = 1 then
baCloseApp( dir ) -- برنامه جانبی رو میبنده
end if
halt ----- برنامه اصلی بسته میشه
end

 

[pooldar]

خیلی ممنون که جواب دادید.
من این روش که شما گفتید رفتم ولی به دستور If خطای زیر رو می ده:

 

[ps2]

دوست عزیز اگه میتونی پروژت رو اپ لود کن یا برام ایمیل کن تا برات درستش کنم

 

[pooldar]

من ایمیل شما رو پیدا نکردم

این ایمیل منه [email protected]

ولی اگه روشش رو ایجا می گفتید بهتر بود.

 

[ps2]

ببخشدگرفتار بودم

دوست عزیز در هر دو دستور متغیر dir رو به صورت global در ابتدای کد تعریف کن .

اگه نشد . فایلت رو به این ادرس میل کن :

[email protected]