BMP als Formularhintergrund

[AlexanderBrade]

Wie definiere ih eine BMP-Datei als Hintergund für mein Formular?

[blawen]

Nimm z.B. von den JVCL-Komponenten das JvFormWallpaper.

[taaktaak]

... oder selber machen
Stichwort: WM_ERASEBKGND nutzen

[AlexanderBrade]

Kann mir jemand eine Art Pseudocode liefern? Zumindest einen Ansatz, denn bisherige Hilfen/Stichwörter liefern weder in der Hilfe noch über Google brauchbare Resultate.

[Die Muhkuh]

Zitat:

Zitat von AlexanderBrade

Das ist nich wahr, allerdings musst du konkrete Probleme aufzeigen und nicht daher kommen und einen fertigen Anatz verlangen!

:zwinker:

[haentschman]

Zitat:

Nimm z.B. von den JVCL-Komponenten das JvFormWallpaper.

...ist ein Ansatz und noch dazu völlig unkompliziert.

:hi:

[blawen]

Zitat:

Zitat von AlexanderBrade

Kann mir jemand eine Art Pseudocode liefern? Zumindest einen Ansatz, denn bisherige Hilfen/Stichwörter liefern weder in der Hilfe noch über Google brauchbare Resultate.

Schaue Dich mal hier um.

Wenn Du damit nichts anfangen kannst, empfehle ich Dir die JVCL-Komponente (s.o.)

[taaktaak]

Delphi-Quellcode:

type
TForm1 = class(TForm)
  Image1: TImage;
  private
    procedure WMEraseBkgnd (var Msg:TMessage); message WM_ERASEBKGND;
//..

procedure TForm1.WMEraseBkGnd;
var Rect    : TRect;
    MyBrush : THandle;
begin
  Rect.Left  :=0;
  Rect.Top   :=0;
  Rect.Right :=ClientWidth;
  Rect.Bottom:=ClientHeight;

  MyBrush:=CreatePatternBrush(Image1.Picture.Bitmap.Handle);
  FillRect(Canvas.Handle,Rect,MyBrush);
  DeleteObject(MyBrush);

  Msg.Result:=0
end;

Nur getippt, nicht getestet.

Anmerkung: Dein Bild muss in Image1 verfügbar sein. Zum Füllen von Hintergründen werden aber besser kleine Bitmaps verwendet, die mehrfach nebeneinander eingeblendet werden können, deren Muster also zueinander passen müssen. Ob der Vorschlag für ein großes Bild taugt, probiere bitte selbst aus.

[AlexanderBrade]

Das ganze soll darauf hinauslaufen, dass ich mein Formularlayout optisch etwas aufpolieren kann. Das mit den Skin-Komponenten ist mir zu undurchsichtig, außerdem kosten die alle was(jedes Mal wenn ich compilieren will blockiert er aufgrund der "Demo-Version").
So dachte ich einfach ein Bitmap-File im Hintergrund und es sähe auch schon ganz gut aus...
siehe folgendem Link:
http://www.delphipraxis.net/internal...kinkomponenten

Wie kriegt man so etwas hin?(siehe Bild im vorigen Link) Das scheint so einfach zu sein!

[taaktaak]

Funktioniert mein Vorschlag nicht?