Einzelnen Beitrag anzeigen

Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.268 Beiträge
 
Delphi 11 Alexandria
 
#18

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

  Alt 26. Apr 2019, 18:18
Halt. Ich dachte der Code im Anhang ist der gleiche, wie im Text, der als Delphicode angegeben ist.

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1 := TComboBox.Create(Self);
  ComboBox1.Parent := self;
  ComboBox1.Top := 10;
  ComboBox1.Left := 10;
  ComboBox1.Font := TFont.Create;
  ComboBox1.Font.Name := 'Tahoma';
  ComboBox1.Font.Size := 8;
  ComboBox1.Height := 21;
  ComboBox1.Width := 200;
  ComboBox1.Text := Inttostr(ComboBox1.height);
end;
Dort setzt du die Höhe. Deshalb mein vorheriger Post.

Habe den Code im Pic mir noch mal angeschaut. Der ist anders.

Die Sache mit

winapi.windows.GetClientRect(fCombobox.Handle, rc); Funktioniert.

Prima. Danke dir für deine Mühe.


Edit: Unsere beiden letzten Posts haben sich überschnitten.
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de

Geändert von bernau (26. Apr 2019 um 18:26 Uhr)
  Mit Zitat antworten Zitat