AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Panel-Rahmen soll Window-Rahmen gleichen

Ein Thema von TStringlist · begonnen am 3. Jan 2004 · letzter Beitrag vom 4. Jan 2004
Antwort Antwort
TStringlist

Registriert seit: 1. Dez 2003
360 Beiträge
 
Turbo Delphi für Win32
 
#1

Panel-Rahmen soll Window-Rahmen gleichen

  Alt 3. Jan 2004, 20:13
Hi all, ich hätte da mal eine kleine Frage bezüglich der Umrandung eines Panels, und zwar:

Wie müssen hier bei einem Panel die BevelInner/Outer-Properties oder eventuell die Border-Eigenschaften gewählt werden, um dass man dabei den gleichen schwarz-weiß-grau-Farbeffekte bekommt wie er bei einem Windowrahmen üblich ist? Und bei einem Window ist das:

äußerste Pixelschicht, links u. oben: Grau
äußerste Pixelschicht, rechts u. unten: Schwarz
zweite Pixelschicht, links u. oben: Weiß
zweite Pixelschicht, rechts u. unten: DunkelGrau

..oder wie kann man diesen Effekt sonst erreichen?
(eventuell indem ich den Rand direkt aufs Panel draufmale? (...nur wie ging das nochmal schnell?))

Thanks schonmal jetzte
  Mit Zitat antworten Zitat
Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Panel-Rahmen soll Window-Rahmen gleichen

  Alt 3. Jan 2004, 20:17
Schau Dir mal den Beitrag inkl. Source Code an, damit solltest Du weiterkommen

http://www.delphipraxis.net/internal...=113119#113119

......
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat
TStringlist

Registriert seit: 1. Dez 2003
360 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: Panel-Rahmen soll Window-Rahmen gleichen

  Alt 3. Jan 2004, 20:42
Thx, aber die Tasten hatte ich schon. Es ging mir jetzt speziell nur um die graphische Umrandung des Panels, also um die zwei äußersten Pixelschalen. Das wird wahrscheinlich mit den von mir oben erwähnten Eigenschaften nicht gehen, oder? Wenn nein, sollte man den Rahmen dann direkt aufs Panel draufmalen, oder wäre es besser, pro Linie die ich da haben will, dort dann ein entsprechendes Image abzulegen?
  Mit Zitat antworten Zitat
Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
 
Delphi 11 Alexandria
 
#4

Re: Panel-Rahmen soll Window-Rahmen gleichen

  Alt 4. Jan 2004, 10:29
War es schon, Du musst nur ein wenig den Code anpassen. Ich sagte ja auch nicht, daß dort die Lösung sei, sondern der Ansatz

Delphi-Quellcode:
procedure TPanelEx.CreateParams(var Params: TCreateParams);
begin
  inherited;
  // ETWAS WENIGER STYLE
  Params.Style := Params.Style or WS_THICKFRAME;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  with TPanelEx.Create(Self) do
  begin
    Left := 50;
    Top := 50;
    Width := 200;
    Height := 300;
    Parent := Self;
    // ETWAS WENIGER BEVEL
    BevelInner := bvNone;
    BevelOuter := bvNone;
  end;
end;
......
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat
TStringlist

Registriert seit: 1. Dez 2003
360 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Panel-Rahmen soll Window-Rahmen gleichen

  Alt 4. Jan 2004, 12:37
ja klappt, thx!

Und WS_THICKFRAME ist jetzt wahrscheinlich auch der normale Style für diesen DIN-Rahmen eines Formulars? Supi auch diese CreateParams bzw. TCreateParams, war mir bisher alles völlig unbekannt.

(ich hatte den Rahmen inzwischen zwar schon aufs Panel draufgemalt -- mittels eines Canvas-Objektes und des umgebogenen WindowProc-Pointers des Panels, um mich an sein WM_Paint-Ereignis dranhängen zu können -- aber dieses ist natürlich jetzt trotzdem wieder viel umständlicher als deine Lösung.)

cool !
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:37 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz