百科知识

电脑/网络

用一个DelphiDelphi实现渐变窗口背景

2018-03-27 05:11:18唐***
Delphi 实现渐变窗口背景用一个DelphiDelphi实现渐变窗口背景：创建一个应用程序,在Form1的OnPaint事件里面添加如下一段代码:procedureTForm1.Form?

最佳回答

  • 创建一个应用程序,在Form1的OnPaint事件里面添加如下一段代码:procedureTForm1.FormPaint( ); ,y:real;begindy:=clientheight/256;y:=0;fori:= lor:=$00000000+i*$10000; llrect(rect(0,round(y),clientwidth,round(y+dy)));y:=y+dy;end;end;
    2018-03-27 06:21:08
  • 通过下列程序实现双击窗体的OnPaint事件,然后编写如下程序:procedureTForm1.FormPaint( ); ,y:real;begindy:=clientheight/256;y:=0;fori:= lor:=$00000000+i*$10000; llrect(rect(0,round(y),clientwidth,round(y+dy)));y:=y+dy;end;end;
    2018-03-27 11:21:08
    • 很赞哦！ (6)

    相关文章