AutoLISP 列表

该函数与 一起调用，它将列表结构返回给 AutoLISP。acutBuildList()acedRetList()

以下示例代码片段传递了四个点的列表：

struct resbuf *res_list; 
ads_point ptarray[4]; 
// Initialize the point values here.  
. 
. 
. 
res_list = acutBuildList(
    RT3DPOINT, ptarray[0], 
    RT3DPOINT, ptarray[1], 
    RT3DPOINT, ptarray[2], 
    RT3DPOINT, ptarray[3], 0); 
if (res_list == NULL) { 
    acdbFail("Couldn't create list\n"); 
    return BAD; 
} 
acedRetList(res_list); 
acutRelRb(res_list); 

虚线对和嵌套列表可以通过调用来返回到 AutoLISP，以构建使用特殊列表构造类型代码创建的列表。只有复杂列表才需要这些代码。对于普通（即一维）列表，可以传递一个简单的结果缓冲区列表，如前面的示例所示。acutBuildList()acedRetList()

列表构造类型代码的使用很简单。在调用中，嵌套列表前面是结果类型代码（对于列表开始），后跟结果类型代码（对于列表结束）。也可以构造一个虚线对。虚线对也以开头和结尾;点由结果类型代码指示，显示在对的两个成员之间。acutBuildList()RTLBRTLERTLBRTLERTDOTE

下面的示例代码片段构造一个嵌套列表以返回到 AutoLISP：

res_list = acutBuildList(
    RTLB, // Begin sublist.  
    RTSHORT, 1, 
    RTSHORT, 2, 
    RTSHORT, 3, 
    RTLE, // End sublist.  
    RTSHORT, 4, 
    RTSHORT, 5, 
    0); 
if (res_list == NULL) { 
    acdbFail("Couldn't create list\n"); 
    return BAD; 
} 
acedRetList(res_list); 
acutRelRb(res_list); 

此示例返回到 AutoLISP 的列表具有以下格式：

((1 2 3) 4 5)

下面的代码段构造一个点线对以返回到 AutoLISP：

res_list = acutBuildList(
    RTLB, // Begin dotted pair.  
    RTSTR, "Sample", 
    RTDOTE,
    RTSTR, "Strings", 
    RTLE, // End dotted pair.  
    0); 
if (res_list == NULL) { 
    acdbFail("Couldn't create list\n"); 
    return BAD; 
} 
acedRetList(res_list); 
acutRelRb(res_list); 

此示例返回到 AutoLISP 的列表具有以下格式：

（（“样本” .“字符串”））