Formularinhalte bei OnResize neu skalieren

[hathor]

Panel1.align:= alClient;


ListView-Spaltenbreite

Delphi-Quellcode:

procedure TF_Liste.FormResize(Sender: TObject);
begin
  eAS.ResizeAll;
  ListView1.Column[0].Width:= ColumnHeaderWidth;
  ListView1.Column[1].Width:= ColumnHeaderWidth;
end;

[LokutusvB]

Danke für Mühe!

Panel1.align=alClient hatte ich bereits probiert. Mit meinem letzten Text meinte ich, egal auf was die Eigenschaft laign steht, es hat keine Auswirkung auf die enthaltenen Komponenten.

Was genau meinst du mit ListView-Spaltenbreite? Der Trick mit der Headerbreite ist ein guter Trick, den muß ich mir merken. Das ist sicher auf den Inhalt der anderen Zeilen abbildbar unter Berücksichtigung einer maximalen Spaltenbreite. Bliebe noch das PageControl. Da habe ich noch immer keine passende Idee, außer das ganze immer wieder per Code nachzubessern.

Zusatz:
Bei einem Speed- oder Bit-Button wird leider das Bild nicht mit skaliert. Gibt es vielleicht auch dafür eine Lösung?

[hathor]

Wirf diese Zeile raus: Screen.SetPixelsPerInch(240);

Button-Komponente suchen, die das kann...

oder manuell: Mehrere BMP im Unterordner in versch. Größen

Delphi-Quellcode:

var   bmp1 : TBitmap; //globale var
...
procedure TF_Liste.FormCreate(Sender: TObject);
begin
bmp1 := TBitmap.Create; { Bitmap erzeugen }
...
procedure TF_Liste.FormShow(Sender: TObject);
begin
   bmp1.LoadFromFile('battery30.bmp'); //beispiel 30pixel
end;
...
procedure TF_Liste.FormResize(Sender: TObject);
begin
  eAS.ResizeAll;
  ListView1.Column[0].Width:= ColumnHeaderWidth;
  ListView1.Column[1].Width:= ColumnHeaderWidth;
   bmp1.LoadFromFile('batteryxx.bmp'); //beispiel xx-pixel - abhängig von der Form-Size
  SpeedButton1.Glyph:= bmp1;
end;