Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi In Combobox Fonts anzeigen (https://www.delphipraxis.net/10986-combobox-fonts-anzeigen.html)

Die Muhkuh 29. Okt 2003 09:27


In Combobox Fonts anzeigen
 
hiho,

ihr kennt doch alle Word oder?

Da kann man ja auch in einer Combobox die schrift art auswählen!
Das hab ich jetzt vor mit Delphi zu machen(die Combobox)! Nur wie?
Hab schon ziemlich viel ausprobiert aber es geht einfach nicht!

Spider

sakura 29. Okt 2003 09:58

Re: In Combobox Fonts anzeigen
 
Das ist recht einfach:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1.Items.Assign(Screen.Fonts);
end;
...:cat:...

MathiasSimmack 29. Okt 2003 10:42

Re: In Combobox Fonts anzeigen
 
Ich würde mich nicht wundern, wenn der eigentliche Wunsch ist, auch die Gestaltung so zu machen wie in Word. Sprich: das die Schriften auch in sich selbst gezeichnet sind; also "Arial" in der Schriftart Arial, usw.

Angeblich soll´s eine Demo von Borland geben, die so etwas mit einer Listbox macht. Muss ich selbst mal gucken. Also, @Spider, bitte mal deine Demo-Verzeichnisse von Delphi durchwühlen.

Die Muhkuh 29. Okt 2003 13:19

Re: In Combobox Fonts anzeigen
 
Zitat:

Zitat von sakura
Das ist recht einfach:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1.Items.Assign(Screen.Fonts);
end;
...:cat:...

Hast recht Katze! *zur Belohnung ein Lerckerli geb*

Bin da echt draufgekommen!


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:06 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz