Label1.Font.Style:=Label1.Font.Style+[fsunderline];//加下划线
Label1.Font.Style:=Label1.Font.Style-[fsunderline];//去掉下划线
转载于:https://www.cnblogs.com/martian6125/archive/2007/01/22/9631538.html
Label1.Font.Style:=Label1.Font.Style+[fsunderline];//加下划线
Label1.Font.Style:=Label1.Font.Style-[fsunderline];//去掉下划线
转载于:https://www.cnblogs.com/martian6125/archive/2007/01/22/9631538.html