ComboBox und Fonts

[Tommy1988]

Zitat:

Hai Tommy,
mache für die Frage bitte einen eigenen Thread auf.
Sie hat nur bedingt etwas mit Comboboxen zu tun.

Danke.

Hallo,
Wie kann ich das Font eines Memos über eine ComboBox steuern?
Es gibt da eine Komponente, FontBox nennt die sich.

Das Problem ws ich aber habe ist:
Ich kann das Font jeweils nur 1xMal ändern.

Delphi-Quellcode:

Delphi-Quellcode:

// FontBox:
Memo1.Font := FontBox1.Font;

[Keldorn]

Hallo

du möchtest für bestimmte Textpassagen den Font ändern? das geht in einem Memo nicht, nimm ein richedit und gugg dir die Selatrributes an.

Mfg Frank

[Tommy1988]

Um genauer zu sein, es ist ein SynMemo.

Dort gibt es die Mehtoden SynMemo1.Font und
SynMemo1.Font.Style
Ich schaffe es das Font 1xMal zu ändern, aber weiter geht das nicht, ich weis nicht wieso.

[Keldorn]

was verstehst du unter

Zitat:

Font 1xMal zu ändern, aber weiter geht das nicht

unter weiter geht das nicht kann ich mir nix vorstellen.

Ein synmemo und die Fontbox kenn ich nicht.
Ist Fontbox.Font wirklich der ausgewählte Font oder nur der Font, mit dem die Komponente dargestellt wird?
Was passiert, wenn du statt

Delphi-Quellcode:

Memo1.Font := FontBox1.Font;

mal

Delphi-Quellcode:

Memo1.Font.assign(FontBox1.Font);

verwendest, wobei die Komponente so gebaut sein sollte, das dieser Aufruf bei der direkten Zuweisung intern sowieso so aufgerufen wird.

[Blackheart]

Was helfen würde, wäre wenn Du etwas mehr ausholst mit dem was Du vor hast.(Dies und jenes soll passieren wenn...)
Ansonsten ist es doch mehr oder weniger ein Raten.
Wenn Du nicht Standart Komponenten verwendest kann kaum einer wissen was Du meinst.
Bei SynEdit sind Diverse Demos mit dabei, die eigentlich alles erklären.

[Tommy1988]

Wenn ich

Delphi-Quellcode:

Memo1.Font.assign(FontBox1.Font);

verwende passiert das selbe.

Bei erster Auswahl, Font geändert, bei wiederholter Auswahl, nix.

BlackHeart:
Ich möchte wie bei Word über eine ComboBox den Font ändern können.
DASS man ihn in einem SynMemo ändern kann, zeigt, dass die erste Auwahl True ist.

Achso, und bei den Demos:
Habe alle durchgesehen, ein solches mit Font-Wechseln war nicht dabei.

[Blackheart]

FontBox kenn Ich auch nicht, mal geraten SynMemo1.Font.Name

[Tommy1988]

Das habe ich alles leider schon durch. 1xMal wird das von geändrt, weitere Male nicht.

Gibt es da keine allgemeine Antwort, wie das z.B. Word funktioniert?
Klar, die haben das in C geschrieben, glaube ich, aber in Delphi muss sowas doch auch klappen.

[Keldorn]

warum verräts du nicht einfach mal, woher du diese fontbox hast?

[Tommy1988]

weil bisher noch keiner danach gefragt hat.

Im Anhang eine ZIP Date mit der Komponente

EDIT!

Ok, ich habe eine neue Idee.. WENN die Idee aufgeht, poste ich euch meinen Quellcode..
geht sie NICHT auf.. dann auch,.
Dann seht ihr wenigstens, dass ich es versucht habe.

Könnte jetzt etwas dauern. ich melde mich gleich wieder

[Blackheart]

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]

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]

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.