تويت
--
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
result = AE.StringDelimitedToTable(Input.GetText("Input1"), "/");
for i =1,#result do
ListBox.AddItem("ListBox1", result[i]);
end
p =Input.GetText("Input1");
for k in string.gfind(p, "%w+") do
result = ListBox.AddItem("ListBox1", k, "");
end
"%P+"
تعليق