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

توقيع : .: Mr.Ali :.
.: Mr.Ali :. قال:
بعد إذن أخوي عبد الله
قمت بعمل ملف مفتوح لك ، مشروح فيه أهم أكواد الواجهة
طبعاً أكيد ننتظر أيضا كود أخي عبد الله
فأنا مبتدئ قد تجد أخطاء ، فاعذرني لأني مبتدأ
بس حبّيت أساعدك على قدر خبرتي

لتحميل الملف المفتوح
https://dl.dropbox.com/u/50827110/FORM.rar

وأي سؤال لا تتردد
أنقر للتوسيع...
ماشاء الله تبارك الله
شرح ممتاز

مشكلتي أني لم اقرأ ,, وإلا تفهم عمل الأكواد من خلال الأسم ...

وأي أستفسار في مشاريعي العملاقة :d: سأسدحه هون "قلبي لأصحاب اللهجة"

M-M-D قال:
شباب ممكن الموضوع الخاص بالاوتوات ؟
أنقر للتوسيع...

من هنا أخوي < Download >
 
توقيع : شاجع
بالنسبة للـ GUI والواجهات

هذه تعليمات سريعة :d:

ابدأ أولًا بالدالة وتعريفها:
كود: 
$Form = GUICreate

ثم اجعلها تظهر بالدالة:
كود: 
GUISetState

ثم ضع حلقة While

الدالة GUIGetMsg، تقوم بقراءة الأوامر المرسلة للواجهة عن طريق المستخدم

لهذا نضعها في While للاستمرار

فيه عدة طرق للتنظيم

1- استخدام Switch
كود: 
Switch GUIGetMsg()
     Case ...
     Case...
EndSwitch

داخل While طبعا

كل Case يمثل الامر المنتظر حدوثه (متغير لزر من الأزرار مثلًا)


2- استخدام Do بدلا من While ووضع شرط في Until للخروج منها، مثلا:
كود: 
-3 أو $GUI_EVENT_CLOSE
أي عند الضغط على X

وهناك طرق كثيرة يمكنكم اختراعها، ولكن هذه أكثر الطرق تنظيمًا وخصوصا Switch

أداة نهائية فارغة
كود: 
$MyForm = GUICreate("yones7x", 300, 200)
GUISetState(@SW_SHOW, $MyForm)
While 1
     Switch GUIGetMsg()
          Case -3
               Exit
     EndSwitch
WEnd
 
توقيع : yones7x
yones7x قال:
بالنسبة للـ GUI والواجهات

هذه تعليمات سريعة :d:

ابدأ أولًا بالدالة وتعريفها:
كود: 
$Form = GUICreate
ثم اجعلها تظهر بالدالة:
كود: 
GUISetState
ثم ضع حلقة While

الدالة GUIGetMsg، تقوم بقراءة الأوامر المرسلة للواجهة عن طريق المستخدم

لهذا نضعها في While للاستمرار

فيه عدة طرق للتنظيم

1- استخدام Switch
كود: 
Switch GUIGetMsg()
     Case ...
     Case...
EndSwitch
داخل While طبعا

كل Case يمثل الامر المنتظر حدوثه (متغير لزر من الأزرار مثلًا)


2- استخدام Do بدلا من While ووضع شرط في Until للخروج منها، مثلا:
كود: 
-3 أو $GUI_EVENT_CLOSE
أي عند الضغط على X

وهناك طرق كثيرة يمكنكم اختراعها، ولكن هذه أكثر الطرق تنظيمًا وخصوصا Switch

أداة نهائية فارغة
كود: 
$MyForm = GUICreate("yones7x", 300, 200)
GUISetState(@SW_SHOW, $MyForm)
While 1
     Switch GUIGetMsg()
          Case -3
               Exit
     EndSwitch
WEnd
أنقر للتوسيع...

ما يفهمك إلا دي خلقك :d:
 
توقيع : شاجع
السلام علكم ورحمة الله وبركاته

أدري أن الموضوع قد مضى عليه فترة طويلة من الزمن,, والتراب قد بدأ يغطي الموضوع ولاكن لدي استفسار مُهِم ...!!

أستخدمت البرنامج هذه الأيام بعد غياب فترة طوووووويلة من تركه وقد نسيت أشياء كثيرة...

كيف يمكنني ربط واجهتين معاً...!!

autoitform.png


لم أرى احد تعرض لهذا الأمر في الدروس السابقة...

وشكراً لكم جميعاً :)
 
توقيع : شاجع
,-^-,
:sick:
 
توقيع : شاجع
كود: 
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
 
$Form1 = GUICreate("Form1", 200, 100,Default,@DesktopHeight/2-200)
$next=GUICtrlCreateButton("next",0,50,100,50)
$Form2 = GUICreate("Form2", 200, 100,Default,@DesktopHeight/2-50)
$back=GUICtrlCreateButton("back",0,50,100,50)
 
GUISetState(@SW_SHOW,$Form1)
 
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
 
        case $next
            GUISetState(@SW_HIDE,$Form1)
            GUISetState(@SW_SHOW,$Form2)
 
        case $back
            GUISetState(@SW_HIDE,$Form2)
            GUISetState(@SW_SHOW,$Form1)
 
    EndSwitch
WEnd
 
^
الله يبارك فيك ويعطيك الصحة والعافية :)
 
توقيع : شاجع
السلام عليكم اخي عندي مشكلة في الامر or لا يتتحق لي

اريد مثلا ان اشتغل نافدة اليوتيب او نافدة قوقل يعطني رسالة

PHP: 
if (WinWaitActive("Google - Mozilla Firefox") Or WinWaitActive("YouTube - Mozilla Firefox") then
 
msgbox(0,"",اشغل")
 
endif

اي واحدة فيهم اشتغلت تطلع لي الرسالة

وشكرا لك اخي الكريم
 
تم التحرير، مشاركة عشوائية // yones7x
 
توقيع : كاريكا
zayan3 قال:
السلام عليكم اخي عندي مشكلة في الامر or لا يتتحق لي

اريد مثلا ان اشتغل نافدة اليوتيب او نافدة قوقل يعطني رسالة

PHP: 
if (WinWaitActive("Google - Mozilla Firefox") Or WinWaitActive("YouTube - Mozilla Firefox") then
 
msgbox(0,"",اشغل")
 
endif

اي واحدة فيهم اشتغلت تطلع لي الرسالة

وشكرا لك اخي الكريم
أنقر للتوسيع...

وعليكم السلام ورحمة الله وبركاته

عندك يا أخي علامة التنصيص مفقودة في كلمة (اشغل)

كما أنك وضعت قوس قبل الأمر دون إنهائه وهذا خطأ

بالنسبة لعدم قبول Or، لأنك وضعت أمر انتظار النافذة

من غير المنطق وضع شرط لانتظار شيء يبقى إلى ما لا نهاية

الصحيح هو استخدام الدالة WinExists وهي تتحقق من وجود النافذة المطلوبة أم لا لحظيًا

كما يجب الالتزام بمتطلبات الدالة، وعدم ترك المدخلات فارغة

حيث يجب وضع فراغ "" في مدخلة النص أو وضع النص الذي يتواجد في النافذة المطلوبة

هذا هو الشكل الصحيح للسكربت المطلوب:
كود: 
If WinExists("Google - Mozilla Firefox", "") Or WinExists("YouTube - Mozilla Firefox", "") Then
    MsgBox(0, "", "اشغل")
EndIf

مع التحيات...
 
توقيع : yones7x
اخي يونس

ابغى اعمل على اداة صغيرة

عن جلب المفاتيح ممكن مساعدة ؟
 
توقيع : M-M-D
M-M-D قال:
اخي يونس

ابغى اعمل على اداة صغيرة

عن جلب المفاتيح ممكن مساعدة ؟
أنقر للتوسيع...

تفضل أخي محمد

جلب المفاتيح من رابط تحميل أو سيرفر، صحيح؟
 
توقيع : yones7x
توقيع : M-M-D
توقيع : yones7x
توقيع : M-M-D
M-M-D قال:
هههه هذه هي المشكلة لا اعرف من اين ابدأ :S
أنقر للتوسيع...

إذًا، تابع الدورة وتعرف على أهم الدوال التي ستحتاجها، ثم سأساعدك بما يتعلق بدوال اتصال FTP

أو دوال التحميل من الانترنت إن تم توفير رابط مباشر من سيرفرك
 
توقيع : yones7x
  • Like
التفاعلات: M-M-D
يجب تسجيل الدخول أو التسجيل كي تتمكن من الرد هنا.
عودة
أعلى