Delphi 怎么接收函数返回值

2024-04-27

1. Delphi 怎么接收函数返回值

function Calculation(x: Integer): integer;         //括号里的x:integer 是声明代入的变量类型为int
begin                                                            //括号后面的integer是声明返回值类型为integer
   result:=x+2;             // Result就是返回值,且返回值的类型为integer 
end;  

在别的进程中调用函数时,比如
a:=5;
b:= calculation(a) - 3;     //得到的值是  b= ( a+2 )   -3  ,由于a赋值为5,则最后b的值为4

Delphi 怎么接收函数返回值

2. 在Delphi中有如下函数,请大家说明一下这个函数各个参数的类型以及它的返回值

aFPData: PChar; //pchar是指字符指针类型
aCount: Integer;  //integer是整数类型
返回值integer也为整数类型

3. delphi 函数返回值的定义问题

后面的integer定义函数的返回值是整形,括号里的integer定义函数的两个参数i,j为整形。
例如下面函数,求两数之和
function TForm1.MyFun(i, j: integer): integer;
begin
  result:= i+j;  //返回值为两个参数的和
end;

我们可以在button的单击事件调用它

procedure TForm1.Button1Click(Sender: TObject);
var
  i: integer;
begin
  i:= MyFun(3, 5);  //调用函数求3和5的和,结果赋值给整形变量i
  showmessage('两数之和为:'+ inttostr(i));   //输出函数计算的结果
end;

delphi 函数返回值的定义问题

4. JS如何定义定长字符串来接收由Delphi函数的参数返回值?

用正则表达式匹配 定义一个匹配 长度为8 只接受 大写字母的正则表达式如下var reg = /^[A-Z]{8}$/var val = document.getElementById(“id”).value;然后用javascript 中的方法匹配var flag = reg.test(val);flag 为true 或者false

5. delphi function的简单应用

Delphi把操作数据的方法分成了两种,一种是function,另一种是procedure,分别称为“函数”和“过程”,这二者最大的差别就是函数拥有返回值而过程没有,比如按钮的事件响应过程,这就是一个过程,因此它没有返回值;而一个简单的函数如求字符串长度的函数Length,它的函数原形为
function Length(S:string):Integer;
这个函数有一个参数S,是您要计算的字符串,它的返回值是一个整数类型,返回字符串的长度。

举一个例子来说吧:
    假设需要一个函数GetNum(),它有两个整形参数num1,num2,函数经过计算后返回这两个整数的平均数,函数如下:

function GetNum(num1:Integer;num2:Integer):Integer; //函数名
var
    haha:Integer;
Begin
    Result:=(num1+num2)/2; //将计算结果赋给Result
    //GetNum:=(num1+num2)/2;    //也可以这样写
    haha:=555; //如果对函数名赋值,函数就返回,就是说,如果使用GetNum:=(num1+num2)/2;对函数赋值,这句将永远执行不到。

End;

函数的声明:
function 函数标示符(参数列表):返回值;

函数的定义:
function MyFunc(Param1,Param2:Integer;Param3:Real):Integer;//函数参数间用分号隔开,括号外面的类型是函数的返回类型。
Begin
    //函数的定义部分
End;

附注:
函数返回值有两种赋值方法,一种是直接对函数名赋值,另一种是赋值给Result变量。

对函数名赋值将导致函数返回。

Result是函数特有的局部变量,它的类型与函数的返回类型相同,对它的赋值等于对函数名赋值。与函数名不同,Result变量可以出现在赋值号的右边,如果函数名出现在赋值号的右边时,则意味着递归调用,也就是函数调用它自己。另外,对Result赋值不一定导致函数返回,如:
function MyFunc(s:Integer):Integer;
Begin
    Result:=Result*s; //执行赋值但不返回。
    MyFunc:=s*s;//赋值后程序返回。
End;

例2:
function MyFunc():Integer;
Begin
    Result:=Result+5;
    //如果使用MyFunc():=MyFunc()+5;将导致死循环。
End;

希望这些信息可以帮得上您。

delphi function的简单应用

6. Delphi怎么定义一个有返回值的方法

delphi 里,有返回值的都是函数,没有返回值的是过程方法。

示例如下:

函数:
function Format(const Format: string; const Args: array of const): string;begin  Result := System.SysUtils.Format(Format, Args, FormatSettings);end;
过程:
procedure ShowMessage(const Msg: string);begin  ShowMessagePos(Msg, -1, -1);end; 
需要提示的是:

在 delphi 里当定义了一个函数后,每个函数会自动生成一个 result 的变量,其类型就是定义的返回值类型,可以直接对 result 进行赋值、计算等操作,函数也会自动将 result 的最终值作为结果返回。

7. delphi 自定义一个有四个输入参数,有两个相同类型的返回结果的函数,如何定义

比如你想写个函数func,按照你的说法,在delphi中应该定义为procedure而非function,具体写法如下:
procedure func(EDate,SDate:TDatetime;
                         i, k:Integer;
                         var  BSDate,BEDate:TDatetime);

delphi 自定义一个有四个输入参数,有两个相同类型的返回结果的函数,如何定义

8. 在DELPHI中怎样定义函数

在 delphi 里定义函数可以使用关键字 function,如果不需要返回值的,可以使用 procedure。
函数定义的示例如下:
function aaa(abc:string):Boolean;function 函数名(参数1名称:参数类型; 参数2名称:参数类型......) : 返回值类型。
最新文章
热门文章
推荐阅读