ocab
زيزوومى محترف
غير متصل
قم بمتابعة الفيديو أدناه لمعرفة كيفية تثبيت موقعنا كتطبيق ويب على الشاشة الرئيسية.
ملاحظة: قد لا تكون هذه الميزة متاحة في بعض المتصفحات.
يآ ليت من يدلي على الخطأ في هالكود ،، :er:
كود:RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "avgnt", "REG_SZ", ""C:\Program Files\Avira\AntiVir Desktop\avgnt.exe" /min -nosplash")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "avgnt", "REG_SZ", '"C:\Program Files\Avira\AntiVir Desktop\avgnt.exe" /min -nosplash')
استعملأريد طريقة تشغيل ملف بعد مدة معينة ضروري وبسرعة يا إخوان
إستخدم حينها الأمرتشغيل برنامج اسمه فرضا Nod.exe بعد دقيقتين
ماذا تقصد بالضبطتشغيل برنامج اسمه فرضا Nod.exe بعد دقيقتين
$x=InputBox ("الحاسبة","أدخل الرقم الاول","","",170,120)
$S=InputBox ("الحاسبة","ادخل العملية ضرب او ناقص او زائد او قسمة","","",170,120)
$Y=InputBox ("الحاسبة","أدخل الرقم الثاني","","",170,120)
[LEFT]
switch $s
case '*'
MsgBox(0,"الناتج",$x*$y)
case '/'
MsgBox(0,"الناتج",$x/$y)
case '+'
MsgBox(0,"الناتج",$x+$y)
case '-'
MsgBox(0,"الناتج",$x-$y)
Case Else
MsgBox(0,"","خطأ في ادخال العملية")
EndSwitch
[/LEFT]
سلمت أخي الغالي ..أيها الاخ الرائع
اعزرني أنا من متابعي دروسك الرائعه
ولكن انا فى منطقه سرعة الانترنيت فيها تقاس بالبايت
أي حتى تفتح لدي صفحة الغوغل أحتاج الى بعض الوقت
ولذالك فمشاركاتي ورددودي قليله
ولكنى اتابع شرحك الجميل حتى لو لم أستطع الرد
فلا توأخزني
Ashalshaikh
ويكفيك فخرأ أن الكثيرمن المنتديات
قامت بسحب دروسك وشرحك الذي لم يسبق له في أي منتدا
أخر لتضعه في منتداها
وإن دل هذا الى شىء
فهو يدل الى كبر شأن هذه الدروس وفقك الله
وزادك علماً
أخي الغالي لدي سؤال
كيف يمكن ربط ملف أتو إت الى ملف INI
وهل يمكن ذالك
شكرأ وفقك الله
أرجو اعادة رفع الادات التي صنعتها أخر شى
Ashalshaikh File Commander
فمواقع التحميل
تقول أن الاداة قد حذفة
شكرأk:
أخي الغالي هذا الكود يعطيك معلومات عن القطع الموجوده لكل جهازPHP:#Include <file.au3> $aDrives = DriveGetDrive ("Fixed") FOr $x=1 To $aDrives[0] Next $CountLines = $aDrives[0] If $CountLines +0 = 0 Then Msgbox (0,"عدد الاقراص","عدد الاقراص"& $aDrives["Fixed"]) Else MsgBox (0,"عدد الاقراص","عدد الاقراص"& $aDrives["Fixed"]) EndIf $aDrives = DriveGetDrive ("CDROM") FOr $x=1 To $aDrives[0] Next $CountLines = $aDrives[0] If $CountLines +0 = 0 Then Msgbox (0,"السواقات","السواقات"& $aDrives["CDROM"]) Else MsgBox (0,"السواقات","السواقات"& $aDrives["CDROM"]) EndIf $aDrives = DriveGetDrive ("Removable") FOr $x=1 To $aDrives[0] Next $CountLines = $aDrives[0] If $CountLines +0 = 0 Then Msgbox (0,"عدد الفلاشات","عدد الفلاشات"& $aDrives["Removable"]) Else MsgBox (0,"عدد الفلاشات","عدد الفلاشات"& $aDrives["Removable"]) EndIf
ولكن المشكله التى صادفتني
أنه في حال لم توجد فلاشه متصله بالجهاز يعطي خطأ
أما إذا وجدة فإنه يعمل بشكل جيد
ما هو الخطأ
وشكراً
بإذن الله .... اذا ممكن تسوي كتاب كامل من الى شروحات تطبيقات امثله ..
تسويه في اسطوانة ..
طبعاً بعد ماتكمل مشروعك مع الاعضاء لاجل الاستفادة من كل الاعضاء الباقين ..
اذا ممكن ..
السلام عليكم ورحمة الله وبركاته
ارجو منك اخي ashalshaikh ان تعطيني رأيك في هذا البرنامج البسيط
وذلك لكشف الاخطاء وتجنبها والطرق الافضل
كما ارجو منك ان تساعدني في تطويره .... يعني اذا موجود عندك مفاتيح بالريجستري بتفيدنا كمان لا تقصر جزاك الله عنا كل خير
طبعا الحكي مو بس للأخ ashalshaikh
وانما لكل الاخوة اللي صار عندون خبرة ببرنامج auto it واللي عندو ملاحظات ما يقصر جزاكم الله كل خير
كود:[SIZE=2][COLOR=Magenta] #include[/COLOR] <GuiConstants.au3> Opt("GUICloseOnESC", 1) [COLOR=Sienna]$Window[/COLOR] = GUICreatE("CHOZENX",250,350,250,150) [COLOR=Sienna]$button1[/COLOR] = GUICtrlCreateButton("START UP SYSTEM", 30,50,200,30) [COLOR=Sienna]$button2[/COLOR] = GUICtrlCreateButton("START UP MODEM", 30,100,200,30) [COLOR=Sienna]$button3[/COLOR] = GUICtrlCreateButton("SOLVE NTFS FOLDERS PROBLEM", 30,150,200,30) [COLOR=Sienna]$button4[/COLOR] = GUICtrlCreateButton("EXIT", 75,220,100,25) [COLOR=Sienna]$button5[/COLOR] = GUICtrlCreateButton("ABOUT", 75,250,100,20) [COLOR=Red]GUISetState()[/COLOR] [COLOR=Blue]While 1[/COLOR] [COLOR=Sienna]$c [/COLOR]= GUIGetMsg() [COLOR=Blue]if[/COLOR][COLOR=Sienna] $c[/COLOR] =[COLOR=Sienna] $button1[/COLOR] Then SYS() [COLOR=Blue]EndIf[/COLOR] [COLOR=Blue]if[/COLOR] [COLOR=Sienna]$c[/COLOR] = [COLOR=Sienna]$button2[/COLOR] [COLOR=Blue]Then[/COLOR] MODEM() [COLOR=Blue]EndIf[/COLOR] [COLOR=Blue]if[/COLOR] [COLOR=Sienna]$c[/COLOR] = [COLOR=Sienna]$button3[/COLOR] [COLOR=Blue]Then[/COLOR] NTFS() [COLOR=Blue]EndIf[/COLOR] [COLOR=Blue]if [/COLOR]$c = [COLOR=Sienna]$button4[/COLOR] [COLOR=Blue]Then[/COLOR] SEXIT() [COLOR=Blue]EndIf[/COLOR] [COLOR=Blue]IF[/COLOR] [COLOR=Sienna]$C[/COLOR] = [COLOR=Sienna]$button5[/COLOR] [COLOR=Blue]Then[/COLOR] about() [COLOR=Blue] EndIf[/COLOR] [COLOR=Blue]If[/COLOR] [COLOR=Sienna]$c[/COLOR] = [COLOR=Sienna]$GUI_EVENT_CLOSE[/COLOR] [COLOR=Blue]Then[/COLOR] sExit() [COLOR=Blue]EndIf[/COLOR] [COLOR=Blue]WEnd[/COLOR] ;=====================================================================functions [COLOR=Blue]Func[/COLOR] SYS() [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management\PrefetchParameters","EnablePrefetcher","REG_DWORD",5) [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management","ClearPageFileAtShutdown","REG_DWORD",0) [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management","DisablePagingExecutive","REG_DWORD",1) [COLOR=Orange]RegWrite[/COLOR]("HKEY_CURRENT_USER\CONTROL PANEL\DESKTOP","MenuShowDelay","REG_SZ",150) [COLOR=Orange]RegWrite[/COLOR]("HKEY_CURRENT_USER\CONTROL PANEL\DESKTOP","HUNGAPPTIMEOUT","REG_SZ",5000) [COLOR=Orange]RegWrite[/COLOR]("HKEY_CURRENT_USER\CONTROL PANEL\DESKTOP","WAITTOKILLAPPTIMEOUT","REG_SZ",4000) [COLOR=Blue]EndFunc[/COLOR] [COLOR=Blue]Func [/COLOR]MODEM() [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Dnscache\Parameters","CacheHashTableBucketSize","REG_DWORD","1") [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Dnscache\Parameters","CacheHashTableSize","REG_DWORD","384" ) [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Dnscache\Parameters","MaxCacheEntryTtlLimit","REG_DWORD","64000") [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Dnscache\Parameters","MaxSOACacheEntryTtlLimit","REG_DWORD","301" ) [COLOR=Blue]EndFunc[/COLOR] [COLOR=Blue]Func [/COLOR]NTFS() [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\FileSystem","NtfsDisable8dot3NameCreation","REG_DWORD",0) [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\FileSystem","Win31FileSystem","REG_DWORD",0) [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\FileSystem","Win95TruncatedExtensions","REG_DWORD",1) [COLOR=Orange]RegWrite[/COLOR]("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\FileSystem","NtfsDisableLastAccessUpdate","REG_DWORD",1) [COLOR=Blue]EndFunc[/COLOR] [COLOR=Blue]Func [/COLOR]about() [COLOR=Orange]MsgBox[/COLOR](0,".... ^_^ .... ^_^ .... ^_^ ....","This humble Program is Designed to you by"&@CRLF&@CRLF&" ChozenX") [COLOR=Blue]EndFunc[/COLOR] [COLOR=Blue]Func [/COLOR]SEXIT() Exit [COLOR=Blue]EndFunc[/COLOR] [/SIZE]
وسؤال صغير ازا بدي اعدل مثلا على ملف gpedit.msc اضيفو بالبرنامج كيف؟؟؟؟؟
تقبلوا مروري اخوكم
سؤال بسيط
هل يمكن عمل رفع upload لملف بواسطة autoit
شكرا
الله يسعدك ويشرح صدرك ..الله يوفقك أخي ashalshaikh
نشأالله يكون نصيبك النجاح والتفوق في دراستك
نشالله ترجعلنا عن قريب
المشكلة بسيطة جدا جدا ..يآ ليت من يدلي على الخطأ في هالكود ،، :er:
كود:RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "avgnt", "REG_SZ", ""C:\Program Files\Avira\AntiVir Desktop\avgnt.exe" /min -nosplash")
"C:\Program Files\Avira\AntiVir Desktop\avgnt.exe" /min -nosplash
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "avgnt", "REG_SZ", '"C:\Program Files\Avira\AntiVir Desktop\avgnt.exe" /min -nosplash')
السلام عليكم ورحمة الله وبركاته
من زمان وانا عم تابع نشاطاتكم ما شاء الله في مجال ال اوتو ات وصراحة كتير استفدت بس ولا مرة فكرت شارك لذلك قررت من اليوم انو انضم الكن (طبعا من بعد أمركن) لذلك بداية حضرتلكن مثال بسيط ارجو ان تقبلوه مني وهو مثال عن الالة الحاسبة مارح طول كتير وهي الكود
كود:$x=InputBox ("الحاسبة","أدخل الرقم الاول","","",170,120) $S=InputBox ("الحاسبة","ادخل العملية ضرب او ناقص او زائد او قسمة","","",170,120) $Y=InputBox ("الحاسبة","أدخل الرقم الثاني","","",170,120) [LEFT] switch $s case '*' MsgBox(0,"الناتج",$x*$y) case '/' MsgBox(0,"الناتج",$x/$y) case '+' MsgBox(0,"الناتج",$x+$y) case '-' MsgBox(0,"الناتج",$x-$y) Case Else MsgBox(0,"","خطأ في ادخال العملية") EndSwitch [/LEFT]
Sqrt (4*(95-45+(96+54))/2)
[COLOR=#aa0000]$A[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]InputBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]''[/COLOR][COLOR=#ff0000],[/COLOR][COLOR=#9999cc]'أدخل كامل العبارة الرياضية __ مع مراعات أكواد الأوتيت'[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#0000ff]If[/COLOR] [COLOR=#ff33ff]@error[/COLOR] [COLOR=#0000ff]Then[/COLOR] [COLOR=#0000ff]Exit[/COLOR]
[COLOR=#000090]MsgBox[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR][COLOR=#9999cc]''[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#000090]Execute[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$A[/COLOR][COLOR=#ff0000])[/COLOR][COLOR=#ff0000])[/COLOR]
[LIST]
[*][URL="http://www.autoitscript.com/autoit3/docs/functions/ShellExecute.htm"]ShellExecute()[/URL] and [URL="http://www.autoitscript.com/autoit3/docs/functions/ShellExecuteWait.htm"]ShellExecuteWait()[/URL] no longer use the "open" verb by default. See the remarks section for those functions for more details.
[*]The return value of [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm"]InetGet()[/URL] has changed. It is [B]important[/B] to read and understand the changes because [U]it is possible to leak resources[/U] if [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm"]InetGet()[/URL] is used incorrectly.
[*]InetGet("abort"), @InetGetActive and @InetGetBytesRead are now deprecated. The following list shows the new functions used to access the old behavior:
[LIST]
[*][B]InetGet("abort")[/B] - Calling the new [URL="http://www.autoitscript.com/autoit3/docs/functions/InetClose.htm"]InetClose()[/URL] function with a handle returned from [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm"]InetGet()[/URL] will abort a download.
[*][B]@InetGetActive[/B] - Calling the new [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGetInfo.htm"]InetGetInfo()[/URL] function with no parameters returns a count of active downloads.
[*][B]@InetGetBytesRead[/B] - Calling the new [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGetInfo.htm"]InetGetInfo()[/URL] function with a handle returned from [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm"]InetGet()[/URL]will return the bytes read (and more) for a download.
[/LIST]
[*]The FtpBinaryMode option set with AutoItSetOption() has been removed. Now [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm"]InetGet()[/URL] takes a flag to specify the transfer mode.
[*]The URLDownloadToFile() alias for [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm"]InetGet()[/URL] has been removed.
[*]AdlibEnable() and AdlibDisable() are deprecated. See the new functions [URL="http://www.autoitscript.com/autoit3/docs/functions/AdlibRegister.htm"]AdlibRegister()[/URL] and [URL="http://www.autoitscript.com/autoit3/docs/functions/AdlibUnRegister.htm"]AdlibUnRegister()[/URL].
[*]OnAutoItStart() is deprecated. See the new pre-processor statement [URL="http://www.autoitscript.com/autoit3/docs/keywords/OnAutoItStartRegister.htm"]#OnAutoItStartRegister[/URL].
[*]OnAutoItExit() is deprecated. See the new functions [URL="http://www.autoitscript.com/autoit3/docs/functions/OnAutoItExitRegister.htm"]OnAutoItExitRegister()[/URL] and [URL="http://www.autoitscript.com/autoit3/docs/functions/OnAutoItExitUnRegister.htm"]OnAutoItExitUnregister()[/URL].
[*]The AutoItSetOption() option OnExitFunc has been removed. See the new functions [URL="http://www.autoitscript.com/autoit3/docs/functions/OnAutoItExitRegister.htm"]OnAutoItExitRegister()[/URL] and [URL="http://www.autoitscript.com/autoit3/docs/functions/OnAutoItExitUnRegister.htm"]OnAutoItExitUnregister()[/URL].
[*][URL="http://www.autoitscript.com/autoit3/docs/functions/GUICreate.htm"]GUICreate()[/URL] with $WS_EX_MDICHILD has been fixed to be relative to client area as documented.
[*][URL="http://www.autoitscript.com/autoit3/docs/functions/ProcessWait.htm"]ProcessWait()[/URL] now returns a PID instead of 1 on success.
[*][URL="http://www.autoitscript.com/autoit3/docs/functions/WinWait.htm"]WinWait()[/URL], [URL="http://www.autoitscript.com/autoit3/docs/functions/WinWaitActive.htm"]WinWaitActive()[/URL], [URL="http://www.autoitscript.com/autoit3/docs/functions/WinActivate.htm"]WinActivate()[/URL], [URL="http://www.autoitscript.com/autoit3/docs/functions/WinActive.htm"]WinActive()[/URL] and [URL="http://www.autoitscript.com/autoit3/docs/functions/WinMove.htm"]WinMove()[/URL] now return an HWND instead of 1 on success.
[*]The macro [URL="http://www.autoitscript.com/autoit3/docs/macros/TimeAndDate.htm"]@YDAY[/URL] now uses the range 001 - 366 instead of 1 - 366. This makes the macro more consistent with other languages (like C/C++) and more consistent with all other date related macros which return strings with leading 0s to pad the length.
[*][URL="http://www.autoitscript.com/autoit3/docs/functions/RegEnumKey.htm"]RegEnumKey()[/URL] and [URL="http://www.autoitscript.com/autoit3/docs/functions/RegEnumVal.htm"]RegEnumVal()[/URL] now return an empty string instead of an error message.
[/LIST]
[B]UDFs:[/B]
[LIST]
[*]The last optional parameter for [URL="http://www.autoitscript.com/autoit3/docs/libfunctions/_StringBetween.htm"]_StringBetween()[/URL] has been removed.
[*]_StringAddThousandsSep() has been removed. There are too many opinions on what this function should do and too many revisions of this function have been made.
[*]_SQLite_SaveMode() has been renamed to _SQLite_SafeMode().
[/LIST]
[I][B]Some of the following features are deprecated. Deprecated features are no longer documented but continue to work. Deprecated features will be removed after version 3.3.4.0. It is strongly recommended that scripts relying on deprecated features be updated to work with the new behavior. Some features have already been removed and will be noted as such.[/B][/I]
[B]AutoIt:[/B]
[LIST]
[*]The raw reading mode for FileOpen() has been removed.
[*]InetGet("abort"), @InetGetActive and @InetGetBytesRead have been removed. The following list shows the new functions used to access the old behavior:
[LIST]
[*][B]InetGet("abort")[/B] - Calling the new [URL="http://www.autoitscript.com/autoit3/docs/functions/InetClose.htm"]InetClose()[/URL] function with a handle returned from [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm"]InetGet()[/URL] will abort a download.
[*][B]@InetGetActive[/B] - Calling the new [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGetInfo.htm"]InetGetInfo()[/URL] function with no parameters returns a count of active downloads.
[*][B]@InetGetBytesRead[/B] - Calling the new [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGetInfo.htm"]InetGetInfo()[/URL] function with a handle returned from [URL="http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm"]InetGet()[/URL]will return the bytes read (and more) for a download.
[/LIST]
[*]AdlibEnable() and AdlibDisable() have been removed. See the new functions [URL="http://www.autoitscript.com/autoit3/docs/functions/AdlibRegister.htm"]AdlibRegister()[/URL] and [URL="http://www.autoitscript.com/autoit3/docs/functions/AdlibUnRegister.htm"]AdlibUnRegister()[/URL].
[*]OnAutoItStart() has been removed. See the new pre-processor statement [URL="http://www.autoitscript.com/autoit3/docs/keywords/OnAutoItStartRegister.htm"]#OnAutoItStartRegister[/URL].
[*]OnAutoItExit() has been removed. See the new functions [URL="http://www.autoitscript.com/autoit3/docs/functions/OnAutoItExitRegister.htm"]OnAutoItExitRegister()[/URL] and [URL="http://www.autoitscript.com/autoit3/docs/functions/OnAutoItExitUnRegister.htm"]OnAutoItExitUnregister()[/URL].
[/LIST]
[SIZE=3][B] [COLOR=#000090]GUICreate[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"File Scanner"[/COLOR][COLOR=#ff0000],[/COLOR]width[COLOR=#ff0000],[/COLOR]height[COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUICreate[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"FileScanner"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]7[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUISetState[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#0000ff]While[/COLOR] [COLOR=#ac00a9]1[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#0000ff]WEnd[/COLOR] [/B][/SIZE]
[SIZE=3][B] [COLOR=Navy]GUICtrlCreateX[/COLOR] ([COLOR=RoyalBlue]text[/COLOR],[COLOR=DarkGreen]left[/COLOR],[COLOR=Blue]top[/COLOR],[COLOR=DarkOrange]width[/COLOR],[COLOR=Magenta]height[/COLOR])[/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUICreate[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"FileScanner"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]7[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUICtrlCreateInput[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"FilePath"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]8[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]2[/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]5[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]2[/COLOR][COLOR=#ac00a9]1[/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUISetState[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#0000ff]While[/COLOR] [COLOR=#ac00a9]1[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#0000ff]WEnd[/COLOR] [/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUICreate[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"FileScanner"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]7[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUICtrlCreateInput[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"FilePath"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]8[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]2[/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]5[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]2[/COLOR][COLOR=#ac00a9]1[/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUICtrlCreateButTon[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"..."[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]2[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]2[/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]4[/COLOR][COLOR=#ac00a9]3[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]2[/COLOR][COLOR=#ac00a9]1[/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#000090]GUISetState[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ff0000])[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#0000ff]While[/COLOR] [COLOR=#ac00a9]1[/COLOR][/B][/SIZE]
[SIZE=3][B] [COLOR=#0000ff]WEnd[/COLOR] [/B][/SIZE]
[SIZE=3][B] الذي سأكتبه في الدرس القادم[/B][/SIZE]
يا مراحب .. حياك ..عودا حميدا يالغالي
ashalshaikh
نورتنا
وعسى ما تكرر الغيبة !