Form Höhe wird grösser, wenn das Programm startet

[Delphiturbo]

Hallo

das Problem ich verwende auch einen Code, der die Titelleiste ausblendet (OnCreate)
Also es liegt bestimmt daran
aber was muss ich tun, damit die Formhöhe sich nicht ändert beim Starten ?
Oder muss ich einfach im Event OnCreate die gewünschte Höhe eingeben ?

[edit=SirThornberry]Grammatik und Rechtschreibung verbessert - Ausrufezeichen aus Titel entfernt - Mfg, SirThornberry[/edit]

[mkinzler]

Inwiefern ändert sich die Höhe? Wie blendest du aus?

[Fussball-Robby]

Wie machst du denn die Titelleiste weg? Mit BorderStyle := bsNone? das kannst du auch im OI einstellen. Wie groß ist deine Form denn? Wenn sie sehr klein ist, wird sie automatisch auf eine Mindestgröße geändert.

[Delphiturbo]

Zitat:

Zitat von mkinzler

Inwiefern ändert sich die Höhe? Wie blendest du aus?

So :

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Handle, GWL_STYLE, GetWindowLong(Handle, GWL_STYLE)
and not WS_CAPTION);
ClientHeight:=Height;

[BenjaminH]

ClientHeight ist die Höhe des Innenbereichs des Formulars(Also ohne Rahmen und Titelleiste.
Height dagegen ist die Höhe über die gesamte Form(Rahmen+Form+Titelleiste) und damit zwangsläufig größer als ClientHeight, wenn du jetzt ClientHeight den größeren Wert Height zuweißt, wird die Forminnenhöhe größer. Der Rahmen muss entsprechend verändert werden und auch die gesamtgröße ist größer.

[Delphiturbo]

:thumb:
ich habe folgendes gemacht :

Delphi-Quellcode:

ClientHeight:=Height-30;

[Cyberbob]

Und was machst du wenn die Titelleiste eine andere höhe hat?

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  oldheight : Integer;
begin
  oldheight := ClientHeight;
  SetWindowLong(Handle, GWL_STYLE, GetWindowLong(Handle, GWL_STYLE) and not WS_CAPTION);
  ClientHeight:=oldheight;
end;

[Delphiturbo]

keine Ahnung ! Ich werde deinen Code besser verwenden .

Danke! :drunken:

[rollstuhlfahrer]

Zitat:

Zitat von Delphiturbo

keine Ahnung ! Ich werde deinen Code besser verwenden .

Danke! :drunken:

mal wieder keine Eigeninitiative, oder??

rollstuhlfahrer

[DP-Maintenance]

Dieses Thema wurde von "Phoenix" von "Sonstige Fragen zu Delphi" nach "VCL / WinForms / Controls" verschoben.
TForm.. ab nach Kompos

[SirThornberry]

Zitat:

Zitat von rollstuhlfahrer

Zitat:

Zitat von Delphiturbo

keine Ahnung ! Ich werde deinen Code besser verwenden .

Danke! :drunken:

mal wieder keine Eigeninitiative, oder??

rollstuhlfahrer

:gruebel: Das muss ich jetzt nicht verstehen, oder? Warum sollte er seinen Code nehmen oder einen nur halb so guten versuchen auf die Beine zu stellen wenn der Beste gepostet wurde? Nur weil er nicht selbst drauf kam? Deine Kritik in allen Ehren aber diesmal ist sie doch etwas übertrieben (aus meiner persönlichen Sicht).

[Nuclear-Ping]

Naja, ist halt einfach wieder mal so ein typisches "Keine Ahnung, was ich und der Code da macht, aber es ist für mich zweckdienlich, also nehm ich ihn, statt selbst zu untersuchen, warum das nicht so geht wie es soll."

Und zwei Tage später schreibt er dann einen neuen Thread, weil er das Fenster ohne Titelleiste nicht verschieben kann. Und dann schreibt er wieder ein paar Tage später einen Thread, weil er das mit der Passwort-Form nicht hinkriegt, ... usw. usw. usw.

[Sherlock]

Zum Thema: Gibt es eine Ignore-Funktion, mit der man Threads, die bestimmte Teilnehmer eröffnet haben nicht sieht?

Sherlock

[SirThornberry]

Bleibt bitte beim Thema und werdet nicht beleidigend.
Wenn ihr die Beiträge eines Nutzers nicht mögt ignoriert diese doche einfach und wenn ihr eine solche Funktion wirklich wünscht, eröffnet bitte ein neues Thema in der entsprechenden Rubrik!

Bei allem Verständnis :mrgreen: Aber irgendwann hat jemand das gleiche Problem wie der aktuelle Fragesteller und findet dann über die Suchfunktion nichts brauchbares weil das Thema durch OT zupflüggt und unbrauchbar geworden ist.