Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Combobox vergrößern

    Delphi
    by Tpercon, 19. Sep 2003
  Dann mußt du erstmal mit TextWidth in einer Schleife die Größe des breitesten Eintrages holen.
  
  procedure TForm1.ComboBox1DropDown(Sender: TObject);
  var i, textwidth: integer;
  begin
  textwidth := ComboBox1.Width;
  for i := 0 to ComboBox1.Items.Count - 1 do begin
  if ComboBox1.Canvas.TextWidth(ComboBox1.Items.Strings) > textwidth then begin
  textwidth :=...