Statusbar bleibt nicht alBottom

[messie]

Moin,

ich habe ein Fenster, in dem verschiedene Panels und ein Statusbar angeordnet sind. Das Panel über dem Statusbar ist auch alBottom, weil es beim Resize dieselbe Höhe behalten soll.
Der Statusbar wird gelegentlich über dem Panel gezeichnet. Das hängt von der Auflösung und dem Format des Bildschirms und anderen unbekannten Parametern ab (Mondphasen? Rohölpreise?) ab.
Ich habe bisher noch keine andere Lösung gefunden, das benachbarte Panel anders zu platzieren.

Hat jemand ein wenig Klebstoff für meinen Statusbar?

Danke, Messie

[Super_Chemiker]

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  statusbar1.Align := albottom;
  panel1.Align := albottom;
  panel1.Align := alnone;
end;

sollte gehen

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  statusbar1.Align := albottom;
  panel1.width := clientwidth;
  panel1.Height := wasauchimmergewünschtist;
  panel1.Top := clientheight - panel1.Height - statusbar1.Height;
end;

sollte auch gehen, vorrausgesetzt ich hab die frage verstanden!

[khh]

Zitat von Super_Chemiker:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  statusbar1.Align := albottom;
  panel1.Align := albottom;
  panel1.Align := alnone;
end;

kannst mir erkären weshalb du panel1.align 2mal setzt ?

[Super_Chemiker]

@ khh
damit wird erst das panel nach unten geschoben und dann wird es wieder losgelassen, damit die Statusbar nach unten darf!
ob es ohne alnone setzen geht weiß ich nicht!

[khh]

Zitat von Super_Chemiker:

@ khh
damit wird erst das panel nach unten geschoben und dann wird es wieder losgelassen, damit die Statusbar nach unten darf!
ob es ohne alnone setzen geht weiß ich nicht!

das kommt mir aber spanisch vor

[mkinzler]

Wenn du es auf alNone setzt, ist es wohl klar das es nicht mehr alBottom ist

[khh]

Zitat von mkinzler:

Wenn du es auf alNone setzt, ist es wohl klar das es nicht mehr alBottom ist

deshalb denke ich, dass die erste ausrichtung überflüssig ist, oder irre ich da?

[mkinzler]

Er möchte ja eine Anordnung am unteren Rand. Vielleicht umgekehrt

[khh]

Zitat von mkinzler:

Er möchte ja eine Anordnung am unteren Rand. Vielleicht umgekehrt

mh, ich bin immer davon ausgegangen, dass diese Zuweisungen zur Laufzeit den Wert der variablen "einstellen".
Wenn ich das recht verstehe, meint er aber mit zwei Zuweisungen werden beim create beide ausgeführt!.

also erst alBottom und dann alNone

das kommt mir spanisch vor.

[messie]

Zitat von Super_Chemiker:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  statusbar1.Align := albottom;
  panel1.Align := albottom;
  panel1.Align := alnone;
end;

Mit dieser Variante wird panel1 vom darüberliegenden Panel überschrieben(ist also weg, weil das alclient ist)

Zitat von Super_Chemiker:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  statusbar1.Align := albottom;
  panel1.width := clientwidth;
  panel1.Height := wasauchimmergewünschtist;
  panel1.Top := clientheight - panel1.Height - statusbar1.Height;
end;

geht auch nich'. Ich hab' da auch schon eine Menge probiert...selbst die Reihenfolge in der dfm-Datei habe ich vertauscht, auch das geht nicht. Wie gesagt, es ist nicht immer so. Da muss es noch einen anderen Einfluss geben.

Grüße, Messie