موضوع خاص لدعــم الـ AutoIt -- افكار ؛ مشاريع ؛ سورسات ؛ اسئله ؛ نقاشات ...... الخ

لم تنجح معي الطريقة هل من شرح بسيط

 

بارك الله فيك على حب مساعدة أخوانك لكن طريقة ثانية لم تعمل
وحاولت فيه لأشغله لكن موراضي

 

السلام عليكم
الآن أعرف اسوي واجهة وبعض الاوامر :d:

حبيت أسئل كيف أضع خلفية للأداة ؟؟

وأيضا اضع قائمة فوق بالأداة ؟؟

 

طيب ياخوي ،
FileOpenDialog("أستعراض .. للغامديّ خخخ ...", @DesktopDir, "كافة الملفات (*.*)")
لو أبي يستعرض من المستندات و الملفات و كل مكان مو بس من سطح المكتب وش الأمر إلي أكتبه

و أمر الدمج يعني مثلا . استعرض ملفين و و أظغط ع الزر الي انا مسويه مثلا بأسم [ دمج ]
يندمجون تلقائي و أحصلهم بسطح المكتب ..

 

خلفية بلون وإلا خلفية صورة :d:

لو قصدك دمج برمجي فهذه احلم فيها لانه يحتاج برامج ضغط + خبرة في الضغط واتوقع نستخدم 7-zip

لكن الاسهل في الضغط هو برنامج winrar فعند تحويله لملف تنفيذي من الاعدادات للضغط يكون لك ملف الدمج جاهز للاستخراج عند الضغط عليه مباشرة

وإذا تقصد أمر دمج في الاتوات فهناك أمر يدمج الملفات بصيغة rar وهذا لا يعني دمج بل يعني أنه يضغط :q:

يعني بالنسبة للدمج لا تستعجل عليها كثير :d:

 

لتنجح معك الطريقة تحتاجين لشيء مهم

وهو: البرنامج الذين تريدين عمل تنصيب صامت له

بعدها اضغطي على script writer واختاري استعراض وبعدها اختاري البرانمج المراد تنصيبه صامت

بعد ما تختاريه اضغطي على record

ستلاحظين اختفاء الواجهة وظهور رمز على اليسار

الان قومي بتشغيل البرنامج ونصبيه على الجهاز وبعد أن تضغطي انهاء finish اضغط مرة أخرى على الزر على اليسار كي يوقف التسجيل

بعدها ستلاحظين مجموعة من الاوامر نتجت

انسخيها وضعيها في أي ملف اوتوات تريدينه

طبعا يجب أن يكون البرنامج الذي سجلتيه بنفس المسار الي كان فيه كي تتعرف عليه الاكواد k:

 

شباب عندي سؤال ،
الحين انا سويت أسطوانة للقرأن
و الاصوات شغاله و حددت المسار لاكن اذا شغلتها بجهاز ثاني ماتشتغل
فـ أنا رفعت المقاطع مع الأسطوانه فهل تنفع الطريقه برئيكم ؟
أو في حل ثاني

 

يا غالي لازم تكون الاصوات بنفس المسارات في جهاز الاخر وتكون الاصوات عنده أيضا

باختصار شديد

امسح مسار الصوت وخلي اسمه بس

وبعدين خلي الصوت جنب البرنامج بحيث يشغله علطول (لاتنسى إنك لازم تحذف المسار وتبقي الاسم)

وبعدين اضغط الملفات كلها :d:

 

معذرة على التأخر بالرد بسبب الأوضاع هذه الأيام
​

حسناً, هل تريد الطريقة الأخرى عن طريق الدوال ؟
​

إذا ركزت قليلاً ستفهم كيف يتم ذلك :
​

كود:

FileOpenDialog("أستعراض .. للغامديّ خخخ ...", [COLOR=Red]@DesktopDir[/COLOR], "كافة الملفات (*.*)")

لاحظ المحدد باللون الأحمر, وهذا مثال آخر

كود:

FileOpenDialog("أستعراض .. للغامديّ خخخ ...", [COLOR=Red]@DocumentsCommonDir[/COLOR], "كافة الملفات (*.*)")

جرب أمر FileRead وإرجاعه لمتغير للملف1 ثم قراءة الملف2 ودمج المتغيرين وحفظ ملف جديد عن طريق الأمر FileWrite

إذا لم تنجح أعلمني وسوف أكتب مثال لذلك

الأخ Corporation يجهز لشرح هذا على ما أعتقد



والسلام عليكم
​

 

أهاا كذا تمام ،
بس سؤال أخير ..

ياليت لو مثال عشان أفهم أكثر ،
و مشكور مقدماً

 

إستعملت هنا طريقة معقدة قليلاً في هذا المثال (لكي يصبح بالإمكان دمج ملفات تحتوي على unicode)

كود:

$file = FileOpenDialog('Select the file1', @ScriptDir, 'all file (*.*)', 1) ; تحديد الملف 1
$file2 = FileOpenDialog('Select the file2', @ScriptDir, 'all file (*.*)', 1) ; تحديد الملف 2
$file3 = FileSaveDialog('Save the NewFile', @ScriptDir, 'all file (*.*)') ; تحديد الملف المدموج

$hfile = FileOpen($file, 16) ; أخذ مقبض الملف 1 لقرائته في الوضع الثنائي
$hfile2 = FileOpen($file2, 16); أخذ مقبض الملف 2 لقرائته في الوضع الثنائي
$hfile3 = FileOpen($file3, 2) ; أخذ مقبض الملف الناتج للكتابة عليه

$data = FileRead($hfile) & FileRead($hfile2) ; قراءة ودمج لمعلومات الملفين

FileWrite($hfile3, Binary($data)) ; كتابة البيانات إلى الملف الناتج وتحويل المعلومات الثنائية وإرجاع البيانات لحالتها الأصلية

MsgBox(64, 'Done', "Coded by Alzri|AT4RE")

وهنا مثال آخر من أبسط ما يكون بطريقة مبدئيه

كود:

$file = FileOpenDialog('Select the file1', @ScriptDir, 'all file (*.*)', 1) ; تحديد الملف 1
$file2 = FileOpenDialog('Select the file2', @ScriptDir, 'all file (*.*)', 1) ; تحديد الملف 2
$file3 = FileSaveDialog('Save the NewFile', @ScriptDir, 'all file (*.*)') ; تحديد الملف المدموج

$hfile = FileOpen($file3, 2) ; أخذ مقبض الملف الناتج للكتابة عليه

$data = FileRead($file) & FileRead($file2) ; قراءة ودمج لمعلومات الملفين

FileWrite($hfile, $data) ; كتابة الملف الناتج

MsgBox(64, 'Done', "Coded by Alzri|AT4RE")

ببعض من التركيز أعتقد ستفهم كلاهما
​

 

أيوا كذا تمـاام ، أنت عطيتني طرف الخيط ،
و الحمد لله ، راح الحين أحاول أسويها ،
اي شي ما أفهمه راح أنزل لكم المشكله ،
لبى قلوبكم والله ،
أول منتدى يسوي هذه الدوره على مستوى عالي

 

ينووسي ( يونس ) :d:

لا أقصد خلفية صورة ،/

ولاتنسى الطلب الثاني xD

 

أخوي سؤال ،
كيف أخلي الأمر هذ حق الأستعراض ع الزر ؟!
يعني لمن يظغط مثلا أستعراض يطلع معاه ؟
لأن بالأوامر هذه ع طول يجي استعراض

 

خلاص سويتها :$

 

يعطيك الف عافيه ياا غلا

 

أخوي ، سويت كل شي تمام ،
لكن احفظ الملف يطلع لي بأسم 5 ؟
بدون صيغه فـ كيف أخلي الصيغه مثلا exe ؟!
النتاج في الأخير = الملف معـطوب :?:

 

:q:

إكتب الصيغة بجانب الإسم حينما تحفظ الملف أو برمجياً أضف إلى السطر السابق
​

كود:

 & ".exe"

يوجد طريقة أخرى أكثر دقة إن أردت أن أضعها سأضعها لك
​

 

طيب ياخوي ،
الملف يطلع معطوب مايشتغل !

 

بارك الله فيك