delphi调用用友com接口CVoucher 凭证类 的完整代码

答：Delphi 调用用友 COM 接口 CVoucher 凭证类的完整代码如下： // 创建凭证类对象
Voucher:= CVoucher.Create; // 设置凭证的基本信息
Voucher.AccountingYear := '2018';
Voucher.AccountingPeriod := '01';
Voucher.VoucherType := '1';
Voucher.VoucherID := '001';
Voucher.VoucherDate := StrToDate('2018-01-01'); // 添加凭证分录
Voucher.AddEntry;
Voucher.SetEntryByIndex(1, '1001', 1, 1000, '');
Voucher.AddEntry;
Voucher.SetEntryByIndex(2, '1002', -1, 1000, ''); // 保存凭证
Voucher.Save; // 释放对象
Voucher.Free;

相关问题

delphi调用用友dll接口CVoucher 凭证类 的完整代码

我提供的是一个示例代码，你可以根据你的需求调整它：Dim Voucher As New CVoucherVoucher.VoucherID = "Voucher01"
Voucher.VoucherType = "1"
Voucher.VoucherDate = "20200101"
Voucher.VoucherNo = "100"
Voucher.EntryNo = "1"
Voucher.VoucherAbstract = "报销"
Voucher.TotalDebitAmount = "100"
Voucher.TotalCreditAmount = "100" Dim Line As CVoucherLine
Line.AccountCode = "1001"
Line.DebitAmount = "100"
Line.CreditAmount = "0"
Voucher.VoucherLines.Add Line Line.AccountCode = "1001"
Line.DebitAmount = "0"
Line.CreditAmount = "100"
Voucher.VoucherLines.Add Line Dim oVoucher As Cvoucher
Dim oVoucherSet As CvoucherSet
oVoucherSet.Add oVoucher Dim cVoucherSet As Object
cVoucherSet = oVoucherSet
Dim r As Long
r = AddVoucher(cVoucherSet) If r = 0 Then
MsgBox "凭证添加成功"
Else
MsgBox "凭证添加失败"
End If

delphi调用sap接口函数

### 回答1：
Delphi是一种广泛使用的编程语言，具有强大的集成开发环境（IDE），可以用于开发各种软件应用程序。在使用Delphi调用SAP（Systems, Applications, and Products in Data Processing）接口函数的过程中，我们首先需要创建一个SAP连接，然后使用该连接来调用我们所需的接口函数。

首先，我们需要确保已经安装了相应的SAP RFC（Remote Function Call）库，并在Delphi中导入相关的扩展包。然后，我们需要通过创建一个RFC连接对象来建立与SAP系统的通信。在连接对象中，我们需要提供SAP系统的相关信息，比如SAP服务器的主机名、系统编号、客户端号码等。

一旦我们成功建立了与SAP系统的连接，我们就可以开始调用SAP接口函数了。我们可以使用RFC连接对象的CallFunction方法来调用函数，在调用时需要提供接口函数的名称以及相应的参数。在调用成功后，我们可以通过获取返回的结果数据来处理和使用。

在调用SAP接口函数时，我们需要确保提供正确的函数参数和参数类型，以及正确的数据格式。我们可以使用Delphi提供的相关功能来进行参数类型转换和数据格式处理。

在调用函数之前，我们还需要考虑如何处理和处理潜在的错误和异常。我们可以使用Delphi提供的异常处理机制来捕获和处理可能出现的错误，以确保程序的稳定性和可靠性。

综上所述，使用Delphi调用SAP接口函数需要先建立与SAP系统的连接，然后通过RFC连接对象调用相应的接口函数，并处理返回的结果数据和潜在的错误和异常。这样可以实现Delphi与SAP系统的集成，实现数据的交互和共享。

### 回答2：
Delphi是一种编程语言，可以用于调用SAP的接口函数。SAP是一种集成的企业资源计划软件，它提供了各种接口函数，可以与其他系统进行数据交换和集成。

在Delphi中调用SAP接口函数，首先需要通过SAP提供的API文档了解接口函数的参数和返回值。然后，在Delphi中创建一个新的项目或使用现有的项目，在项目中引入SAP的相关库文件和命名空间。

接下来，可以使用Delphi的相关语法，如函数调用、变量声明等，来调用SAP的接口函数。根据接口函数的参数要求，可以在Delphi代码中传入需要的参数，并接收返回值。

在调用SAP接口函数时，需要确保Delphi和SAP的连接是正常的。可以通过设置连接参数，如SAP系统的用户名、密码、连接字符串等来确保连接成功。

在调用SAP接口函数之前，可能需要进行一些前期准备工作。例如，可能需要创建SAP连接对象、打开连接、连接到具体的SAP系统等。

调用SAP接口函数后，可以根据返回值来进行相应的处理。根据接口函数的返回值类型，可以使用条件语句、循环语句等来判断并处理返回结果。

在调用SAP接口函数时，还需要注意异常处理。如果在调用过程中发生了错误或异常，可以使用Delphi提供的异常处理机制来捕获和处理异常，以防止程序崩溃或不稳定。

总之，通过Delphi调用SAP接口函数可以实现与SAP系统的数据交换和集成。这样可以方便地在Delphi程序中使用SAP的功能和数据，提高系统的灵活性和扩展性。

### 回答3：
使用Delphi调用SAP接口函数需要以下步骤：

1. 在Delphi中设置与SAP接口通信的环境。这可以通过使用SAP提供的相关库文件来完成。通常，这些库文件可以作为一个包被导入到Delphi项目中。

2. 使用SAP提供的函数或类来建立与SAP服务器的连接。这些函数或类可以通过指定SAP服务器的IP地址、端口号、用户名和密码来建立连接。

3. 一旦连接建立，可以通过调用相应的SAP函数或方法来执行所需的操作。这些操作可能包括读取或写入SAP系统的数据，调用SAP的业务逻辑函数或者执行其他与SAP相关的任务。

4. 在调用SAP函数或方法之前，可能需要根据SAP接口的要求设置相应的输入参数。这些参数通常是一个结构体或一个数组，其中包含了传递给SAP函数的数据。

5. 当SAP函数执行完成后，可能会返回一个结果，这可以是一个结构体或一个值。根据需要，可以解析结果并进一步处理。

6. 最后，使用SAP提供的功能来关闭与SAP服务器的连接，并释放相关的资源，以确保程序的完整性和安全性。

需要注意的是，具体的调用方式和步骤可能因为SAP接口的版本和特性而有所不同。因此，在进行Delphi调用SAP接口函数的实际操作前，应该先详细阅读SAP的相关文档，并了解其具体的接口规范和要求。