Announcement

Collapse
No announcement yet.

Transparentes Hintergrundbild auf dem MainForm

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Transparentes Hintergrundbild auf dem MainForm

    Hallo,

    Umg.: Delphi 6 Ent. UP2

    Ich möchte gerne auf dem MainForm einer MDI-Anwendung ein tranparentes Hintergrundbild platzieren. Zu diesem Zweck habe ich ein TImage auf das Formular getan und es rechtsbündig ausgerichtet. Leider tritt aber zur Laufzeit folgender Effekt auf: Öffnet man ein MDI-Child, dann wird es teilweise vom Bild überdeckt. Der Bereich, der vom TImage eingenommen wird, verhält sich wie ein Fenster, das permanent im Vordergrund ist.

    Wie kann ich auf das Hauptformular ein transparentes Bild bekommen, ohne dass es unschöne Seiteneffekte gibt?

    Danke<br>Stephan

  • #2
    Wir haben das Problem umschifft. Wir haben das Hintergrundbild in ein MDIForm gepackt:<p>
    <pre>
    procedure TFormBackground.FormCreate(Sender: TObject);
    begin
    SetWindowLong(Handle, GWL_Style, GetWindowLong(Handle, GWL_Style) AND NOT (WS_Caption OR WS_THICKFRAME));
    Height := HTMLabelLogo.Height;
    Width := HTMLabelLogo.Width - 1;
    Refresh;
    end;

    procedure TFormBackground.HTMLabelLogoClick(Sender: TObject);
    begin
    SendToBack;
    end;</pre>
    Tut schon seit langer Zeit prächtig <p>
    Schöne Grüße, Mario Noac
    Schöne Grüße, Mario

    Comment

    Working...
    X