Falsche Fensterbreite wenn resizeable



  • Hallo zusammen,

    ich hab ein Prob, dessen Lösung wohl ziemlich banal sein wird, aber ich glaube ich seh gerade den Wald vor lauter Bäumen nicht.

    Ich habe eine Form (File-Selektion), die ich resizeable haben möchte. Resizen kann ich und der Inhalt passt sich schon wie gewünscht an, wenn ich resize (Anchors...). Was mich in den Wahnsinn treibt:
    Stell ich bssingle, hat das Fenster die definierte Höhe und Breite - dann kann ich aber nicht resizen. Stelle ich auf bsresizable, klappt zwar alles, das Fenster ist beim Programmstart aber viel zu breit und die Höhe stimmt wohl auch nicht.

    (oder hat das vielleicht was mit meinem 15,4er Monitor zu tun?)

    Hoffe ihr könnt mir den Wald zeigen. Danke für jeden Tip!

    Robert

    Mein dmf-File (gekürzt) sieht so aus:

    object DirListBoxForm: TDirListBoxForm
      Left = 200
      Top = 150
      Width = 200
      Height = 646
      BorderWidth = 4
      Caption = 'Quelldaten-Verzeichnis'
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      FormStyle = fsMDIChild
      OldCreateOrder = False
      PrintScale = poNone
      Scaled = False
      Visible = True
      DesignSize = (
        184
        600)
      PixelsPerInch = 96
      TextHeight = 13
      object Label1: TLabel
       ...
      end
      object Label2: TLabel
     ...
      end
      object DriveComboBox1: TDriveComboBox
     ...
      end
      object UpDown1: TUpDown
        ...
      end
      object Editselfiles: TEdit
        ...
      end
      object DirectoryListBox1: TDirectoryListBox
       ...
      end
      object FileListBox1: TFileListBox
       ...
      end
    end
    


  • Hat denn niemand eine Idee 🙄


Anmelden zum Antworten