หน้าเว็บจำนวนมากมีรูปแบบพื้นหลังที่ทำให้หน้าเว็บดูสะดุดตามากขึ้น อย่างไรก็ตาม คุณยังสามารถออกแบบแบบฟอร์มประเภทนี้ใน Delphi ได้อีกด้วย วิธีหนึ่งที่นึกถึงได้ทันทีคือใช้ส่วนประกอบรูปภาพแล้วระบุรูปภาพ แน่นอนว่าเป็นไปได้ แต่อิมเมจ BMP ที่สามารถกรอกแบบฟอร์มทั้งหมดจะใช้พื้นที่หน่วยความจำมาก ซึ่งไม่คุ้มค่า วิธีที่ดีที่สุดคือเพียงดาวน์โหลดอิมเมจ BMP ขนาดเล็กมากแล้ววางลงในแบบฟอร์มทั้งหมด
แทนที่จะใช้คอมโพเนนต์รูปภาพ คอมโพเนนต์บิตแมปจะใช้ในการดาวน์โหลดบิตแมปขนาดเล็ก เพิ่มคำจำกัดความของตัวแปรลงในส่วนสาธารณะ: บิตแมป: TBitmap จากนั้นสร้างวัตถุนี้ในเหตุการณ์ OnCreate ของแบบฟอร์ม รหัสจะเป็นดังนี้:
PROcedure TForm1.FormCreate (ผู้ส่ง: Tobject);
เริ่มบิตแมป:=TBitmap.Create;??
Bitmap.LoadFormFile('1.bmp');//ไฟล์รูปภาพ 1.bmp มีขนาดเพียง 1KB เท่านั้น??
จบ;
ขั้นตอนที่สามคือการวางรูปแบบบิตแมปลงบนแบบฟอร์มทั้งหมดในเหตุการณ์ OnPaint ของแบบฟอร์ม เพิ่มรหัสต่อไปนี้:??ขั้นตอน TForm1.FormPaint(Sender:Tobject)var x,y:integer;begin y:=0; While y เริ่ม X:=0; ในขณะที่ X เริ่ม cancas.Draw(X,Y,Bitmap);?? X:=X+บิตแมป.ความกว้าง; จบ; Y:=Y+บิตแมป.ความสูง; สิ้นสุด;สิ้นสุด;?ลืมที่จะปล่อยวัตถุบิตแมปในเหตุการณ์ OnDestory ของแบบฟอร์ม รหัสเฉพาะ: Bitmap.Free; เอาล่ะ เมื่อแสดงแบบฟอร์ม มันจะมีพื้นหลังเหมือนหน้าเว็บ และจะไม่กินพื้นที่หน่วยความจำมากนัก