lomlib.pas

来自「参照上兴、鸽子等源码编写编写出来的。 编译环境：Delphi7+SP+DP」· PAS 代码 · 共 51 行

{-----------------------------------------------------------------------
  LOMLIB release 3.1

  Copyright - Use and abuse, but dont remove this header from code, and
              gimme a shoutout if you used it.

  Author: ~LOM~
  Website: www.lommage.co.uk
  Contact: [e-mail]

  Updates:
  ~~~~~~~~

  TStrList[0.5]     :- Replacement for TStringList
  TIntList[0.1]     :- IntList (I use this for modifying and recording Socket ID's)
  TEditServer[0.1]  :- Quick edit server, based on TStrList Class, allows you
                       to create edit server code efficiently. (Also has
                       encryption).
  TBasicStream[0.1] :- Wrapper for Windows Readfile/Writefile routines.
  TMapStream[0.1]   :- Wrapper for Mapping a file

  21st October -
    Fixed a bug in Position (when reading / writing)

  15th September -
    Added some smaller functions from the sysutils pas

  13th September -
    Added TMapStream class

  12th September -
    Added class TBasicStream
    Added manipulation subroutines

  10th September -
    Added class TIntList
    Added class TEditServer

  -----------------------------------------------------------------------
}

unit LOMLib;

interface

uses Windows;

const
  MEM_USAGE = 65535; { Array buffer, modify this if your storage will be > 65535 }
  CLRF = #10#13; { works with just #13 for some files?!?!?! }
  SPLITDELIMITER = '