وجدة هذا الكود ولكن كيف يعمل بشكل صحيح تحت البوتون
ارجو المساعدة وفقكم الله
المشاركة الأولى لي
عفوا لقد نسيت وضع الكود هذا هو
FlashWindow (h : hWnd; bInvert : boolean);
وجدة هذا الكود ولكن كيف يعمل بشكل صحيح تحت البوتون
ارجو المساعدة وفقكم الله
المشاركة الأولى لي
عفوا لقد نسيت وضع الكود هذا هو
FlashWindow (h : hWnd; bInvert : boolean);
أنقر مرتين على الزر ,
ثم أضف :
FlashWindow (Form1.Handle ,true);
FlashWindow هي دالة WinApi تقوم بلفت إنتباه المستعمل للتطبيق: و ذلك بتغير لون Caption للفورم من Active إلى No Aactive
..
ضع Button على Form1ثم أنقر عليه مرتين. ديلفي سيقوم بإنشاء الحدث OnClick لButton1 اوتوماتيكيا ثم تضيف إلي
FlashWindow (handle,true);//i'ts your winApi ffunction
ستحصل على
procedure TForm1.Button1Click(Sender: TObject); begin FlashWindow (handle,true); end;
تم تعديل هذه المشاركة بواسطة ikossan في 11 يناير 2005 في 22:04
سأتغيب عن المنتدى وستكون لي زيارات خفيفة بين الحين و الحين
يا صاحب الهم إن الهم منفرج.....................أبشر بخير فإن الفارج الله.
اليأس يقطع أحيانا بصاحبه..........................لا تيأس فإن الكافي الله.
الله يحدث بعد العسر ميسرة.........................لا تفزعن فإن الصانع الله.
إذا بليت فثق بالله وارض به...................فإن الذي يكشف البلوى هو الله.
و الله ما لك غير الله من أحد.......................فحسبك الله في كل لك الله
أخوكم مراد
مشكور اخوي عروة والاخ ikossan
هذا الموضوع مغلق.