editor question
why isn't there an undo button on the edit windows
how do I block tab?
for next loops don't seem to auto indent
what's worse is when I press tab when text is selected deletes it..
public function Position(pSubStr,pStr as string) as integer
dim Index, SubIndex, SubLength as byte
{ result = -1
SubIndex = 0
{
Index = 0
SubLength = Length(pSubStr)
}
while (SubIndex < SubLength) and (pStr(Index) <> NULL)
if pStr(Index) = pSubStr(SubIndex) then
inc(SubIndex)
if SubIndex = SubLength then
result = integer(Index) - SubLength + 1
end if
else
SubIndex = 0
end if
inc(Index)}
end while
end function
Return to Development Environment
Users browsing this forum: No registered users and 1 guest