| Zitat: |
| Richtig, FontDialog.Font.Style ist der Typ TFontStyles. Ich möchte aber diese Information von FontDialog.Font.Style in eine Variabel zwischenspeichern. Wenn ich eine Variabel als String deklariere, z.B. |
Und wenn du das in einer Variablen zwischenspeichern willst, deklariere die Variable doch einfach auch als TFontStyles:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
| var
a: TFontStyles;
begin
FontDialog1.Execute;
a := FontDialog1.Font.Style;
end; |
klappt einwandfrei.
| Zitat: |
| Habe gerade nochmals gesucht und eine Lösung von smiegel gefunden. Damit funktioniert es einwandfrei. |
Meinst du die hier?
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| var fs:Integer;
...
fs:=Integer(TFontStyle(Font.Style));
...
...
Font.Style:=TFontStyles(TFontStyle(fs));
... |
Abgesehen davon, dass eine Deklaration von fs als Byte vielleicht platzsparender wäre, ist das doch etwas umständlich. Im Speicher sieht das afaik bei beiden gleich aus...
Narses