AGB  ·  Datenschutz  ·  Impressum  







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

Form ohne SystemMenuBar

Ein Thema von DarkItachi · begonnen am 18. Sep 2010 · letzter Beitrag vom 18. Sep 2010
Antwort Antwort
DarkItachi

Registriert seit: 28. Dez 2009
Ort: Berlin
130 Beiträge
 
Delphi 2007 Enterprise
 
#1

Form ohne SystemMenuBar

  Alt 18. Sep 2010, 18:52
Hallöchen!

Ich habe es früher mal geschafft aber ich weiß nicht mehr wie und die Projectdateien habe ich leider auch nicht mehr..

Aber das Fenster kann man auf den Screenshot sehen!!
Weiß jemand, wie man das anstellen könnt? Ich weiß es nicht mehr

Aber der Rahmen ist mir besonders wichtig..
Eigentlich müsste man nur die TitleBar ausblenden und den Rahmen oben noch behalten...
Ich glaube so habe ich das früher auch gemacht...

Hat jemand eine Idee?

Thx IM VORHINEIN
Angehängte Grafiken
Dateityp: png s1.png (9,0 KB, 54x aufgerufen)
Developer since age 14
  Mit Zitat antworten Zitat
Satty67

Registriert seit: 24. Feb 2007
Ort: Baden
1.566 Beiträge
 
Delphi 2007 Professional
 
#2

AW: Form ohne SystemMenuBar

  Alt 18. Sep 2010, 18:57
Ich hab's mal ungetestet aus einem alten Projekt ausgeschnitten:
SetwindowLong(Handle,GWL_Style,GetwindowLong(handle, GWL_style) and not Ws_caption); .
Müsste fast das sein, was du suchst?
  Mit Zitat antworten Zitat
DarkItachi

Registriert seit: 28. Dez 2009
Ort: Berlin
130 Beiträge
 
Delphi 2007 Enterprise
 
#3

AW: Form ohne SystemMenuBar

  Alt 18. Sep 2010, 19:45
Leider nicht...
Das ist ja als wenn ich einfach Borderstyle auf bsNone schalte...
Aber ich will ja den Rahmen beibehalten..
Aber trotzdem nach wie vor thx
Developer since age 14
  Mit Zitat antworten Zitat
Bernerbaer
(Gast)

n/a Beiträge
 
#4

AW: Form ohne SystemMenuBar

  Alt 18. Sep 2010, 20:17
Siehe hier
  Mit Zitat antworten Zitat
Benutzerbild von Björn Ole
Björn Ole

Registriert seit: 11. Jul 2008
166 Beiträge
 
Delphi XE Professional
 
#5

AW: Form ohne SystemMenuBar

  Alt 18. Sep 2010, 20:18
Oder hier
  Mit Zitat antworten Zitat
DarkItachi

Registriert seit: 28. Dez 2009
Ort: Berlin
130 Beiträge
 
Delphi 2007 Enterprise
 
#6

AW: Form ohne SystemMenuBar

  Alt 18. Sep 2010, 21:55
Ganz dolles Danke!

Ich stelle es nochmal rein, falls jemand anderes etwas Funktionierendes sucht:
Delphi-Quellcode:
type
  TForm1 = class(TForm)
    // ...
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    procedure CreateParams(var Params: TCreateParams); override;
    procedure WMNCHitTest(var Message: TWMNCHitTest); message WM_NCHITTEST;
  end;

// ...

implementation

// ...

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := WS_POPUP or WS_THICKFRAME;
  Params.ExStyle := WS_EX_TOOLWINDOW;
end;

procedure TForm1.WMNCHitTest(var Message: TWMNCHitTest);
begin
  inherited;
  Message.Result := htClient;
end;
Developer since age 14
  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 10:07 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz