我已经宣布了以下功能:
function next(current, next: string): Integer;
begin
form1.Label1.Caption := next;
form1.Label2.Caption := current;
form1.label3.Caption := clipboard.AsText+inttostr(c);
Result:=1;
end;
Run Code Online (Sandbox Code Playgroud)
我试着用这段代码执行它:
if label1.Caption = '' then res := next('current', 'next');
Run Code Online (Sandbox Code Playgroud)
我收到以下错误:
[错误] Unit1.pas(47):E2034实际参数太多
我认为所有参数都很好,为什么我会收到这个错误?
我有以下格式的字符串,例如20110201
,我想将它转换为delphi中的日期,然后从今天减去它以获得天数差异.
我怎样才能做到这一点?对不起我的英语不好.