亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 編程 > Delphi > 正文

第一次接觸Delphi

2019-11-18 18:02:28
字體:
來源:轉載
供稿:網友
 

第一次上Delphi感覺還是不錯的,就是自己的英文太差了,里面的很多控件都不認識。

初次上機  自己胡亂寫了一個可以改變窗體背景色程序。

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button4: TButton;
    Button5: TButton;
    Button6: TButton;
    Button3: TButton;
    PRocedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
    procedure Button5Click(Sender: TObject);
    procedure Button6Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Caption:='紅色背景';     //窗口標題
form1.Color:=clred                     //窗體顏色改變
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
form1.Caption:='白色背景';
form1.Color:=clwhite
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
form1.Caption:='藍色背景';
form1.Color:=clblue
end;

procedure TForm1.Button5Click(Sender: TObject);
begin
form1.Caption:='黃色背景';
form1.Color:=clyellow
end;

procedure TForm1.Button6Click(Sender: TObject);
begin
form1.Caption:='綠色背景';
form1.Color:=clgreen
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
form1.Close
end;

end.

第一次用它編了個小代碼,心里還是挺高興的。


上一篇:偶的第二個Delphi程序

下一篇:Delphi中用ICMP探測遠程主機是否存活

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
學習交流
熱門圖片

新聞熱點

疑難解答

圖片精選

網友關注

亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
久久久亚洲影院你懂的| 国产日产欧美a一级在线| 国产在线精品自拍| 国产精品视频不卡| 精品国产一区二区三区久久久狼| 欧美床上激情在线观看| 久久久久久国产免费| 久久久久久久亚洲精品| 国产69精品久久久久99| 国产91成人在在线播放| 国产一区二区三区免费视频| 精品高清美女精品国产区| 青青a在线精品免费观看| 欧美另类99xxxxx| 久热国产精品视频| 伊人伊成久久人综合网站| 一区二区中文字幕| 久久久久久久久国产| 国产精品一久久香蕉国产线看观看| 欧美激情视频一区二区| 欧美日韩中文字幕| 欧美与黑人午夜性猛交久久久| 日韩在线观看免费全集电视剧网站| 亚洲欧美精品在线| 亚洲精品国偷自产在线99热| 日本午夜人人精品| 欧美xxxx做受欧美.88| 97精品视频在线观看| 久久亚洲私人国产精品va| 91久久精品国产91久久| 中文亚洲视频在线| 高清一区二区三区日本久| 日韩在线中文字| 91香蕉嫩草影院入口| 久久99热精品这里久久精品| 亚洲欧美激情一区| 亚洲图片欧洲图片av| 久热在线中文字幕色999舞| 黄色一区二区在线观看| 欧美午夜影院在线视频| 日韩精品高清视频| 欧美日韩福利在线观看| 日韩精品免费在线观看| 韩曰欧美视频免费观看| 成人h视频在线观看播放| 久久久视频精品| 日韩视频精品在线| 亚洲色图色老头| 久久久亚洲精品视频| 亚洲娇小xxxx欧美娇小| 国产精品免费一区二区三区都可以| 91日韩在线播放| 欧美日韩激情视频8区| 91情侣偷在线精品国产| 国产精品久久久久久久久久尿| 日韩资源在线观看| 精品国产福利在线| 国产欧美一区二区三区在线看| 乱亲女秽乱长久久久| 57pao成人永久免费视频| 国产女人18毛片水18精品| 国产精品中文在线| 亚洲午夜性刺激影院| 国产精品久久色| 亚洲精品国产精品自产a区红杏吧| 亚洲欧美日韩视频一区| 久久久久久国产精品三级玉女聊斋| 国产va免费精品高清在线观看| 国产成人中文字幕| 91精品国产乱码久久久久久蜜臀| 欧美一区二区大胆人体摄影专业网站| 日韩av网址在线观看| 亚洲欧美一区二区激情| 久久久久久久久久亚洲| 性色av一区二区三区在线观看| 搡老女人一区二区三区视频tv| 精品久久久久国产| 久国内精品在线| 亚洲成人av中文字幕| 亚洲欧美日韩区| 欧美黑人巨大精品一区二区| 色婷婷久久一区二区| 91啪国产在线| 国产亚洲一区精品| 欧亚精品在线观看| 亚洲最大中文字幕| 成人国产在线激情| 热久久免费视频精品| 最近2019好看的中文字幕免费| 国产色视频一区| 国产ts一区二区| 青青青国产精品一区二区| 国产精品久久久久aaaa九色| 久久久久久久久久久免费| 亚洲激情中文字幕| 91中文精品字幕在线视频| 91老司机精品视频| 国产精品国语对白| 97在线观看视频| 在线亚洲欧美视频| 色爱av美腿丝袜综合粉嫩av| 国产欧美精品va在线观看| 国产成+人+综合+亚洲欧美丁香花| 久久精品2019中文字幕| 欧美成人h版在线观看| 亚洲偷熟乱区亚洲香蕉av| 欧美激情a∨在线视频播放| 国产91热爆ts人妖在线| 久久久久久久久久久免费精品| 日韩欧美综合在线视频| 青草青草久热精品视频在线观看| 91日本视频在线| 国产精品久久久久久久7电影| 欧美孕妇孕交黑巨大网站| 国产精品成人av性教育| 欧美激情精品久久久久久蜜臀| 国产精品久久久久aaaa九色| 国产精品白嫩初高中害羞小美女| 欧美国产精品人人做人人爱| 91视频九色网站| 亚洲视频在线免费观看| 国产一区二中文字幕在线看| 97在线视频一区| 欧美国产欧美亚洲国产日韩mv天天看完整| 国产精品视频精品视频| 538国产精品视频一区二区| 国内伊人久久久久久网站视频| 在线看日韩av| 欧美电影在线播放| 欧美在线观看网址综合| 精品在线欧美视频| 亚洲区一区二区| 亚洲激情国产精品| 久久久这里只有精品视频| 亚洲人成亚洲人成在线观看| 亚洲成色777777在线观看影院| 国产午夜精品理论片a级探花| 日韩中文字幕网站| 日韩精品有码在线观看| 这里只有精品在线播放| 欧美天天综合色影久久精品| 日韩欧美国产黄色| 成人国产亚洲精品a区天堂华泰| 国产亚洲美女久久| 亚洲欧美日韩在线高清直播| 91高清免费在线观看| 色婷婷成人综合| 亚洲aⅴ男人的天堂在线观看| 亚洲精品女av网站| 91精品视频专区| 日韩中文理论片| 欧美日产国产成人免费图片| 亚洲人成在线一二| 最近2019年好看中文字幕视频| 欧美日韩高清在线观看| 午夜免费在线观看精品视频| 精品福利视频导航| 91亚洲精品一区| 97成人超碰免| 欧美成人国产va精品日本一级| 国产+成+人+亚洲欧洲| 欧美大片在线看| 欧美综合国产精品久久丁香| 亚洲欧美色图片|