Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
9. Apr 2007
Also ich wollte die Infobox mit einem einstellbaren Schatten ausstatten. Und, vielleicht wisst ihrs, die Box ist an sich ein Panel und das Fenster dazu ist :D der Desktop :mrgreen: Also nichts mit Minimieren.
Vielleicht issses wichtig, aber wenn man den Schatten wieder einschaltet, dass dann der alte Schatten wieder weg ist :)
Ich habe mal eine Demo angehangen...
"Button1" = Schatten...
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
9. Apr 2007
Danke... Aber:
PS: Ich habe es mal mit xor probiert ;) Aber mit dem komplieren ^^
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
9. Apr 2007
Ich habe folgenden Code aus dem SwissDelphicenter benutzt um ein Fenster ein Schatten zu versehen:
procedure TInfoBox.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
if not (csDesigning in ComponentState) then
begin
Params.WindowClass.style := Params.WindowClass.style or CS_DROPSHADOW;
end;
end;
(siehe SwissDelphiCenter)