NapsTer

Professional

IvKn1.png



بدون اطالة اتفضلوا الكود


var
PicPath: String;
begin
PicPath := 'مسار الصورة';
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, pChar(PicPath), SPIF_SENDCHANGE)
end;


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

المواضيع المشابهة


رد: شرح تغيير خلفية سطح المكتب بالدلفي

بارك الله فيك
كود لا غنى عنه
شكرا لك يا بطل
:)
 


رد: شرح تغيير خلفية سطح المكتب بالدلفي

ما شاء الله وين ما أروح ألقاك الله يديمك زخر للمنتدى .. ~
 


رد: شرح تغيير خلفية سطح المكتب بالدلفي

شكرا الك ياغالي..انا اطلب طلب انوووو تغير خلفية البرنامج..

وياريت لو حدا يسأعدني
;)
 

عودة
أعلى