Einzelnen Beitrag anzeigen

Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.295 Beiträge
 
Delphi 12 Athens
 
#12

AW: TCombobox -> Height verändert sich nach dem Create

  Alt 26. Apr 2019, 17:31
Zitat:
Ähm. Wie schon gesagt. Ich setzte die Höhe gar nicht. Ich möchte ja gerne die 21 haben. Diese wird mir im OnCreate aber nicht gegeben, sondern 25.
Was verstehst du nicht?

FontName = Tahoma
Fontsize = 8

weise der Combo den Font zu und deine Höhe ist 21.
Die höhe kannst du NUR durch das setzen des Fonts beeinflussen.

gruss
Ich verstehe schon was du meinst. Das ändert aber nichts am verhalten.

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  fCombobox:=TCombobox.create(Self);
  fCombobox.Parent := self;
  fCombobox.Font := self.Font;
  fCombobox.text := Inttostr(fCombobox.height);
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  fCombobox.text := Inttostr(fCombobox.height);
end;
Ich habe im OnCreate den Font der Form zugewiesen. es bleibt aber im OnCreate bei 25. Erst wenn der Button gedrückt wird, dann erhalte ich 21. Zweischenzeitlich wird nichts geändert.
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de
  Mit Zitat antworten Zitat