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;