NotToday Posted December 9, 2011 Share Posted December 9, 2011 İnputtan veri alırken satır satır nasıl alabilirim ? Quote Link to comment Share on other sites More sharing options...
KintaRo Posted December 9, 2011 Share Posted December 9, 2011 Multiline Input'tan mı? Quote Link to comment Share on other sites More sharing options...
NotToday Posted December 9, 2011 Author Share Posted December 9, 2011 Evet abi Quote Link to comment Share on other sites More sharing options...
MostWanted Posted December 9, 2011 Share Posted December 9, 2011 Okutacağın yere [codebox]text=Input.GetText("Input1") tStrings = DelimitedStringToTable(text, "\r\n") if tStrings and Table.Count(tStrings) > 0 then for n = 1, Table.Count(tStrings) do Dialog.Message("", tStrings[n]) end end[/codebox] Global'e [codebox]function DelimitedStringToTable(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[/codebox] Ben mesaj çıkacak şekilde gösterdim artık sen nerde kullancaksan ona göre ayarla Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.