textlinewdx.lua 858 B

12345678910111213141516171819202122232425262728293031323334353637383940414243
  1. function ContentGetSupportedField(Index)
  2. if (Index == 0) then
  3. return 'Line1','', 8; -- FieldName,Units,ft_string
  4. elseif (Index == 1) then
  5. return 'Line2','', 8;
  6. elseif (Index == 2) then
  7. return 'Line3','', 8;
  8. elseif (Index == 3) then
  9. return 'Line4','', 8;
  10. elseif (Index == 4) then
  11. return 'Line5','', 8;
  12. end
  13. return '','', 0; -- ft_nomorefields
  14. end
  15. function ContentGetDetectString()
  16. return '(EXT="TXT") | (EXT="INI")'; -- return detect string
  17. end
  18. function ContentGetValue(FileName, FieldIndex, UnitIndex, flags)
  19. if (FieldIndex > 4) then
  20. return nil;
  21. end
  22. local f=io.open(FileName,"r");
  23. if not f then
  24. return nil;
  25. end
  26. local ii = 0;
  27. for line in f:lines() do
  28. if (ii == FieldIndex) then
  29. f:close();
  30. return line;
  31. end
  32. ii = ii + 1;
  33. end
  34. f:close();
  35. return nil;
  36. end