doppelt unterstreichen

[G M]

Hi!

Ich möchte wenn ein bestimmter ComboBox-Eintrag ausgewählt wird die schrift eines Labels doppelt unterstreichen.

das mit der ComboBox habe ich schon

Delphi-Quellcode:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
 if ComboBox1.ItemIndex = 1 then
   //hier weiß ich nicht weiter (ich stelle mir das so vor: Label1.Font ...)
end;