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:
- [liumazi] - Liumazi virus Delphi source code, look,
- [DeDe] - Using Delphi to write an anti-assembler,
File list (Check if you may need any files):
Delphi
......\Project1.cfg
......\Project1.dof
......\Project1.dpr
......\Project1.res
......\Project1.vmp
......\Unit1.dfm
......\Unit1.pas
......\VMProtectBegin.inc
......\VMProtectBeginMutation.inc
......\VMProtectBeginUltra.inc
......\VMProtectBeginVirtualization.inc
......\VMProtectEnd.inc