网站首页 | 站长论坛 | 免费空间申请 | 站长下载 | 站长博客 | 商业主机 | 免费空间推荐站点 | 免费空间排行榜 | 我们知道
发新话题
打印

[灌水] [10-10] 网管学编程,Delphi在线教程

[10-10] 网管学编程,Delphi在线教程

原本是想在这里写一部关于未来人回到现代的科幻小说,后来一想也许爱看小说的网管并不那么多,且看完后除了一点想像,什么也没有。并不会为我们网管阶层的清苦生活带来任何改变,除了浪费了宝贵的时间。
     很多网管都在抱怨工资低、工作没前途,希望自己能在最短的时间内转行。去干份工资高,更有前途的工作。不说编程是多么有前途,但可以说它的含金量,以及技术成份一定比网管高。我民经网管十一年了,个人觉得,网管无非是组网,更新游戏,下载电影,插插内存的活儿。给一个高中生,培训他三天保证就可以上岗工作了。谈何技术高?
为什么是delphi?
      我不想夸它如何的好,但至少认为它是功能强大,思想主流,最容易上手的语言。
      学习C++时间太长了,不是谁都有那么大决心花那么时间去学习的。且几乎每一步都要直接和windows API
打交道,而微软把API库设计是如太平洋般的庞大,而一个正常人能记住的只有洗脸盆那么多。且C++免不了和指针打交道。不!应当一定要和指针打交道。而指针是那么的千变万化,又是那么的不稳定。很多初学者还没有入门就被可怕的指针吓死在门口了。
再说C#以及所有的.net语言。其实它和DELPHI十分的像,方便,易学,易用,十分理想的语言结构,但是很可惜是建立在.net框架上的。不太合适于开发win32位程序,因为它第一次启动实在太慢了。还要受到.net框架版本的约束,希望在未来windows版本中可以解决这个问题。
      还有很不想说的VB。它几乎包含了C++的所有缺点,却没有C++的功能强大的优点。而且是一门思想过时的
面向过程的语言。
      其实编程这事情不在于工具如何,一些老程序员,常通C++,java,VB,Delphi等好几门语言,在他们看来
之间除了关键定和一些库文件外,基本是一样的。一通百通。
工具:
      Delphi7,全球用户最多,公认最稳定,且成熟,插件多,支持最广,资料最多。
      delphi2009是最新版了,IDE用起来最方便,智能很多。更重要的是对中文支持很好,英文不佳者也可以
用中文编程啦!
      金山快怿,查读音,找字意。编程要记的东西还是有的,明其意知其音,便容易记了。

第一个程序:
      首先在组件面板里拖一个TButton到窗口上双击它,在弹出的代码窗的Begin下面输入:


procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('Hello world');//只有这一句是我们要手动输入的。
end;

      按下F9,点一下按钮,是不是看到了效果了?当然Hello world你可以换成任何你想说的话。但一定要包
含在单引号内。其在此句代码最后面应当有一个分号,表示这句代码的结束。
      ShowMessage()是一个函数,意思是弹出一个提示框,其参数'Hello world'是提示框的内容。

第二个程序:
     有了上面的程序,我们来做一个复杂一点的。
     在先前的基础上,再放两个TEdit控件到窗口上,双击按钮Button1报把先前的代码改为:


procedure TForm1.Button1Click(Sender: TObject); //自动生成的
var  //手动输入
str:string; //手动输入
begin  //自动生成的
str:=edit1.Text+edit2.Text; //手动输入
form1.Caption:=str;  //手动输入
end;  //自动生成的

     F9运行,当你在两个文本框中输入任何字符,再点按扭button1。会发现窗口的标题被改变了。
     Str:string是定义一个变量,变量的意思和初中代数里的x y差不多。Str是变量名,String是文件类型。
注意中间有一个冒号,最后有一个分号。
     str:=edit1.Text+edit2.Text;中edit1 edit2是两个文体框对象,text是它们的内容的属性。这句话的意
思是把两个文本框的内容相加后放到变量str里。
      Form1是主窗口的对象,Caption是它的标题属性。此句是把str的值,给主窗口的标题。于是窗口的标题
被修改了。
本章要点:
1、Delphi的阈值符是:=这和其它语言的=是不一样的。
2、每一句代码线结束都要有一个分号,标注结束。
3、变量的定义都要在begin以前,var符以下。
4、delphi都是从begin开始,到end结束。


第二章:值、变量、运算
Delphi有很多的值类型,在这里我只讲三种
string  字符型       所有的字符型都要包含在单引号内
integer  整数型     整数这个不用我说吧,初中都学过的。
BooL    逻辑型      逻辑型只有两个可用的值true[是]false[否]

string的只有加法运算。就是把字符连接很好理解。
integer是整数型,包含正负值都可以。可以+[加] -[减] *[乘] div[除(PS:这里是整除,余数会被掉丢。)] mod[余除(PS:只会得到余数)]
bool只有一个not的运算符,取反。

变量:
变量前面提到过,不想多讲。只想说明一个变量命名的规则。包含字母数字下划线并只可以以字母和下划线开头。
如:
_WM_chr     StrShow     D3332
等是合法的。
这些都是不合法的。
34sst     #445     st\re      uuw box
这里说明,如果你用的是delphi2009版本的话,可以用汉字做为变量

几乎所有的编程语言在运算时都是变量在左边,计算公式在右边。如:
x:=3+1;
X:=X+1;
也就是说编程里的运算是单向的,从右向左的。这和代数里的运算有一点不一样。
且不可以连等。如:
x:=2+5:=Y;
这样的格式是错误的。如果需要请写成两行,如:
x:=2+5;
Y:=X;

运算顺序法规和数学里一样。先括号,再乘除,再加减。(本来还有一些移位等高级运算,不常用到。我就不讲了。)

这里给大家一个string类型转到integer类型的函数:StrToInt(P:String):integer;
和一个相反的函数IntToStr(P:integer):string;
使用例子如下:

  var
    str:string;
    ints:integer;
begin
  str:='33';
  ints:=StrToInt(str)+22;
  ShowMessage(IntToStr(ints));
end;

  --------------------------------------------------------------------------------------
第三章 过程 方法 和条件。
过程和方法在有些的书里叫函数。C++里也叫函数。他们都是提供一些参数的运算集。
如我们初中学过的圆周率函数 面积=∏*半径2
Delphi里可以写做

Function 求圆面积(半径:double):double
Var
Pi:double=3.1415926
Begin
求圆面积:=Pi * (半径 * 半径);
End;

当你在写程序时只用这样调用就可以了
var
面积:double;
begin
面积:=求圆面积(22);
end;

这样做的好处是当你有一大堆同样的事情只有某几个变量不一样的时候就可以做成一个函数的形式。这样代码清淅,易于修改。且便于重复调用。

过程和方法基本是同一个东西,唯一的区别在于过程没有返回值,方法有返回值。

方法用:Function为关键字  过程用: procedure做关键字。

现在来讲条件。
在这里我只讲三个最常用的。平时如果用到再去讲吧。
If () then      //这个很好了解:如果()括号里是一个为逻辑型值的条件
   Begin
     //在这里完成条件为真时的语句下面的语句将被乎略。
   End      //注意这里没有表示结束的分号
  Else
   Begin
      //如果给的条件为假就执行这里语句,上面的语句将被乎略。
   End;
PS:begin和end的作用可以看成C++里的花括号。他们一定要是成对的出现。其之间就是一个代码块。

For(I:=1 to 10) do  /
Begin //语句块
End;
这是一个循环。I是一个变量,1是初始值,10是最后值。每循环一次I的值递加1至到I=10就退出循环执行语句块后面的代码

while (I<10) do
begin
//语句块
end;
这个循环这表示,当I的值小于10时就执行语句块。I的变量要先定义好。并给于它一个初始值。

本章结束时给大一个实用的函数winexec(命令:string,模式:integer);
这是一个执行外部程序的函数。命令参数为一个字符串型,模式参数为0时为隐藏执行,为1时为显示执行。
如:
var
str:string;
begin
str:=’iexplorer.exe -k www.baidu.com’;
winexec(str,1);
end;
执行这个为过程会全屏用IE打开百度的网站,当然如果你想把str的值改为format D:就会格式化D盘。


---------------------------------------------------------------------------------------------
第四章 类
面向对象化编程中类是一个核心内容。可以说不会类的运用,你就不会编程。
我们先来打一个比方:
一辆车,
有四个轮子,方向盘,驾驶室等装备。
有启动,刹车,停止等动作。
那么车就是一个类。
四个轮子,方向盘,驾驶室等装备就是这个类的成员。
启动,刹车,停止就是这个类的过程,有的书称为方法、函数等。

Delphi是这样定义一个类的,(我这里用的2009版才能支持的中文变量方便学者理解,如果你用的7版请改成对应的英文字符。):

  车=class          //车,在这里是类的名称
   public                     //修饰符,这里表示公有,是任何地方可以调用。当然还有其它修符,私有等,有兴趣自己可以去翻翻书。自己写点小程序。只用公有就可以了。
轮子,方向盘,驾驶室:string;      //这就是三个为字符型的成员
procedure 启动();                         //这个类的过程,
procedure 停止();   
   endl
//定义了两个类的过程切没有告诉CPU如何去完成这个过程。所以下面还要完成两个过程.

Procedure 车.启动()
Begin 轮子:=’转动’;
endl

Procedure 车. 停止()
Begin 轮子:=’停止’;
endl

到这里这个类就完成了。但是这个类本身并不能运行。需要实例化以后才能执行。

Var 我的车:车;                  //这里给车定义一个变量。
begin
我的车:=车.Create();           //让变量实例化。记住所有的类都要实例化以后才可以操作。
我的车.启动();                  //调用类的过程
ShowMessage(我的车.轮子);//现显类的成员,ShowMessage()这个函数大家应当很熟悉了
End;

车.Create()   当中的Create是一个Delphi默认的函数。它继承于Delphi里所有类的祖先Tobject的一个过程。也就是说任何一个类你都可以用Create方法来实例化类。
Delphi和C++等语言不一样的是。你不太担心实例化后的类会忘了释放而关不了程序。Delphi会在主程序退出的时候,自动会收类的做占用的内存。当然你也可以调用FreeAndNil([实例名])来手动释放内存。
如:FreeAndNil(我的车);

类过程里,只可以本类里的成员中,或者过程中定义的变量。

PS:在Delphi里所有的类都是以T开头的。
高清晰电影网 刷广告748DJ站 新站制作中 171音乐论坛 最具人气最具实力 欢迎参观指导!

TOP

我的教程,会有一些实用的例程:

1.传奇私服的登陆器。[ini文件的读写,listbox,的运用。]

2.游戏菜单[listview控件的运用,ini文件的高级运用]

3.CS1.5登陆器,[注册表的控制,随机函数的运用]

4.窗口化游戏工具[windows底层消息,可以用来屏闭登陆器那些可恶的广告哦!]

5,网吧大头贴[windows的绘图魅力]

还会教大家一些算法,如树,多树,递归,等。



如果不出现什么特殊情况,我想教程会一直写下去。让网管同胞们发挥自己最大的潜力。



Delphi 7在多特里[www.duote.com]有完整的破解版下载。推荐用这个版本。

Delphi 2009我在迅雷里搜索到一个可用的下载。
高清晰电影网 刷广告748DJ站 新站制作中 171音乐论坛 最具人气最具实力 欢迎参观指导!

TOP

好东西````````````````````````````

TOP

你会用了?看的懂?

又一人才出现。
高清晰电影网 刷广告748DJ站 新站制作中 171音乐论坛 最具人气最具实力 欢迎参观指导!

TOP

额··电脑板块取消了··现在这些东西只有发到休闲版了哦 ·

TOP

要不发到哪呢 嘿嘿  教程而已  晚上无聊乱发滴
高清晰电影网 刷广告748DJ站 新站制作中 171音乐论坛 最具人气最具实力 欢迎参观指导!

TOP

怎么发到站长休闲了
看看先
粽叶加米'Blog    WoHooO!影视    WoHooO!音乐舞曲     WjxDream.Cn提供广告

TOP

好东西,收藏下,有空学学
本人新米 iTOP6.cn
呵呵,宣传一下啦

TOP

发新话题