وبنفس الوقت من له في Graphics والتصميم يمكنه ان يشاركنا في تصمصم الواجهة بموضوع
تصميم واجهة لبرنامج مشغل ملفات صوتية مجاني ومفتوح المصدر - N0player
[مشروع] برنامج مشغل ملفات صوتية - N0player
رائج
اخي maosalah اولا السلام عليكم و رحمة الله وبركاته :
ثانيا لدي سؤال اليك - بدون ان تنزعج مني - :
هل تعرف الفرق بين
Path := ExtractFilePath(Application.ExeName)+N0_CONFFILE;
وهذا
Path := ExtractFilePath(ParamStr(0))+ N0_CONFFILE;
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
اقتباسعند عمل Drag & Drop ملف على الملف التنفيذي N0Player.exe يتم تنفيذ البرنامج وتشغيل الملف تلقائيا
يعني حتى ولو كان البرنامج ليس في حالة التنفيذ . اعني لم يشتغل بعد
هل هذا هو المطلوب
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
mohfa كتب:يعني حتى ولو كان البرنامج ليس في حالة التنفيذ . اعني لم يشتغل بعدهل هذا هو المطلوب
البرنامج لايعمل
يتم سحب وافلات ملف على الملف التنفيذي
كوني استخدم دلفي 5 اكثر من دلفي 7 قمت بتعدلات طفيفة وعملت له compile
ملاحظة هذا خارج الموضوع فقط لاظهار ان حجم الملف التنفيذي ينقص من 458 الى 395
النقطة 19
اخي عبد العزيز عندما نقوم ب سحب وافلات من مجلد اي ملف تتم قرائته ؟؟؟ // في المرفق البداية بالاول
Try // -------------- is draged File(s) can be played if lstName.Count <>0 then begin lstName.ItemIndex :=0; // Play 1st Draged File // If the Being Played File is the Last One than Play return to the First FilePath :=LstPath.Items.Strings[lstName.Itemindex]; PlayFile();// Yes end; Except // No end;
---------------
وفي حالة playlist.m3u لم يكن فارغ فماذا نفعل ؟؟؟؟
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
اقتباسوافلات من مجلد اي ملف تتم قرائته ؟؟؟
الاول
اقتباسوفي حالة playlist.m3u لم يكن فارغ فماذا نفعل ؟؟؟؟
عندنا خيارين
اما نهملها ونظيف ما تم افلاته من ملفات
اما نسترجعها وضيف عليها الملفات التي تم افلاتها
ملاحظة
يجب اضافة ذلك ايضا للنقطة السابقة
سحب وافلات اكثر من ملف او مجلد على قائمة التشغيل
اقتباسملاحظةيجب اضافة ذلك ايضا للنقطة السابقة
سحب وافلات اكثر من ملف او مجلد على قائمة التشغيل
لم فهم
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
البرنامج منفذ (يعمل)
نسحب مجموعة من الملفات او مجلد ونقوم بافلاتهل على قائمة التشغيل
Drag n Drop السابقة 18
ولكن هذه الخاصية متوفرة في النقطة 18 يمكن سحب اكثرمن ملف او مجلد لقائمة التشغيل
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
القي نظرة :
لقد اضفت هذا الإجراء :
//////////////////Play draged files ////////////////// Procedure PlayDragedFile();
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
نعم/ هي تعمل
ولم تكن في النسخة التي حملتها من قبل
نمر للتالي
النقطة 20 (بسيطة)
عدم امكانية تنفيذ اكثر من نسخة من N0Player في نفس الوثت
Allow only one instance of a program at one time
أخيرا لقيت حاجة اعملها.اقتباسعدم امكانية تنفيذ اكثر من نسخة من N0Player في نفس الوقت
استخدمت Mutex لا باس نكمل
النقطة 21 (بسيطة)
امكانية اظهار واخفاء قائمة التشغيل PlayList وهنا لدينا خيارين
1- الابقاء على القائمة في نفس Form واخفائها مع تغيير قياسات الForm حسب الحجم الجديد عند الاخفاء/الاظهار
2- انشاء Form جديدة تنقل اليها قائمة التشغيل واظهارها/اخفائها عند الحاجة
اخي عبد العزيز اظن انني سوف انسحب من المشروع وهذا لان دلفي لم يعد يشتغل عندي فكل Crash في :angry: Crash . او سوف اذهب لاشتري لي نسخة جديدة .
والسلام عليكم :angry:
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
اخي عبدالعزيز سوف اقوم بتصدير ال N0Player كله الى مكون من نوع TObject تكون فيه كل الخصائص ومستقبلا سيكون هكذا
N0Player:=TN0Player.Create();
فما رائك
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
ممكن لكن ما فائدته !
لاننا في تلك الحالة سنستعمل مكون واحد فقط
واصلا يوجد مكون مثله قام به احد من كوريا :lol:
يعني C'est pas la pein ولا كيفاه .
اظن انه هكذا يكون تطويره وإستعماله بسيط و فعال .
وانا من وجهة نظري البرمجية اظن ان N0Player ك TObject احسن بكثير من ملاء Form 1 بمئات الاكواد و و ....
على كل حال إذا لم تشاء ذلك فلامشكل
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
إن شاء الله .
وهذاسوف ياخذ بعض الوقت لان فيه X,Y,Z و ...
إذا سوف نكمل الشروع كما هو ....
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
X,Y,Z :blink:
هذا 2D وليس 3D
هناك مكون جاهز لكن انشاء واحد خاص بالمشروع احسن B)
توضيح حول اخر نقطة
بها خيارين (طريقتين) يكفي القيام بواحد فقط (وليس اللإثنين)
النقطة 21 :lol:
عزيزي :
لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .
فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم
*****
النقطة 22 (بسيطة)
اضافة خيار اخفاء القائمة لN0Player.Ini
ان كانت القائمة ظاهرة عند ايقاف البرنامج وتنفيذية مرة اخرى تظهر
ان كانت مخفية عند ايقاف البرنامج وتنفيذه مرة اخرى لاتظهر