تصوير زمينه

[aty7070]

سلام
من ميخوام واسه پروژم تصوير پس زمينه بزارم اما توي دلفي فقط ميشه رنگ پس زمينه رو عوض کرد.مي خوام دکمه هاي فرمم هرکدوم يه تصوير داشته باشن و حتي برچسب ها تصوير داشته باشن.
ممنون اگه راهنماييم کنيد.

[hamedvahedi]

فکر می کنم زیاد در برنامه نویسی سخت گیری نکن و دنبال راه های ساده باش. مثلا برای تصویر زمینه گرچه میشه مستقیم روی فرم عکس نمايش داد اما میشه یه کنترل 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]

واقعا از راهنماييتون ممنونم.خيلي کدهاي خوبي بود.مرسي..........