ورود

نسخه کامل مشاهده نسخه کامل : تصوير زمينه



aty7070
23-11-2010, 07:43
سلام
من ميخوام واسه پروژم تصوير پس زمينه بزارم اما توي دلفي فقط ميشه رنگ پس زمينه رو عوض کرد.مي خوام دکمه هاي فرمم هرکدوم يه تصوير داشته باشن و حتي برچسب ها تصوير داشته باشن.
ممنون اگه راهنماييم کنيد.:20:

hamedvahedi
24-11-2010, 10:13
فکر می کنم زیاد در برنامه نویسی سخت گیری نکن و دنبال راه های ساده باش. مثلا برای تصویر زمینه گرچه میشه مستقیم روی فرم عکس نمايش داد اما میشه یه کنترل TImage هم روی فرم گذاشت و اون رو SendToBack کرد و هر تصویري که ميخواي رو بهش Assign کني.
براي دکمه ها هم ميشه از کنترل TBitBtn , TSpeedBtn استفاده کرد. اينها ميتونند آیکون يا عکس رو در کنال تکست بپذيرند يا اينکه از کنترل هاي TMS که کل دکمه رو بصورت تصوير استفاده ميکنه استفاده کني.
اما يک شيوه کلي هم هست که ميشه هر کنترلي رو با تصوير دلخواه، نمايش بدي.


procedure TForm1.FormCreate(Sender: TObject);
begin
backgroundImage := TBitmap.Create;
backgroundImage.LoadFromFile('MyPic.bmp');
end;

procedure TForm1.FormPaint(Sender: TObject);
begin
Canvas.Draw( 0, 0, backgroundImage );
end;

aty7070
02-12-2010, 20:56
واقعا از راهنماييتون ممنونم.خيلي کدهاي خوبي بود.مرسي..........