求大神解释下这段代码的意思（Delphi上位机）？

第二段：
procedure LoadComm();
var
rst,i,n: SmallInt;
name:string;
DTLdr:array [0..DTL_MAX_DRIVERS-1] of DTLdriver;
dwDrivers:LongWord;
AB_Driver:ch_ary;
begin
RsLinxLinkOK:=False;
name:='';
rst:=1;
rst:=DTL_INIT(1);
if rst=0 then
rst:=DTL_DRIVER_LIST(@DtlDr,dwDrivers,500);
if rst=0 then
begin
rst:=1;
for i:=0 to DTL_MAX_DRIVERS-1 do
// if Pos('AB_ETH-ZCX3',DTLdr[i].szDriverName)>0 then //FOR CONTROLLOGIX 5000
if Pos('AB_VBP-1',DTLdr[i].szDriverName)>0 then //FOR EMULATOR
begin n:=i; rst:=0; end;
if rst=0 then
rst:=DTL_DRIVER_OPEN(0,DTLdr[n].szDriverName,500);
end;
if rst=0 then
RsLinxLinkOK:=True;
if (not RsLinxLinkOK) and (FirstScan=0) then
ShowMessage(' Communication error. No RSLinx or Configure Error. Download disabled');
FirstScan:=1;
end;

AB PLC ?这个要看完整的，应该有一个动态连接库的

没法解释，无法知道各种变量代表的意义 dtl应该是某种类型设备，简单来说，这段代码大概就是 初始化dtl 获取设备列表 遍历设备列表，找到符合 ab_vbp-1 条件的设备，然后打开 打开失败的话就弹消息框