Description: TObject = class
constructor Create
procedure Free
end
TPersistent = class(TObject)
procedure Assign(Source: TPersistent)
end
TStrings = class(TPersistent)
function Add(S: String): Integer
procedure Append(S: String)
procedure AddStrings(Strings: TStrings)
procedure Clear
procedure Delete(Index: Integer)
function IndexOf(const S: String): Integer
procedure Insert(Index: Integer S: String)
procedure LoadFromFile(FileName: String)
procedure SaveToFile(FileName: String)
property Count: Integer read
property Text: String read write
property CommaText: String read write
property Strings[Index: Integer]: String read write
property Objects[Index: Integer]: TObject read write
end
TDuplicates = (dupIgnore, dupAccept, dupError)
TNotifyEvent = procedure(Sender: TObject)
TStringList = class(TStrings)
function Find(S: String var Index: Integer): Boolean
procedure Sort
property Duplicates: TDup
File list (Check if you may need any files):
Lazarus
.......\project1.exe.vmp
.......\project1.exe.vms
.......\project1.lpi
.......\project1.lpr
.......\unit1.lfm
.......\unit1.lrs
.......\unit1.pas
.......\VMProtectBegin.inc
.......\VMProtectBeginMutation.inc
.......\VMProtectBeginUltra.inc
.......\VMProtectBeginVirtualization.inc
.......\VMProtectEnd.inc
Download