Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi ComboBox und Fonts (https://www.delphipraxis.net/91950-combobox-und-fonts.html)

Blackheart 12. Mai 2007 17:54

Re: ComboBox und Fonts
 
Du solltest Dich schon mit der Komponente auseinandersetzen wenn Du Sie Installierst.
Ich hab jetzt kein Bock diese extra auszuprobieren.
Hier ein Beispiel für eine normale Combobox, Ich schätze mal das die FontBox in etwa genauso funktioniert.
Delphi-Quellcode:
implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  SynMemo1.Font.Name:='Arial';
  ComboBox1.Items:= Screen.Fonts;
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  SynMemo1.Font.Name:=ComboBox1.Items[ComboBox1.ItemIndex];
end;

[edit=Matze]Aufgrund eines Darstellungsfehlers neu abgesendet. Mfg, Matze[/edit]

Keldorn 12. Mai 2007 18:53

Re: ComboBox und Fonts
 
Zitat:

Zitat von Tommy1988
weil bisher noch keiner danach gefragt hat.

zwei mann haben gesagt, daß sie die Komponente nicht kennen ;-)

Außerdem:
Zitat:

Zitat von Keldorn
Ist Fontbox.Font wirklich der ausgewählte Font oder nur der Font, mit dem die Komponente dargestellt wird?

Fontbox.Font ist nicht der Font, den du ausgewählt hast! Das ist der ganze normale Font, mit dem die Komponente dargestellt wird und nix weiter. Wenn du es so machts, wie Blackheart geschrieben hat (comboboxonchange) geht es. Das hätte Dir aber auch auffallen müssen, daß du immer die gleiche Schriftart setzt und nie die ausgewählte.

Mfg Frank

Störtebeker 1. Aug 2007 16:03

Re: ComboBox und Fonts
 
hi, blackheart.

Ist ne gute idee, dein vorschlag. Gibt es die möglichkeit den Code so zu ändern, dass nur der Teil des textes geändert wird, der auch makiert ist?

Zitat:

procedure TForm1.FormCreate(Sender: TObject);
begin
SynMemo1.Font.Name:='Arial';
ComboBox1.Items:= Screen.Fonts;
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
SynMemo1.Font.Name:=ComboBox1.Items[ComboBox1.ItemIndex];
end;
weil bei diesem code wird der ganze text geändert. Und da du schon so nett warst, und das mit den Fonts erklärt hast, könntest du das auch mit der Schriftgröße. Weil bei den Sachen, die ich hier im Forum dazu gefunden habe, habe ich zu dem Thema noch weniger verstanden, als davor.


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:56 Uhr.
Seite 2 von 2     12   

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