Avatar billede rasmuskrigslund Nybegynder
14. august 2002 - 21:50 Der er 4 kommentarer og
1 løsning

ændring af font style

Har lavet et program med en menu hvor font style kan ændres i, dog kan jeg kun få den til at ændre til fed (font.style:=[fsbold]) og kursiv (font.style:=[fsitalic]) Jeg mangler en kommando til at gøre skriften både fed og kursiv, og ligeledes en kommando til at gøre skriften normal igen!
Avatar billede nico26 Nybegynder
14. august 2002 - 21:54 #1
font.style := [fsBold, fsItalic];
Avatar billede rasmuskrigslund Nybegynder
14. august 2002 - 21:57 #2
Tak.. Nu mangler jeg bare den til at gøre skriften normal igen! Nogen der kan hjælpe mig her?
Avatar billede nico26 Nybegynder
14. august 2002 - 21:57 #3
font.style := [];
Avatar billede nico26 Nybegynder
14. august 2002 - 22:02 #4
TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut);
TFontStyles = set of TFontStyle;

du kan kombinere alle fire fontstyles

f.eks. kursiv og understreget: font.style := [fsItalic, fsUnderline];
Avatar billede assassin Juniormester
15. august 2002 - 09:44 #5
Hvis du har en checkbox til understreg, kan det gøres på følgende måde:

procedure TForm1.CheckBoxUnderstregClick(Sender: TObject);
begin
  if CheckBox1.checked then Font.Style:= Font.Style+[fsUnderline]
                      else Font.Style:= Font.Style-[fsUnderline];
end;

og lignende kode for fed
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester