Class TmStrList (unit mstrlist)

Inherits from

TStrings

Constructors


constructor create;

ignore it


Functions

function Add(const S: string): Integer;


procedure Clear;

!(FUpdateCount = 0) and

procedure Delete(Index: Integer);


destructor Destroy;


procedure Exchange(Index1, Index2: Integer);


function Find(const S: string; var Index: Integer): Boolean;


function IndexOf(const S: string): Integer;


procedure Insert(Index: Integer; const S: string);


procedure RestoreOrderInGroups;


procedure Sort;


procedure Changed;


procedure Changing;

!(FUpdateCount = 0) and

function Get(Index: Integer): string;


function GetCount: Integer;


function GetObject(Index: Integer): TObject;


procedure Put(Index: Integer; const S: string);


procedure PutObject(Index: Integer; AObject: TObject);


procedure SetUpdateState(Updating: Boolean);


procedure ExchangeItems(Index1, Index2: Integer);


procedure Get_ShortDateTimeFormat(format:string);

iVAL_and_del

procedure Grow;


procedure InsertItem(Index: Integer; const S: string);


procedure QuickSort(L, R: Integer);


procedure QuickSortGroup(L,R:integer);


function Read_DateTime(x:string):String;

search delimiter

procedure SetCapacity(NewCapacity: Integer);


procedure SetDateTimeFormat(value:String);

0.

procedure SetKeyLen(value:Integer);


procedure SetKeyPos(value:Integer);

showmessage('Keylen: '+inttostr(fKeylen)+' -> '+inttostr(value));

procedure SetKeyType(value:TLSortType);


procedure SetSorted(Value: Boolean);


procedure Sort_Alpha;


Properties

property DateTimeFormat : String


property Duplicates : TDuplicates


property KeyLen : Integer


property KeyPos : Integer


property KeyType : TLSortType


property ScipFirst : Integer


property SearchSubstring : Boolean


property ShortYearBorder : Integer


property ShortYearExpand : Boolean


property SortDescending : Boolean


property Sorted : Boolean


Events

event OnChange : TNotifyEvent


event OnChanging : TNotifyEvent


Variables

FCapacity : Integer;


FCount : Integer;


fDateTimeFormat : String;


FDuplicates : TDuplicates;


fKeyLen : Integer;


fKeyPos : Integer;


fKeyType : TLSortType;


FList : PStringItemList;


FOnChange : TNotifyEvent;


FOnChanging : TNotifyEvent;


fScipFirst : Integer;


fSearchSubstring : Boolean;


fShortYearBorder : Integer;


fShortYearExpand : Boolean;


fSortDescending : Boolean;


FSorted : Boolean;


ShortDateTime_FirstFormat : Integer;

Used to store the interpreted actual DateTime format

ShortDateTime_Format : ShortDateTime_FormatArray;

...

ShortDateTime_FormatCount : Integer;


ShortDate_exists : Boolean;

...

ShortTime_AMPM : Boolean;

...

ShortTime_exists : Boolean;

...


Constructors


constructor create;

ignore it


Functions


function Add(const S: string): Integer;


procedure Clear;

!(FUpdateCount = 0) and


procedure Delete(Index: Integer);


destructor Destroy;


procedure Exchange(Index1, Index2: Integer);


function Find(const S: string; var Index: Integer): Boolean;


function IndexOf(const S: string): Integer;


procedure Insert(Index: Integer; const S: string);


procedure RestoreOrderInGroups;


procedure Sort;


procedure Changed;


procedure Changing;

!(FUpdateCount = 0) and


function Get(Index: Integer): string;


function GetCount: Integer;


function GetObject(Index: Integer): TObject;


procedure Put(Index: Integer; const S: string);


procedure PutObject(Index: Integer; AObject: TObject);


procedure SetUpdateState(Updating: Boolean);


procedure ExchangeItems(Index1, Index2: Integer);


procedure Get_ShortDateTimeFormat(format:string);

iVAL_and_del


procedure Grow;


procedure InsertItem(Index: Integer; const S: string);


procedure QuickSort(L, R: Integer);


procedure QuickSortGroup(L,R:integer);


function Read_DateTime(x:string):String;

search delimiter


procedure SetCapacity(NewCapacity: Integer);


procedure SetDateTimeFormat(value:String);

0..9 -> 200x; 10..99 -> 19xx


procedure SetKeyLen(value:Integer);


procedure SetKeyPos(value:Integer);

showmessage('Keylen: '+inttostr(fKeylen)+' -> '+inttostr(value));


procedure SetKeyType(value:TLSortType);


procedure SetSorted(Value: Boolean);


procedure Sort_Alpha;


Properties


property DateTimeFormat : String


property Duplicates : TDuplicates


property KeyLen : Integer


property KeyPos : Integer


property KeyType : TLSortType


property ScipFirst : Integer


property SearchSubstring : Boolean


property ShortYearBorder : Integer


property ShortYearExpand : Boolean


property SortDescending : Boolean


property Sorted : Boolean


Events


event OnChange : TNotifyEvent


event OnChanging : TNotifyEvent


Variables


FCapacity : Integer;


FCount : Integer;


fDateTimeFormat : String;


FDuplicates : TDuplicates;


fKeyLen : Integer;


fKeyPos : Integer;


fKeyType : TLSortType;


FList : PStringItemList;


FOnChange : TNotifyEvent;


FOnChanging : TNotifyEvent;


fScipFirst : Integer;


fSearchSubstring : Boolean;


fShortYearBorder : Integer;


fShortYearExpand : Boolean;


fSortDescending : Boolean;


FSorted : Boolean;


ShortDateTime_FirstFormat : Integer;

Used to store the interpreted actual DateTime format


ShortDateTime_Format : ShortDateTime_FormatArray;

...


ShortDateTime_FormatCount : Integer;


ShortDate_exists : Boolean;

...


ShortTime_AMPM : Boolean;

...


ShortTime_exists : Boolean;

...