فلاش بلاير من برمجتي

[I_Tiger]

قمت ببرمجة هذا البريمج الصغير واتمنى ان ينال اعجابكم ;)

انتظر ملاحظاتكم وانتقاداتكم"البنائة" :d

[AL-MOB4RM3G]

اخي الكريم ,, حميل جدا,, بارك الله فيك,,

برنامج روعة ما شاء الله عليك,بعد الإنتقادات :eek:
استخدم ال Unicode بارك الله فيك,, حتى يتمكن المستخدم لجهاز غير العربي ان يقرأ,,, مثل حالي انا ;)
2, لا اعلم ان كانت سهلا ام صعبة لكن اقولها لك على كل حال,,, امكانية تقديم الفلاس او ارجاعه بستخدام ال ProgressBar
3, سكين جميل للبرنامج قد يكون مناسبا :rolleyes:
هذا ما عندي والله تعلى اعلم,,
بارك الله فيك اخي الكريم على هذا البرنامج الرآئع,, وتم التجربة على دروس الدورة لدلفي العرب :cool:
والسلام عليكم,,

[I_Tiger]

شكرا على النصائح اخي المبرمج "عرفت انك اول من سيرد على المشاركة"
جاري التطوير...

[anasdrak]

الله يعطيك العافية على هذا المجهود بس ممكن مكون الفلاش

[I_Tiger]

المكون موجود في دلفاي اصلا فقط قم بتثبيته

[I_Tiger]

السلام عليكم
ببساطة اخذت بنصائح الاخ المبرمج و هذه هي النتيجة
- قمت بتهجيره الى 2009 و اعتقد ان هذا يحل مسالة اليونوكود
- قمت باظافة التحكم بشدة الصوت
- قمت باظافة وضع الشاشة الكاملة
- وبعض التحسينات الطفيفة
ولكن
-لم اضف سكين لان المكون الذي عندي تجريبي
-و الاهم من ذلك لم استطع ربط التراك بار :confused:
المرفق بأول مشاركة

[AL-MOB4RM3G]

ما شاء الله اخي تايجر على هذه التحسينات,,, :)
اسعدتني كثيرا,, و افضل شئ هو في هذه التحسينات ,,, الهجرة الى 2009 :rolleyes:
اخي الكريم,, انا حقيقة لا اعلم لكن قلت اقتراح لعله يفيد,, وننتظر الإفادة من الإخوة المحترفين,,,
ماذا عن هذا الكود او ما شابه ذلك ؟
ShockwaveFlash1.CurrentFrame:= ProgressBar1.Position;
لم يسبق لي ان تعمالت مع هذا المكون,, لكن كما قلت,, مجرّد اقتراح والله المستعان,,
كان هناك شئ آخر اود ان اقوله,, لكن نسيته والله المستعان,,
بارك الله فيك

[I_Tiger]

شكرا اخي اعرف الكود مسبقا مشكلتي في اي حدث اظعه

[anasdrak]

الحقيقة يا أخي بحثت في كل النسخ العندي 7 و6 و2006 ولم أجد هذا المكون ممكن تحمله من فضلك

[I_Tiger]

ساشرح لك كيف تقوم بذلك في النسخة 7 بسم الله
اذهب الى كمبوننتس ثم الى امبورت اكتف اكس كنترولس ثم اختر من القائمة TShockwaveFlash ثم ثبت عادي
وتجد المكون مع مكونات الActiveX

[anasdrak]

شكرا جزيلا أخي الكريم تم الأمر بنجاح

[I_Tiger]

السلام عليكم
قمت ببعض التطويرات اتمنا ان تعجبكم
- سكين
- تصغير الى جوار الساعة
- حل جزئي لمشكلة التراك بار
المرفق بأول مشاركة
اتمنى ان اكون قد افدتكم ، سلام

[AL-MOB4RM3G]

نعم اخي تايجر,, ما شاء الله,, تحسينات مقبولة و جيدة وجميلة,,
بقي آمر وآحد فقت ,,, اتدري ما هو ؟
اعرضه في الأسوق,, وانا ادعو لك ان شاء الله :p
بارك الله فيك اخي الكريم

[I_Tiger]

شكرا لك اخي على النصائح و التشجيع :rolleyes:
فنشاطك الكبير يثري المنتدى واصل و انوي الخير و ان شاء الله يجازيك الله خير

[ZMXXX]

private
{ Déclarations privées }
procedure WMDropFiles(var Msg: TWMDropFiles); message WM_DROPFILES;
procedure PerformFileOpen(const AFileName: string);
procedure TForm1.PerformFileOpen(const AFileName: string);
begin
flshplyr1.LoadMovie(0, AFileName);
trckbr1.Max:=flshplyr1.TotalFrames;
Form1.Caption:=AFileName;
end;
procedure TForm1.WMDropFiles(var Msg: TWMDropFiles);
var
CFileName: array[0..MAX_PATH] of Char;
begin
try
if DragQueryFile(Msg.Drop, 0, CFileName, MAX_PATH) > 0 then
begin
PerformFileOpen(CFileName);
Msg.Result := 0;
end;
finally
DragFinish(Msg.Drop);
end;
end;

[issamdnn]

ممكن برنامج الفلاش بلير وإصداره على جهازك..
فال ocx الخاص بالفلاش بلير الموجود على جهازي أصداره أقدم.
وفقك الله.

[I_Tiger]

Shockwave_Player_11_5_1_601