程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> Delphi >> delphi常用

delphi常用

編輯:Delphi



Delphi

1、聲明變量時要使用var關鍵字

Var

S1,s2:string;

Begin

S1:=’hello’;

S2:=’word’;

S1:=s1+s2;

End;

2、改變文本標簽內容

Begin

Label1.Caption:=’hello world’;

End;

3、關閉窗口

Begin

Close;

End;

4、改變單行編輯框背景色

Begin

Edit1.Color:=clRed;

End;

5、函數

Function <函數名> (<形式參數表>);<類型>;

Begin

<語句>;

............

<語句>;

End;

實例-->

Function Total(x,y:real):real;

Begin

Total:=x*y; //返回值由函數名返回

Result:=x+y; //返回值由Result傳回

End;

實例調用方法--->

Function totals(x,y:integer):integer;

begin

result:=x+y;

end;

procedure TForm1.Button1Click(Sender: TObject);

var

x,y,z:integer;

begin

x:=2;

y:=3;

z:=totals(x,y); //調用函數

Edit1.Text:='0.0.0.0';

end;

6、integer和string互轉

Int-->str: Inttostr();

Str-->int: strtoint();

8、彈框

showmessage('error');

9、if else 使用:

文本框的值是chen就關閉窗口,否則文本框顯示no

begin

co:=Edit1.Text;

if co='chen' then

close

else

Edit1.Text:='no';

end;

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved