Viele Webseiten verfügen über Hintergrundmuster, die die Seite auffälliger aussehen lassen. Sie können diese Art von Formularen jedoch auch in Delphi entwerfen. Eine Methode, die mir sofort in den Sinn kommt, besteht darin, die Bildkomponente zu verwenden und dann ein Bild anzugeben. Dies ist natürlich machbar, aber ein BMP-Bild, das das gesamte Formular ausfüllen kann, nimmt viel Speicherplatz in Anspruch, was sich nicht lohnt. Am besten laden Sie einfach ein sehr kleines BMP-Bild herunter und fügen es über das gesamte Formular ein.
Anstelle der Bildkomponente wird die Bitmap-Komponente zum Herunterladen einer kleinen Bitmap verwendet. Fügen Sie die Variablendefinition zum öffentlichen Abschnitt hinzu: Bitmap: TBitmap; generieren Sie dann dieses Objekt im OnCreate-Ereignis des Formulars. Der Code lautet wie folgt:
PROzedur TForm1.FormCreate(Sender:Tobject);
begin Bitmap:=TBitmap.Create;??
Bitmap.LoadFormFile('1.bmp');//Bilddatei 1.bmp ist nur 1 KB groß??
Ende;
Der dritte Schritt besteht darin, das Bitmap-Muster im OnPaint-Ereignis des Formulars in das gesamte Formular einzufügen. Fügen Sie den folgenden Code hinzu:??procedure TForm1.FormPaint(Sender:Tobject)var x,y:integer;begin y:=0;while y beginne X:=0; während X Beginnen Sie mit cancas.Draw(X,Y,Bitmap);?? X:=X+Bitmap.Width; Ende; Y:=Y+Bitmap.Heigth; end;end;?Ich habe vergessen, das Bitmap-Objekt im OnDestory-Ereignis des Formulars freizugeben. Spezifischer Code: Bitmap.Free; Okay, wenn das Formular angezeigt wird, hat es einen Hintergrund wie eine Webseite und nimmt nicht viel Speicherplatz ein.