o = Input.GetText("Input1");
result = DLL.CallFunction("AutoPlay\\Docs\\commg.dll", "ListPorts", "/", DLL_RETURN_TYPE_STRING, DLL_CALL_CDECL)
Input.SetText("Input1",result);
------------
function StringDelimitedToTable(DelimitedString, Delimiter)
        tbReturn = {};
        local strWorking;
        local nPos = nil;
        local strData;
        local nTableIndex = 1;
        local nDelimiterLength = String.Length(Delimiter);
        if(nDelimiterLength < 1)then
                tbReturn[nTableIndex] = DelimitedString;
                return tbReturn;
        end
        strWorking = DelimitedString;
        nPos = String.Find(strWorking,Delimiter);
        while(nPos ~= -1)do
                strData = String.Left(strWorking,nPos-1);
                tbReturn[nTableIndex] = strData;
                nTableIndex = nTableIndex + 1;
                local nLength = String.Length(strWorking);
                strWorking = String.Right(strWorking,nLength - (nPos + (nDelimiterLength-1)));
                nPos = String.Find(strWorking,Delimiter);
        end
        if(strWorking ~= "")then
                tbReturn[nTableIndex] = strWorking;
        end
        return tbReturn;
end

str=Input.GetText("Input1");
if str~="" then
tb = StringDelimitedToTable(str, "|")
if str then
        for i,v in pairs(tb) do
                ListBox.AddItem("ListBox1", v, v)
        end
end
end

nadjiba = ComboBox.GetSelected("ComboBox1");
ilyass = ComboBox.GetItemData("ComboBox1", nadjiba);
 Serial.OpenPort(ilyass, 300, SerialPort_NoParity, 8, 2, SerialPort_NoHandshake, 1024, 1024);