Reprinted: Delphi string function

xiaoxiao2021-03-06 21

Uses strutils; [string function Daquan] headlight ANSIRESEMBLESTEXT (Const AText, AoTher: String): Boolean; $ [Strutils.PAS feature Returns two strings to similar to the ANSI (American National Standards Institute) US National Standards Association; Case sensitive strutils.SoundExProc; var strutils.ansiresemblesproc example checkbox1.checked: = ANSIRESEMBLESTEXT (Edit1.Text, Edit2.Text); ━━━━━━━━━━━━━━━━━━━ ━ header function AnsiContainsText (const aText, ASubText: string): Boolean; $ [StrUtils.pas function returns a string containing the substring ASubText whether aText described with reference to a case-insensitive function StrUtils.AnsiUppercase; function StrUtils.AnsiPos example CheckBox1.Checked: = AnsicontainStext (edit1.text, edit2.text); ━━━━━━━━━ 首首首━━━━━━━━━ 首 f━━━━━━━━ 首首 f::;; $ [Strutils .PAS feature returns a string AText whether the beginning of the child string asubtext does not distinguish between the case in the case, the reference window, the case, checkbox1.checked: = ANSIStartStext (edit1.text, edit2.text); ━━━━━━━━━━ ━━━━━━━━━━ The first Function AnsiendStext (const asubtext, at: String): boolean; $ [strutils.pas feature Return string AText whether the end of the sub-string AsubText instructions Not Distortment Reference Function Windows. Compa RESTRING example checkbox1.checked: = ansiendstext (edit1.text, edit2.text); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━━━━━━ 首首 f━━━━et━━ 首首 f━━━etetet 首首首首━━etetetet━ 首首首 (━━━etet━━ 首首首━━━━et━━━━ 首首首━━━━━━━━━ 首string): string; $ [StrUtils.pas function returns a string AText replaced by substrings AFromText substrings AToText results described with reference to a case-insensitive function SysUtils.StringReplace; type SysUtils.TReplaceFlags example Edit4.Text: = AnsiReplaceText (Edit1 .Text, edit2.text, edit3.text); ━━━━━━━━ 首首首━━━━━━━━ 首首━━━━━━━━ 首首 f f━━;;; const avate: array of string: Boolean; $ [strutils.pas function Returns the string array avaless whether there is a string AText explanation not to distinguish the case reference function strutils.ansiindextext example checkbox1.checked: = ANSIMATCHTEXT (Edit1.Text, ['A1', 'A2', 'A3', 'A4']);

━━━━━━━━━━━━━━━━━━━ 首首首 f 首首首首首首首首首 f f;;; Const Avalues: Array Of String: Integer; $ [Strutils.PAS feature Return string ATEXT The location instructions in the string array avateues are not case sensitive; if not included, return -1 reference function system1.ansisametext example = ANSIINDEXTEXT (Edit1.Text, ['A1', 'A2', 'A3' , 'a4']); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━━━━ 首首首 f f:;;; $ [Strutils.PAS feature Return characters String ATEXT contains substrings asubtext Description Case Size Size Reference Function Strutils.ansipos Example CheckBox1.Checked: = AnsicontAinsStr (Edit1.Text, Edit2.Text); ━━━━━━━━━━━━━━━━━━━━ ━━━━ header function AnsiStartsStr (const ASubText, aText: string): Boolean; $ [StrUtils.pas function returns a string beginning with the substring aText whether ASubText described with reference to an example case sensitive SysUtils.AnsiSameStr function CheckBox1.Checked: = AnsiStartsStr (Edit1.Text); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━━━━━ 首:::;; $ [Strutils.Pas Function Returns ATEXT Whether the end of the sub-string AsubText Description Case Size Size Reference Function Sysutils.ansisameSTR CHECKBOX1.CHECKED: = ANSIENDSSTR (Edit1.Text, Edit2.Text); ━━━━ ━━━━━━━ 首首━━━━━━ 首首首━━━━━ 首首首 f f━━ ((((((::: String; $ [Strutils.PAS Features Return Controvers ATEXT AFROMTEXT Replacement String Atotext results Description Case Size Size Reference Function System; Type Sysutils.treplaceFlags Analog EDIT4.TEXT: = ANSIREPLACEST: = ANSIREPLACESTR (Edit1.Text, Edit2.Text, Edit3.Text); ━━━━━━━━━━━━━━ ━━━━━━━━ 首 The first Function AnsimatchStr (Const Ate: Array Of String): Boolean; $ [Strutils.PAS feature Returns the string array Avalues contains the string ATEXT instruction case case Reference Function Strutils.ansiIndexSTR example checkbox1.checked: = ANSIMATCHSTR (Edit1.Text, ['A1', 'A2', 'A3', 'A4']); ━━━━━━━━━━━━━━━━━━━━━━ ━━━━━━ 首 The first Function AnsiIndexstr (Const AText: String;

Const Avalues: Array Of String: Integer; $ [Strutils.PAS feature Return Strings Atext location Description of the String Array Avalues Case Size Size Reference Function SySUTILS.ASISAMESTR Example Spinedit1.Value: = ANSIInDexStr (Edit1.Text, [ 'A1', 'A2', 'A3', 'A4']); ━━━━━━━━━ 首首首━━━━━━ 首首首 f━━━━ ((首首;;;;; ATERNT: Integer; $ [strutils.PAS feature Returns a string ATEXT ACOUNT note indication When ACOUNT returns' '' reference function system.setlength example edit3.text: = dupeString (edit1.text, spinedit1.value) ━━━━━━━━━━━━━━━━━━ 首首首首首 f f 首首首首; $ [Strutils.PAS feature Returns a string ATEXT Reverse Description ReverseString '1234') = '4321' Reference function system.setlength example edit3.text: = reverseString (edit1.text); ━━━━━━━━━ 首首━━━━━━━━━━ 首首首 f━━━━━━━━ 首首(constart, alength: cardinal; const asubtext: string: string; $ [strutils.pas function Return nested string Description ASTART: Nested start position; ALENGTH: Nested length; stuffstring ('abcd' , 2, 0, '12') = 'a12bcd' Reference function system.copy example Edit3.Text: = stuffstring (edit1.text, spinedit1.value, spinedit2.value, edit2.text); ━━━━━ ━━━━━━━ 首━━━━━━ 首首首━━━━ 首首 f f━::: Array Of String: String; OverLoad; $ [Strutils.PAS feature Random Return to one element description in the array of Avalues It is recommended to execute the randomize reference function system.random example randomize; edit3.text: = randomfrom (['A1', 'A2', 'A3', 'A4']); ━━━━━━━━━━━━━━━━━━━ ━━━━━━━ The first Function ifthen (Avalue: boolean; const straigh: string; Afalse: string; overload; $ [strutils.pas feature Returns the specified logical string Description Ifthen (True, 'Yes', 'No') = 'is'; ifthen (false, 'is', 'No') = 'No'

Example edit3.text: = ifthen (checkbox1.checked, edit1.text, edit2.text); ━━━━━━━━ 首首首━━━━━━━━━ 首首━━━━ (━━ ((首 ((((((((((((( : const attount: integer: String; $ [strutils.PAS feature Returns the ACOUNT characters on the left of the string Atext Description Leftstr ('123456', 3) = '123' Reference Function System.copy Example Edit3.Text: = Leftstr Edit1.Text, Spinedit1.Value); ━━━━━━━━ 首首首━━━━━━━━ 首首━━━━━━ (首首首 f f;;; (Const Ate: Integer): String; $ [Strutils .PAS function Returns the ACOUNT characters on the right side of the string AText Description Rightstr ('123456', 3) = '456' Reference function system.copy example Edit3.Text: = Rightstr (Edit1.Text, Spinedit1.value); ━━━ ━━━━━━━ 首首首━━━━━━ 首首首━━━━ 首首首 f f f f f (Const Atext: Integer): String; $ [Strutils.PAS feature Return string AText starting from Astart ACOUNT character is actually a copy reference function system.copy example Edit3.Text: = midstr (edit1.text, spinedit1.value, spindit2.value); ━━━━━━━━━━━━━━━━━━━ ━━━━ 首 The first Function Searchbuf (BUF: PCHAR; BUFLEN: Integer; SELSTART, SELLENGTH: Integer; SearchString: string; options: tstringsearchOptions = [sodown]): pchar; $ [s Trutils.PAS feature Returns the first search pointer location Description This function is often used in the text search string reference

Examples /// Begin SearchBuf function SearchEdit (EditControl: TCustomEdit; const SearchString: String; SearchOptions: TStringSearchOptions; FindFirst: Boolean = False): Boolean; var Buffer, P: PChar; Size: Word; begin Result: = False; if ( Length (searchString) = 0) THEN EXIT; size: = editcontrol.gettextlen; if (size = 0) THEN EXIT; buffer: = stralloc (size 1); try EditControl.getTextBuf (buffer, size 1); P: = SearchBuf (Buffer, Size, EditControl.SelStart, EditControl.SelLength, SearchString, SearchOptions); if P <> nil then begin EditControl.SelStart: = P - Buffer; EditControl.SelLength: = Length (SearchString); Result: = True ; end; finally StrDispose (Buffer); end; end; procedure TForm1.Button1Click (Sender: TObject); var SearchOptions: TStringSearchOptions; begin SearchOptions: = []; if CheckBox1.Checked then Include (SearchOptions, soDown); if CheckBox2. Checked THEN INCLUDE (SearchOptions, Somatchcase); if CheckBox3.checked Then Include (Searchoptions, SowholeWord); Search-edit (Memo1, Edit1.Text, SearchOptions; memo1.setfocus; end; /// end searchbuf ━━━━━━━━ 首首首━━━━━━━ 首首首 f━━━ (((const at: string; alength: tsoundexlength = 4) : String; $ [Strutils.PAS feature Returns string Description Depending on the detection method (SOUNDEX) can find a string; http://www.nara.gov/genealogy/coding.html Reference example edit2.text: = Soundex (edit1.text, spinedit1.value); ━━━━━━━━━ 首首首━━━━━━━ 首首首━━━━;;; 首首首首;;; alength: tsoundexintLength = 4): Integer; $ [Strutils.PAS feature return detection integendum Description ALENGTH value, the higher the decoding accuracy, the higher the reference

Example spiendit2.value: = Soundexint (edit1.text, spinedit1.value); ━━━━━━━━━ 首首━━━━━━━━ 首首 f━━━━━━━━━ 首;: String; $ [Strutils.PAS function Returns the decoding of the detection integer Decodesoundexint (Soundexint ('Hello')) is equivalent to the SoundEx ('Hello') Reference Example Edit2.Text: = DecodesoundExint (Spinedit2.Value); ━━━━━━━) ━━━━━━━━━━━ 首 The first Function SoundExword (const at: string): Word; $ [strutils.pas feature return detection text Numerical Description No parameter ALENGTH has been fixed to 4 reference

Example spinedit2.value: = SoundExword (edit1.text); ━━━━━━━━━ 首首━━━━━━━━━ 首首 f━━━━━━━━━ 首;; $ [strutils.pas Function Returns Decoding Decoding Decoding Description DecodesoundexWord (SoundExword ('Hello')) is equivalent to SoundEx ('Hello')

Example edit2.text: = decodesoundexword (Spinedit2.Value); ━━━━━━ )━ 首首首━━━━━━━━ 首首 f━━━━━━━ (((;; Atength: tsoundexlength = 4 : Boolean; $ [strutils.pas feature returns whether the probe string of the two strings is the same instructions Result: = SOUNDEX (ATEXT, ALENGTH) = Soundex (AOTHER, ALENGTH) Reference

Example CheckBox1.checked: = SoundexSimilar (edit1.text, edit2.text, spinedit1.value); ━━━━━━━━ 首首首首━━━━━━━━ 首首 f━━━━━━━━ ((首 ((━━━ (((( : String; ALENGTH: TSOUNDEXLENGTH = 4): Integer; $ [Strutils.PAS feature Returns the results of comparing two strings of probing strings Result: = ansiCompareStr (Soundex (ATEXT, ALENGTH), SOUNDEX (AOTHER, ALENGTH)) Reference function syssentils.ansicomparestr's example spinedit2.value: = SoundexCompare (edit1.text, edit2.text, spinedit1.value); ━━━━━━━━ 首首首━━━━━━━━━━ 首首首━━━━━━━━━━ 首首首━━━━━━━━━━ 首(const aText, AOther: string): Boolean; $ [StrUtils.pas SoundexSimilar function call returns the string to detect whether two identical string system variables Description default function StrUtils.AnsiResemblesText AnsiResemblesProc reference examples [var AnsiResemblesProc: TCompareTextProc = SoundexProc ;] ━━━━━━━━━━━━━━━━━━━ 首首首 f 首::::: pstring; deprecated; $ [sysutils.pas feature Returns a new string pointer Address Description String S Returns NULLSTR Reference Procedure System.New Example Begin Newstr, Disposestr Procedure TFORM1.BUTTON1CLICK (Sender: Tobject); var P: pstring; begin p: = newsTr (edit1.text); edit2.text: = P ^; DISPOSESTR (P); end; End Newstr, DisposeStr ━━━━━━━━━ 首━━━━━━━━ 首首首;;;;; 首首;; DepRecated; $ [SYSUTILS.PAS feature release characters String pointer P Resource Description Mix Function Newstr Using Reference Procedure System.Dispose Example ━━━━━━━ 首首━━━━━━━━━ 首首首━━━━━ (((var P: PString; const S: String); Deprecated; $ [systemils.pas feature to update string s to string pointer P Designing Update Value Resource Reference Function Sysutils.newstr; Function Sysutils.disposeStr Example Begin, BESUNECTION SYSUTILS.DISPOSESTR Assignstr Procedure TFORM1.BUTTON1CLICK (Sender: Tobject); VAR P: pstring; begin p: = nil; assignstr (p, edit1.text); edit2.text: = p ^; DISPOSESTR (P); End; End Assignstr ━━ ━━━━━━━━ 首首━━━━━━━ 首首首━━━━━ 首首首首━;;; Const S: String;

$ [Sysutils.pas feature After the string DEST, add string s, which is equivalent to DEST: = DEST S; Delphi6 is not recommended to use the reference example Begin Appendstr Procedure TFORM1.BUTTON1CLICK (Sender: TOBJECT); var s: string; begin S: = edit2.text; appendstr (s, edit1.text); edit2.text: = s; end; end; End appendstr ━━━━━━━━━ 首首首━━━━━━━━ 首Uppercase (const s: string): String; $ [sysutils.pas feature Returns overridend form in string S. Description Non-lowercase characters do not process Reference procedure system.setlength example edit2.text: = Uppercase (edit1.text); ━━━ ━━━━━━━━ 首━━━━━━━ 首首首━━━━ 首首首首 f ;er:: String; $ [Sysutils.PAS feature Returns the lowercase of the string S. Description Non-uppercase characters do not process reference Procedure system.setlength example edit2.text: = lowercs (edit1.text); ━━━━━━━━━ 首首━━━━━━━━ 首首 f━━━ ((((((((((((Const S1, S2: String): Integer; $ [sysutils.pas feature returns two characters description When S1> S2 return value> 0; when S1 example spinedit1.value: = CompareStr (edit1.text, edit2.text); ━━━━━━━━━━ ━━━━━━━━━━━ 首 The first Function CompareMem (P1, P2: Pointer; Length): Boolean; Assembler; $ [SYSUTILS.PAS feature Return to compare two memory pointer Description CompareMem (Pchar (' 12A '), PCHAR (' 12c '), 2) = true; CompareMem (Pchar (' 12a '), PCHAR (' 12C '), 3) = FALSE reference

Example checkbox1.checked: = comparem (Self, Form1, 8); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━et━━:::;; Integer; $ [Sysutils.pas feature returns comparison two string instructions Not case sensitive

Example spinedit1.value: = CompareText (edit1.text, edit2.text); ━━━━━━━━━ 首首━━━━━━━━ 首首首━━━━━━━━ 首 f f━━━et::: Boolean; $ [sysutils.pas feature returns two strings waiting to wait for the case

Example checkbox1.checked: = Sametext (edit1.text, edit2.text); ━━━━━━━━━ 首首━━━━━━━━ 首首 f━━━━━━━━ 首首━━:::: String; $ [SYSUTILS.PAS function Returns the uppercase of the string S. Description ANSI (American National Standards Institute) US National Standard Association; non-lowercase characters unchange reference function windows.charupperbuff example Edit2.Text: = ANSIUPPERCASE (Edit1.Text); ━━━━━━━━━━━━━━━━━━━ 首首首首 f 首首::::: String; $ [SYSUTILS.PAS feature Returns the lowercase of the string s Description non-uppercase characters Do not processes the reference Function Windows.CharLowerBuff example edit2.text: = ansilowercase (edit1.text); ━━━━━━━━ 首首首━━━━━━━━ 首首首━━━━ ((((Const S1, S2: String): Integer; $ [sysutils.pas function Reverse compare two string description When S1> S2 return value> 0; when S1S2 return value> 0; when S1S2 returns value> 0; when S1S2 returns> 0; S1S2 return value> 0; when S1S2 returns value> 0; when S1S2 returns value> 0; when S1S2 returns value> 0; when S1 ━━━━━━━━━━━━━━━━━━━━━ The first function isvalidident (const Ident: String): Boolean; $ [sysutils.pas function Return string ident is the correct identifier Description Identifier :: Letters | Underline [Letter | Underline | Digital] ...

Example checkbox1.checked: = isvalidident (edit1.text); ━━━━━━━━━ 首首━━━━━━━━ 首首首━━::: String; OverLoad; $ [SYSUTILS .PAS headlight INTTOSTR (Value: INT64): String; overload; $ [systemils.pas feature return integer value VALUE Convert to string Description Format ('% d', [value]) Reference function sysutils.fmtstr example edit2.text: = INTOSTR (Spinedit1.Value); ━━━━━━━━━ 首首首━━━━━━━ 首首首━━━; ((Value: Integer; Digits: Integer): String; OverLoad; $ [SYSUTILS. PAS headlight INTTOHEX (Value: INT64; DIGITS: Integer): string; overload; $ [sysutils.pas feature returns the integer value VALUE to convert to hex performance results; format ('%. * x', [Digits, Value] Description Parameter DIGITS Specifies the minimum width of the character; the minimum width will be filled with the reference function sysutils.fmtstr example edit2.text: = INTTOHEX (Spinedit1.Value, Spinedit2.Value); ━━━━━━━━━━━━━━ ━━━━━━━━ 首 The headlight strt ": integer; $ [sysutils.pas feature Return String S) Convert to an integer Description String Non-integer Expression will cause anomalous reference procedure system.val Example spinedit1.value: = start (edit1.text); ━━━━━━━━━ 首首━━━━━━━━━ 首首 f━━━━━━━━ 首首 f;;; default: integer: integer; $ [SYSUTILS.PAS function return word String S converted into an integer description string non-integer expression When returning a default value default reference procedure system.val example spinedit1.Value: = startDef (edit1.text, 0); ━━━━━━━━━━━━━ ━━━━━━━ 首 The headlight trystrt (Const S: String; Out value: INTEGER): Boolean; $ [sysutils.pas function Return string S converted into an integer value to successfully describe string non-integer expression False Value and outputs 0 as the reference example System.Val procedure /// Begin TryStrToInt procedure TForm1.Button1Click (Sender: TObject); var I: Integer; begin CheckBox1.Checked: = TryStrToInt (Edit1.Text, I); SpinEdit1. Value: = i; end; /// end trystrtoint ━━━━━━━━ 首首首━━━━━━━ 首首首 f━━━━━: 首首首 f f::::::::: c: 印64; $ [sysutils.pas Function Returns String S Converts to Sixty-Four Integers Description Strings Non-sixty-four-bit integer expressions will cause an exception reference procedure system.val example spinedit1.value: = start64 (edit1.text);

━━━━━━━━━━━━━━━━━━━━ 首首首 f━━━━ 首首首 f (const default: int64): int64; $ [sysutils.pas feature return string S converted into Sixty-fourth integer description string Non 64-bit integer expression When returning to the default value default reference process1.value: = start64def (edit1.text, 0); ━━━━━━━━━━ ━━━━━━━━━━ 首 The first Function TrystrtOint64 (Const S: intend; out value: int64): boolean; $ [sysutils.pas feature return string S converted to sixty-four-bit integers VALUE Successful description String Non-sixty-four-bit integer Expression Returns false and value will output to 0 reference procedure system.val example // begin trystron1click (sender: Tobject); var i: int64; begin checkbox1.checked: = Trystrtoint64 (Edit1.Text, I); Spinedit1.Value: = i; end; /// end trystrtoint64 ━━━━━━━━ 首首━━━━━━━━ 首首: bolean; $ [sysutils.pas feature Returns String S Convert to logic values Description Character Non-logical expression will cause an abnormal reference function sysutils.trystobool example checkbox1.checked: = strtobool (edit1.text); ━━━ ━━━━━━━ 首首━━━━━━━ 首首首━━━━━━ 首首首 f f f f;; (const default: boolean): boolean; $ [sysutils.pas feature return string S converted into logic value description Returns the default value default reference in the character non-logical expression Function Sysutils.t Rystobool example checkbox1.checked: = strOBoolDef (edit1.text, false); ━━━━━━━━ 首首首━━━━━━━━ 首首首━━━━━━ (((Const S: String; Out value: Boolean : Boolean; $ [sysutils.pas feature Returns Strings S Convert to logic value Value Successfully Describe [Note] 0 is true; not 'true' and 'false'; Delphi6 bug fixes the following Function SySUTILS. AnsiSameText; var SysUtils.TrueBoolStrs; var SysUtils.FalseBoolStrs example /// Begin TryStrToBool procedure TForm1.Button1Click (Sender: TObject); var B: Boolean; begin SetLength (TrueBoolStrs, 2); SetLength (FalseBoolStrs, 2); TrueBoolStrs [0 ]: = 'True'; falseBoolSTRS [0]: = 'false'; TrueBoolSTRS [1]: = 'yes'; falseBoolSTRS [1]: = 'no'; checkbox1.checked: = trystertobool (edit1.text, b) ;

CheckBox2.Checked: = B; end; /// End TryStrToBool additional /// Begin TryStrToBool function TryStrToBool (const S: string; out Value: Boolean): Boolean; function CompareWith (const aArray: array of string): Boolean; var I: integer; begin result: = false; for i: = low (aaRray) To high (aaarray) DO if Ansisametext (s, AARRAY [i]) THEN BEGIN Result: = true; Break; end; end; var lresult: Extended; begin Result: = TryStrToFloat (S, LResult); if Result then Value: = LResult <> 0 else begin Result: = True; // amendments are VerifyBoolStrArray; if CompareWith (TrueBoolStrs) then Value: = True else if CompareWith ( FalseBoolSTRS) THEN value: = false else result: = false; end; end; /// end trystobool ━━━━━━━━ 首首━━━━━━━━ 首首首首━━━ (((━ ((首 (((((((((B: Boolean UseBoolSTRS: Boolean = false: String; $ [sysutils.pas function return logic value B converted to string Description BoolTostr (false, false) = '0'; BoolTostr (false, true) = '- 1' Reference var sysutils .TrueBoolSTRS; var sysutils.falseBoolSTRS example Edit1.text: = BoolTostr (checkbox1.checked, checkbox2.checked); ━━━━━━━━━ 首首首━━━━━━━━━━ 首Function LoadStr (Ident: Integer): String; $ [SYSUTILS.PAS feature Returns String Resources Normal Reference Function Sysutils.FindStringResource Example Edit2.Text: = LOADSTR (EditDef (Edit1) .Text, 0)); ━━━━━━━━━━━━━━━━━━━━ 首首首━━━━━━━━ 首首 f f; Const Args: Array Of Const: String; $ [SYSUTILS. PAS feature returns a formatted string Resource Description String Resource is the internal resource reference function sysutils.fmtstr; function sysutils.FMTSTRESOURES example; ━━━━━━━━━━━━━━━━━━━━━━ ━━ The first Function strlen (const str: pchar): cardinal; $ [sysutils.pas feature returns the length of the pointer string) Trigger an abnormal reference when the pointer string STR is NIL

Example spinedit2.value: = strlen (pchar (edit1.text)); ━━━━━━━━━ 首首首━━━━━━━━ 首首━━━━━::::;; $ [Sysutils.PAS function Returns the end of the pointer string) When the pointer string STR is NIL, an exception reference example edit2.text: = streven (pchar (edit1.text)) - Spinedit1.Value; ━━━━━━ ━━━━━━ 首首━━━━━ 首首首 f f━ 首首 (DEST: PCHAR; Const Source: pchar; count: cardinal): Pchar; $ [sysutils.pas feature returns the number of memory specified by the pointer string SOURCE Count copy override to the pointer string DEST Description DEST does not assign a resource to trigger an exception S reference Function System.move example /// begin strmove procedure TFORM1.BUTTON1CLICK (Sender: Tobject); var vbuffer: pchar; begin vbuffer: = '0123456789 '; Strmove (vbuffer, pchar (edit1.text), Spinedit1.Value; edit2.text: = vbuffer; end; /// end strmove ━━━━━━━━━━━━━━━━━━━ ━━ 首 The first function strcopy (dest: pchar; const source: pchar; $ [sysutils.pas feature returns to copy the pointer string source to the pointer string DEST Description DEST should have assigned enough space to trigger Abnormal reference

Example /// Begin Strcopy Procedure TFORM1.BUTTON1CLICK (Sender: Tobject); var vbuffer: pchar; begin getmem (vbuffer, length (edit1.text) 1); strcopy (vbuffer, pchar (edit1.text); edit2. Text: = vbuffer; freemem (vbuffer); end; /// end strcopy ━━━━━━━━━ 首首首━━━━━━━ 首首首首━━━━━;;;;;;;;;;;; Const Source: pchar : PCHAR; $ [sysutils.pas feature returns the end of the pointer string source to the pointer string Dest Description can be connected to the pointer string reference

Example // Begin Strecopy Procedure TFORM1.BUTTON1CLICK (Sender: Tobject); Var vbuffer: array [0..255] of char; begin strecopy (strecopy (vbuffer, pchar (edit1.text)), Pchar (Edit2.Text) Edit3.Text: = vbuffer; end; /// end streecopy ━━━━━━━━━ 首首━━━━━━━ 首首首 f━━━━━━ 首;; Const Source: pchar; Maxlen: cardinal: Pchar; $ [sysutils.pas feature returns to copy the pointer string source Specify length Maxlen to Pointer string DEST Description DEST Description DEST should allocate enough space to trigger an abnormal reference

Example /// Begin Strlcopy Procedure TFORM1.BUTTON1CLICK (Sender: Tobject); Var vbuffer: array [0..255] of char; ber; begin strlcopy (vbuffer, pchar (edit1.text), spinedit1.value; edit2.text: = vbuffer; end; /// end strlcopy ━━━━━━━━ 首首首━━━━━━━━ 首首首 f 首;;; const Source: string: pchar; $ [sysutils .PAS feature returns to copy the pointer string source to the pointer string Dest Description Strlcopy (DEST, PCHAR (SOURCE), Length (Source) Reference Function Sysutils.Strlcopy Example // Begin Strpcopy Procedure TFORM1.BUTTON1CLICK (Sender: Tobject VAR VBUFFER: Array [0..255] of char; begin strpcopy (vbuffer, pchar (edit1.text)); edit2.text: = vbuffer; end; /// end strpcopy ━━━━━━━━ ━━━━━━━━━━━ 首 The first Function StrPlcopy (DEST: PCHAR; Const Source: String; Maxlen: cardinal): PCHAR; $ [SYSUTILS.PAS feature Return to the pointer to the pointer to the pointer Strous Dest Description Strlcopy (DEST, PCHAR (SOURCE), MAXLEN) Reference function sysutils.strlcopy example // begin strplcopy procedure tform1.button1click (sender: Tobject); var vbuffer: array [0..255] of char; Begin Strplcopy (vbuffer, edit1.text, spinedit1.val UE); edit2.text: = vbuffer; end; /// end strplcopy ━━━━━━━━ 首首首━━━━━━━ 首首首 f━━━━━━━━ 首首;; Const Source: Pchar : PCHAR; $ [SYSUTILS.PAS function Returns the connection pointer string DEST and pointer string Source Description Strcopy (STREND (DEST), SOURCE) Reference Function Sysuntils.Strcopy Example // Begin Strcat Procedure TFORM1.BUTTON1CLICK (Sender: Tobject) VAR vbuffer: array [0..255] of char; begin strpcopy (vbuffer, edit1.text); strcat (vbuffer, pchar (edit2.text)); edit3.text: = vbuffer; end; /// end STRCAT ━━━━━━━━━━ 首首首首━━━━━ The first Function strlcat (const: pchar; const source: pchar; maxlen: cardinal: pchar; $ [sysutils.pas feature return connection Pointer string DEST and pointer strings Source Description [Note] Maxlen specifies the maximum length of the connection to the length of the pointer string Source length reference

Example // Begin Strlcat Procedure TFORM1.BUTTON1CLICK (Sender: Tobject); var vbuffer: array [0..255] of char; begin strpcopy; strlcat (vbuffer, pchar (edit2.text), Spinedit1.value); edit3.text: = vbuffer; end; /// End strlcat ━━━━━━━━━ 首━━━━━━━━━━ 首首首 f━━━━━━━━━ 首首首 f━━━━ (━ ((━━━━━ 首首首: Integer; $ [sysutils.pas function Returns comparison two pointer string Description When S1> S2 return value> 0; when S1 example spinedit1.value: = strcomp (pchar (edit1.text), pchar (edit2.text) ); ━━━━━━━━━━━━━━━━━━━━ 首首 f f f f f): Integer; $ [sysutils.pas feature returns two pointer strings Description When S1> S2 returns value> 0; when S1 example spinedit1.value: = stricomp (pchar (edit1.text), pchar (edit2.text)); ━━━━━━━━━━━━━━━━━━ ━━━━━ 首 The first Function strlcomp (const str1, str2: pchar; maxlen: cardinal): Integer; $ [sysutils.pas feature returns Two pointer strings Specify length Description When S1> S2 return value> 0; S1 example spinedit1.value: = strlcomp (pchar (edit1.text), pchar (edit2.text), spiedit2.value) ━━━━━━━━━ 首首首首━━━━━━━ 首首首首首━━━━━━━━ 首Strlicomp (Const str1, str2: pchar; maxlen: cardinal): Integer; $ [sysutils.pas feature returns Two pointer strings Specify length description S1> S2 return value> 0; when S1 example spinedit1.value: = strlicomp (pchar (edit1.text), pchar (edit2.text), spinedit2.value) ━━━━━━━━━━━━━━━━━━━━ ━━━━━━ 首 The first Function strscan (const str: pchar; chr: char): pchar; $ [sysutils.pas feature Return to the pointer string STR Search Character ChR The first address description is not found to return empty Pointer reference example edit2.text: = strscan (pchar (edit1.text), '*'); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━━ ((((((((((((Const Str: PCHAR; Chr: char): PCHAR; $ [sysutils.pas function Return to the pointer string STR search character chr last appearance address description is not found, return to the empty pointer reference

Example edit2.text: = STRSCAN (pchar (edit1.text), '*'); ━━━━━━━━━ 首首━━━━━━━━ 首首首━━━━━ (━━ 首 f f━━ ((((((((((((((((((((( PCHAR): PCHAR; $ [SYSUTILS.PAS function Returns the first appearance of the first appearance in STR1, the first appearance of the first appearance is not found; STRPOS ('12345', '3') = '345' reference

Example edit3.text: = Strpos (pchar (edit1.text), pchar (edit2.text)); ━━━━━━━━━━ 首━━━━━━━━━ 首首 f━━━━ (((((((((((((Str: PCHAR): PCHAR; $ [sysutils.pas feature return pointer string STR write instructions Non-lowercase characters do not process reference example edit1.text: = Strupper (pchar (edit2.text)); ━━━━━━━━━━━ ━━━━━━━━━━ The first Function strlower (str: pchar): pchar; $ [sysutils.pas feature return pointer string STR lowercase instructions non-uppercase characters do not process reference

Example edit1.text: = strlower (pchar (edit2.text)); ━━━━━━━━━ 首首━━━━━━━━ 首首首━━━━━::::::: STRING; $ [SYSUTILS.PAS function returns the pointer string STR conversion into string instructions can also be directly assigned

Example edit1.text: = StrPas (pchar (edit2.text)); ━━━━━━━━━ 首首首━━━━━━━━ 首首━━━━━━━━━ 首;; $; Sysutils.PAS feature Returns memory resources for assignment Specified spaces to pointer string Description space size will also be saved; use StrDispose to all release Reference function system.getMem example // Begin Stralloc Procedure TFORM1.BUTTON1CLICK (Sender: TOBJECT); var P: pchar; begin p: = stralloc (spinedit1.value); showMessage (Inten (p))); DEC (p, sizeof (cardinal)); showMessage (Cardinal (P) ^)))) Inc (p, sizeof (cardinal)); strdispose (p); end; /// end stralloc ━━━━━━━━ 首首首首━━━━━━ 首首首首首━━━ (首 ((( : Pchar): Cardinal; $ [sysutils.pas feature returns the unpredictable result of the unpredictable result reference function system.sizeof example spinedit1.Value: = strbufsize (SPINEDIT2.VALUE) with the Function STRALLOC. ); ━━━━━━━━━━ 首━━━━━━━━━ The first Function strnew (Const str: pchar): Pchar; $ [sysutils.pas feature returns a new pointer string description If Str is nil nil is returned reference function SysUtils.StrLen; function SysUtils.StrMove; function SysUtils.StrAlloc example /// Begin strNew, StrDispose procedure TForm1.Button1Click (Sender: TObject); var P: Pchar; begin p: = strnew (pchar (edit1.text)); showMessage (P); strdispose (p); end; /// end strnew, strdispose ━━━━━━━━━━━━━━━━━━━━ ━━━━━ The first procedure strdispose (STR: PCHAR); $ [SYSUTILS.PAS Features Release Pointer String STR Memory Resource Description If the STR is NIL, no processing; and release space size information reference function system.dec; function System.sizeof; Function System.freemem Example ━━━━━━━━━ 首首首━━━ 首━━ 首首首首首首 ;━━━ 首首; const args: array of const : String; $ [sysutils.pas feature Returns the character form of formatting a array constant by specifying means that this function is the most used function in Delphi, and now list several examples to give you an intuitive understanding "%" [Index ":"] ["-"] [Width] ["." Summary] type Format ('x =% d', [12]); // 'x = 12' // Most normal Format ('x =% 3D ', [12]); //' x = 12 '// Specify the width Format (' x =% f '

[12.0]); // '= 12.00' // floating point FORMAT ('x =%. 3f', [12.0]); // '= 12.000' // Specify decimal format ('x =%. * f ', [5, 12.0]); //' X =%. 5D ', [12]); //' x = 00012 '// Front Supplement 0 Format ('x =%. 5X', [12]); // 'x = 0000c' // hex Format ('x =% 1: D% 0: D', [12, 13]); / / 'x = 1312' // use index format ('x =% p', [nil]); // 'x = 00000000' // pointer Format ('x =% 1.1e', [12.0]); / I // Scientific Distance Format ('x = %%', []); // 'x =%' // Get "%" S: = Format ('% s% D ', [S, I]); // s: = S STRTOINT (I); // Connection string reference proceduer sysutils.fmtstr example edit1.text: = format (edit2.text, [strtofloatdef (edit.3 .Text, 0)]); ━━━━━━━━━━━━━━━━━━━ 首首首━━━;;;; 首首首首;; const format: string; constrays: array of const) $ [Sysutils.pas function Format a character form of a array constant in a specified manner Returns to the description Reference function sysutils.formatbuf; function system.length; function system.setlength example ━━━━━━━ ━━━━━━ 首━━━━━━━ 首首首首首首首首;;; Const Args: Array Of Const: Pchar; $ [SYSUTILS.PAS feature Return to format an array constant in specified mode Character pointer form Description If Buffer and Format have only one for nil, return NIL reference functi ON SYSUTILS.FORMATBUF example ━━━━━━━━ 首首首━━━━━ 首首首首首;;; Maxbuflen: Cardinal; Format: Pchar; Const args: array Of const): PCHAR; $ [SYSUTILS.PAS feature returns the character pointer form of a array constant in the specified mode and length Description Strlfmt (vbuffer, 6, '% d | 12345 ", [1024]) =' 1024 | 1 '; Reference function sysutils.formatbuf example ━━━━━━━ 首首首━━━━━━━━ 首首首首;:: CardinAl; Const Format; FMTLEN: Cardinal Const args: array of const): Cardinal

$ [SYSUTILS.PAS feature returns to format an array constant to the buffer buffer in the Buffer Buffer

Example ━━━━━━━━ 首首首首首━ 首━━ 首首首首 f;; ;━ 首首首; Const Args: Array Of Const: WideString; $ [SYSUTILS.PAS Function Return Multi-byte Character Form Description Multi-byte Character Formatting a Array Constant in the Specified Way

Reference Procedure Sysutils.widefmtstr Example ━━━━━━━━ 首首首━━━━━━━ 首首首首首首首首首首首首首首;;; Const Format: WideString; Const Args: Array Of Const); $ [sysutils.pas function Returns a multi-character form format in the specified mode.

Refer to Function Sysutils.WideFormatbuf Example ━━━━━━━ 首首首首━━━━━━━ 首首首首;;:: CardinAl; Const Format; FMTLEN: Cardinal; Const Args: array of const): cardinal; $ [sysutils.pas feature returns a formatted constant to the buffer buffer by specifying

reference

Example ━━━━━━━━━ 首首首首 f 首━ 首首首首首 f f:: String; $ [SYSUTILS.PAS feature Return floating point value VALUE Convert to characters String Description When the floating point is equal to 1E15 will adopt scientific number of scientific numbers. Function sysutils.floattotext example1.text: = floattostr (now); ━━━━━━━━━━━━━━━━━━━━━ ━ The first Function Currtostr (Value: currency): String; $ [sysutils.pas feature Return currency VALUE Convert to string Description Currency only retains four decimal reference function sysutils.floattotext example EDIT1.TEXT: = Currtostr (now); ━━━━━━━━━━━━━━━━━━━ 首首 f 首首::: currency; $ [sysutils.pas feature Return floating point value VALUE Convert to currency Number "If float The number of points value is exceeding the scope will trigger an exception reference const system means.mincurrency; const systemiles.maxcurrency example edit1.text: = currtostr (FLOATTOCURR (now)); ━━━━━━━━━━━━━━━━━━━━━ ━━ The headlight floattostrf (value: extended; format: tfloatformat; precision, digits: integer): String; $ [systemils.pas feature returns floating point number to string into strings in specified format into string Description precision specified accuracy; DIGITS specifies decimal width reference Function sysutils.floattotext example /// begin floattostrf procedure tForm1.button1click (sender: Tobject); begin memo1.lines.values ['ffgeneral']: = floattostrf (StrtOFLOATDEF (ED) IT1.Text, 0), ffGeneral, spinedit1.value, spinedit2.value; memo1.lines.values ['ffexponent']: = floattostrf (strtofloatdef (edit1.text, 0), ffexponent, spinedit1.value, Spinedit2.Value ); Memo1.lines.values ['fffiXed']: = floattostrf (StrtOFLOATDEF (EDIT1.TEXT, 0), Fffixed, Spinedit1.Value, Spiedit2.Value; Memo1.Lines.Values ['FFNumber']: = floattostrf StrToFloatDef (Edit1.Text, 0), ffNumber, SpinEdit1.Value, SpinEdit2.Value); Memo1.Lines.Values [ 'ffCurrency']: = FloatToStrF (StrToFloatDef (Edit1.Text, 0), ffCurrency, SpinEdit1.Value, SpinEdit2 .Value); end; /// end floattostrf ━━━━━━━━━ 首首━━━━━━━ 首首首 f━━━ 首首首首首;; Format: tfloatformat;

Digits: Integer): string; $ [SysUtils.pas currency type conversion function returns a character string described in a specified format Digits specified fractional width of the reference function SysUtils.FloatToText example /// Begin CurrToStrF procedure TForm1.Button1Click (Sender: TObject); begin Memo1.Lines.Values [ 'ffGeneral']: = CurrToStrF (StrToCurrDef (Edit1.Text, 0), ffGeneral, SpinEdit1.Value); Memo1.Lines.Values [ 'ffExponent']: = CurrToStrF (StrToCurrDef (Edit1.Text, 0), ffexponent, spinedit1.value; memo1.lines.values ['fffiXed']: = currtostrf (strtocurrdef (edit1.text, 0), fffiXed, spinedit1.value; memo1.lines.values ['ffnumber'] : = CurrToStrF (StrToCurrDef (Edit1.Text, 0), ffNumber, SpinEdit1.Value); Memo1.Lines.Values [ 'ffCurrency']: = CurrToStrF (StrToCurrDef (Edit1.Text, 0), ffCurrency, SpinEdit1.Value); End; /// end currtostrf ━━━━━━━━━ 首━━━━━━━━━ 首首首首 f::; Const value; value; value; tfloatformat; precision : Integer; integer; $ [sysutils.pas function Returns the floating point number to the memory large-scale specified in the specified format into the pointer "DIGITS specifies the decimal width reference

Example // Begin floattotext procedure tform1.button1click (sender: Tobject); var vbuffer: array [0..255] of char; e: extended; begin E: = struploatdef (edit1.text, 0); spiT3.Value: = Floattotext (VBuffer, E, FVEXTEND, FFNUMBER, SPINDIT1.VALUE, SPINEDIT2.VALUE); Edit2.Text: = Copy (vbuffer, 1, spinedit3.value); end; /// end floattotext (━━━━━━━━ ━━━━━━ 首━━━━━━ 首首首首首首首首首首; value: Extended: String; $ [systemils.pas feature Returns floating point type Type Type Type Type Type Format Convert Format Convert to characters Strings Description Formatfloat (',. 00', 1234567890) = '1, 234, 567, 890.00' Reference function sysutils.floattotextfmt example edit1.text: = formatfloat (edit2.text, strtofloatdef (edit3.text, 0)); ━━━━━━━━━ ━━━━━━━━━━━━ 首首首首首 (const format: string; value: currency): string; $ [systemils.pas function Return to the currency type to specify the format string Format converted into a string description Formatcurr (',. 00', 1234567890) = '1, 234, 567, 890.00' Reference function sysutils.floattotextFmt example edit1.text: = formatcurr (edit2.text, stratocurrdef (edit3.text, 0)); ━━━━━━━━━ ━━━━━━━━━━━ 首 The headlight floattotextfmt (BUF: PCHAR) Const value; value; format: pchar): Integer; $ [sysutils.pas function Returns floating point number with specified format string Format Convert Memory Size Memory Size Description VALUETYPE Specifies the type reference "specified in the Nothing parameter VALUE

Example // Begin floattotextfmt procedure tform1.button1click (sender: TOBJECT); var vbuffer: array [0..255] of char; e: extended; begin E: = strandeded; = Floattotextfmt (vbuffer, e, fvextended, pchar (edit2.text)); edit3.text: = Copy (vbuffer, 1, spinedit1.value); end; /// end floattotextfmt ━━━━━━━━━━━━━━━ ━━━━━━━━━ 首 The headlight strtofloat (const S: string): extended; $ [sysutils.pas feature Returning String S Convert to floating point number Description String Non-floating point number When expressing the abnormal reference FUNCTION SYSUTILS.TEXTTOFLOAT example VAR E: Extended; Begin E: = StrtOFLOAT (edit1.text); END; ━━━━━━━━ 首首━━━━━━━━━━ 首 f━━━━━━━━━ 首首 f━━━━━━━━ ((((━━━━━━━━━━ 首首首━━━━━━━━━━ 首首首━━━━━━━━━━ 首String; const default: Extended; $ [sysutils.pas feature Returns String S) When the string is non-floating point, return to the default value default reference function sysutils.textTOFLOAT example var E: Extended; Begin E : = STRTOFLOATDEF (Edit1.Text, 0); End; ━━━━━━━━━ 首首━━━━━━━━━ 首首 f━━━━━━━ 首::: Extended: Boolean Overload; $ [sysutils.pas headlights function trystrtofloat (const s: string; out value: Single): Boolean; OVERLOAD; $ [SY SUTILS.PAS header Function trysTRTOFLOAT (Const S: Double): boolean; overload; $ [sysutils.pas feature Returning String S SMUE SULG STRRSE Non-floating point number When the string is not floating point number, return false and value of the output values of the reference function SysUtils.TextToFloat indeterminate example /// Begin TryStrToFloat procedure TForm1.Button1Click (Sender: TObject); var E: Extended; begin CheckBox1.Checked: = TryStrToFloat (Edit1.Text, E); Edit2 .Text: = formatfloat ('', e); end; /// end trystrtofloat ━━━━━━━━ 首首━━━━━ (((首首━━━ (((const s: string): Currency; $ [sysutils.PAS feature Returns String S Convert to currency Number Description String Non-currency Number Expression will cause an exception reference function sysutils.textTOFLOAT example var C: currency; begin c: = strtocurr (edit1.text); END ━━━━━━━━━━━━ 首━━━━━━━ 首 The first Function Strtocurrdef (Const S: String;

Const Default: currency: currency; $ [sysutils.pas feature Returns String S converted to currency Number Description String Non-currency Number Expression Returns Default Reference Function Sysutils.TextTofloat example var C: currency; begin C: = STRTOCURRDEF (EDIT1.TEXT, 0); END; ━━━━━━━━ 首首首━━━━━━ (首首首首 f ((((Const S: String; Out Value: Currency): Boolean; $ [SYSUTILS.PAS feature Returns String S Convert to Currency Value Successfully Describe String Non-currency Number Expression Returns False and VALUE will output the value of Uncertain Value Reference function sysutils.textTofloat example // Begin Trystrtocurr Procedure TFORM1.BUTTON1CLICK (Sender: TOBJECT); VAR C: currency; begin checkbox1.checked: = trysTrtocurr (edit1.text, c); edit2.text: = formatCurr ('', c); end; /// end trystrtocurr ━━━ ━━━━━━━ 首首━━━━━━━ 首首━━━━━;; Value; ValueType: TfloatValue): Boolean; $ [SYSUTILS.PAS function Return to convert the pointer string buffer to no Type Variable Value Description ValueType Specifies the Type Reference of None Type Parameters Value

Examples /// Begin TextToFloat procedure TForm1.Button1Click (Sender: TObject); var E: Extended; begin CheckBox1.Checked: = TextToFloat (PChar (Edit1.Text), E, fvExtended); Edit2.Text: = FormatFloat ( '' , E); end; /// end textttofat ━━━━━━━━ 首首━━━━━ 首首首首首首 f 首首首首首; $ [sysutils.pas feature Return Date DateTime Convert to String Description Conversion Format The System Variable ShortdateFormat Control Reference Function Sysutils.DateTimetString; var sysutils.shortdateformat EDIT1.TEXT: = DATETOSTR (date); ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ━━━━━━━ header function TimeToStr (const DateTime: TDateTime): string; $ [SysUtils.pas function return time DateTime converted into a string format conversion described with reference to function SysUtils.DateTimeToString LongTimeFormat control by the system variable; var SysUtils.LongTimeFormat Example edit1.text: = Timetostr (date); ━━━━━━━━━ 首首━━━━━━━━ 首首━━━━━━━━ 首 f f;; $ [xiSutils.PAS function Return Date Time DateTime Convert to String Description Conversion Format The System Variable ShortdateFormat and LongTimeFormat Control Reference Function Sysutils.Datetimetostring EDIT1.TEXT: = DateTimetostr (now); ━━━━━━━━━━━━━━━━━━━━━━ ━━━━ ━ 首首 f fc E (Const S: String): TDATETIME; $ [SYSUTILS.PAS feature Returns String S Convert to date Description Character Non-date Expression will cause an exception reference function sysutils.tryStodate example DateTimePicker1.Date: = stratodate (edit1.text); ━━━━━━━━━━━━━━━━━━ 首首首首首首首首首首首首首 f 首; const default: tdatetime; $ [sysutils.pas feature return string S converted into Date Description Character Non-Date Expression Returns Default Reference Function Sysutils.TryStodate An Example DateTimePicker1.Date: = stradateDef (Edit1.Text, Date); ━━━━━━━━━━━━━━━━━━━━━ ━━━ The first Function trystodate (const S: string; out value: tdatetime): boolean; $ [sysutils.pas feature Return String S Convert to date VALUE Successfully Description Character Non-Date Expression Returns false and value will output 0 reference

Examples /// Begin TryStrToDate procedure TForm1.Button1Click (Sender: TObject); var vDateTime: TDateTime; begin CheckBox1.Checked: = TryStrToDate (Edit1.Text, vDateTime); DateTimePicker1.Date: = vDateTime; end; /// End TryStrToDate ━━━━━━━━━━━━━━━━━━━ 首首首首 f:::: TDATETIME; $ [SYSUTILS.PAS feature Return String S Convert to Time Description Character Non time Expressing will cause an exception reference function sysutils.trystrtotime: = strtotime (edit1.text); ━━━━━━━━━ 首首首━━━━━━━━━ 首首首━━━━━d━━━━ (((((Const S : string; const default: TDateTime): TDateTime; $ [SysUtils.pas function returns a string S is converted to the default value default time reference function SysUtils.TryStrToTime example DateTimePicker1.Time is returned if the character is not time expression: = StrToTimeDef (Edit1. TEXT, TIME); ━━━━━━━━ 首首首━━━━━━━ 首首首 f━━━━ (首 (const S: string; out value: tdatetime): boolean; $ [sysutils.pas feature return String S converted to time VALUE Successfully explained that the character is not time expression returns false and value will output to 0 reference

Examples /// Begin TryStrToTime procedure TForm1.Button1Click (Sender: TObject); var vDateTime: TDateTime; begin CheckBox1.Checked: = TryStrToTime (Edit1.Text, vDateTime); DateTimePicker1.Time: = vDateTime; end; /// End TryStrToTime ━━━━━━━━━━ 首━━━━━━━ 首首首 f 首:::: 首 (const S: string): tdatetime; $ [sysutils.pas feature return string S converted to date Time Description Character Non Date Time Expression will cause an exception reference function sysutils.trystrtodatetime example edit1.text: = DATETITOSTR (STRTODATETIME (Edit2.Text)); ━━━━━━━━━━ 首首首━━━━━━━━ 首首function StrToDateTimeDef (const S: string; const default: TDateTime): TDateTime; $ [SysUtils.pas function returns a string S is converted to the default value default date and time reference function SysUtils.TryStrToDateTime Edit1 example returns the date and time when the non-character expression. Text: = DateTimetostr (2.text, now); ━━━━━━━━━ 首首首━━━━━━━ 首首首 f━━━ (((Const S: String; Out Value: TDATETIME) : Boolean; $ [sysutils.pas feature Return String S Convert to date Time Value Successfully Describe Character Non-Date Time Expression Returns False and Value will output 0 reference

Examples /// Begin TryStrToDateTime procedure TForm1.Button1Click (Sender: TObject); var vDateTime: TDateTime; begin CheckBox1.Checked: = TryStrToDateTime (Edit1.Text, vDateTime); Edit2.Text: = DateTimeToStr (vDateTime); end; // / END TRYSTRTODATETIME ━━━━━━━━ 首首首━━━━━━━ 首首首━━━━;; 首首首首;;; const format: string; datetime: tdatetime); $ [sysutils.pas function The specified format format is formatted to date time DATETIME and return to the string Result Reference function system.setstring example ━━━━━━━━━━━━━━━━━━━━━━ ━━━ header function GetLocaleStr (Locale, LocaleType: Integer; const Default: string): string; platform; $ [SysUtils.pas system function returns the current value of the specified parameter string Description GetLocaleStr (GetThreadLocale, LOCALE_SLANGUAGE, '') = ' Chinese (China) 'Reference Function Windows.getlocaleInfo Example Edit1.Text: = Getlocalestr (Getthreadlocale, Spinedit1.Value,'

'); ━━━━━━━━━━━━━━━━━━━ The headlight GetLocaleChar (Locale, LocaleType: Integer; Default: char): char; platform; $ [sysutils.pas feature returns current character value of the specified parameter system described GetLocaleChar (GetThreadLocale, LOCALE_STHOUSAND, # 0) = ',' reference function Windows.GetLocaleInfo example Edit1.Text: = GetLocaleChar (GetThreadLocale, LOCALE_SLANGUAGE, # 0); ━━━━━━━━ ━━━━━━━━━━━ 首 The first Function ByType (Const S: String; INDEX: TMBCSBYTYPE; $ [sysutils.pas feature Returns the character of the character string S position Index in MBCS Type Description Byte character system: multi-byte character system system (mbcs) Reference Var systemils.syslocale example spinedit1.Value: = ORD (bytetype (edit1.text, spinedit2.value); ━━━━━━━━━━━━━━━━━ ━━━━━━━ 首 The first Function strbyType (str: pchar; index: cardinal): TMBCSBYTYPE; $ [sysutils.pas feature returns the characters on the pointer string STR position in the MBCS Type Description INDEX starts reference from 0 Var sysutils.syslocale example spinedit1.value: = ORD (StrbyteType (pchar (edit1.text), spiedit2.value)); ━━━━━━━━━━ 首━━━━━━━━━━ 首首首━━━━━━━━━━ 首首首━━━━━━━━━━ 首首ByTToCharlen (const S: String; Maxlen: Integer): Integer; $ [sysutils.pas feature Returns how many multi-byte characters in the string S indicate Maxlen Specifying the Handle Number Reference Function Sy SUTILS.BYTETOCHARINDEX example spinedit1.value: = bytetocharlen (edit1.text, spinedit2.value); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━ (t ((const s: string; Maxlen: Integer: Integer; $ [sysutils.pas function Returns how many characters in the string s Description Maxlen Specify a multi-byte character number reference var sysutils.syslocale example spinedit1.value: = chartobytelen (edit1.text, spiit22 .Value); ━━━━━━━━━━ 首━━━━━━━━━ 首首首 f━ b ((Const S: String; Index: Integer): Integer; $ [sysutils.pas feature Return Character position Corresponding Multi-byte Character Location Description ByTTocharindex ('Hello', 2) = 1; ByTetocharindex ('Hello', 3) = 2 Reference function sysutils.nextcharindex example spinedit1.Value: = bytetocharindex (edit1.text, spinedit2. Value); ━━━━━━━━━ 首首首━━━━━━ 首首首首首首 (((const S: string;

Index: Integer: Integer; $ [sysutils.pas feature Returns the character starting position of the multi-byte character position Description CHARTOBYTEINDEX ('Hello', 1) = 1; ChartobyteIndex ('Hello', 2) = 3 Reference Function system.length: = chartobyteindex (edit1.text, spinedit2.value); ━━━━━) )━━ 首首━━━━━━━━━ 首首首━━━━━━tt (Const str: pchar : Integer; $ [sysutils.pas function Returns the first character's width Description parameters Return 0 Reference Function Windows.CharNext Example Spinedit1.Value: = STRCHARLENGTH (PCHAR (EDIT1.TEXT)); ━━━━━━━ ━━━━━━ 首首━━━━━ 首首首首首━ 首首首首 (const str: pchar): PCHAR; $ [sysutils.pas feature Return Character pointer STR's next character pointer StrnextChar ('1234') = '234'; reference function windows.Charnext example edit2.text: = strnextchar (pchar (edit1.text)); ━━━━━━━━━━ 首━━━━━━━━━━ 首首首 f━━━tt━━━ (Const S: String; Index: Integer): Integer; $ [sysutils.PAS feature Returns the character width of the specified location in the string Description Charlength ('English Han, 1) = 1; Charlength (' english Han, 8) = 2 Reference function system.assert; function sysutils.strcharlength example spinedit1.value: = charlength (edit1.text, spinedit2.valu); ━━━━━━━━━━━━━━━━━━━━━━ The first Function nextcharindex (Const S: String; index: integer: Integer; $ [sysutils.pas function to return to the next character) CHARLENGTH ('Hello', 1) = 3; Charlength ('Hello', 3) = 5 Reference Function System.Assert Function sysutils.strcharlength example spinedit1.value: = nextcharindex (edit1.text, spinedit2.value); ━━━━━━━━ 首首首━━━━━━━━ 首首首━━━━━━━it (Const S: String; index: integer: boolean; $ [sysutils.pas feature Returns the specified position index in the specified position index is a path separator description ISPATHDELIMITER ('C: / Windows', 3) = true Reference const systemils.pathDelim; Function sysutils.bytetype checkbox1.checked: = ISPATHDELIMITER (Edit1.text, Spinedit1.Value); ━━━━━━━━ 首首━━━━━━━━━ 首首━━━━━━ ((Const Delimiters, S : String;

Index: Integer: Boolean; $ [sysutils.pas feature Returns in the specified position index is a separator Delimiters description IsDelimiter ('@', 'wjhu111@21cn.com', 8) = true reference function sysutils . Objectype example checkbox1.checked: = isdelimiter (edit1.text, edit2.text, spinedit1.value); ━━━━━━━━━ 首首━━━━━━━━━ 首首首━━━━━━━━━ ((((Const S : String; $ [sysutils.pas feature returns to include the last path separator Description The last character is the path separator is unchanged; otherwise, add a path separator to return reference function system.Length example edit1 .Text: = includetrailingPathDelimiter (edit2.text); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━ :━━━ (const s: string): string; platage; $ [sysutils. PAS feature returns to include the last slope description Result: = includetrailingPathDelimiter (s); reference function sysutils.includetrailingPathDelimiter example edit1.text: = includetrailingBackslash (edit2.text); ━━━━━━━━━━━━━━━━━━━━━━━ ━━━━ The first function ExcludetrailingPathDelimiter (const s: string): String; $ [systemils.pas function return exclude Last path separator Description The last character is not the path separator; otherwise minus the last path separator returns Reference function sysutils.ispathDelimiter; funcion system.length; func TION SYSTEM.SETLENGTH example edit1.text: = ExcludtrailingPathDelimiter (edit2.text); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━━━━━━ (const s: string): string; platform; $ [SysUtils.pas negative function returns the last slash Description Result: = ExcludeTrailingPathDelimiter (S) reference example function SysUtils.ExcludeTrailingPathDelimiter Edit1.Text: = ExcludeTrailingBackslash (Edit2.Text); ━━━━━━━━━━━ ━━━━━━━━ 首首 fc ionc ion:: Integer; $ [sysutils.pas function Returns the last separator location Description LastDelimiter ('.', 'Kinger.myetang.com ') = 16 Reference function sysutils.strscan; function sysutils.bytepe example spinedit1.value: = lastdelimiter (edit1.text, edit2.text);

━━━━━━━━━━━ 首━━━━━━ 首首首首 f 首首首 (Const S1, S2: String): Integer; $ [SYSUTILS.PAS feature Return to compare two file name description When S1 > S2 return value> 0; when S1 reference fuction windows.succeeded example Edit2.Text: = guidtostring (StringToguid (Edit1.Text)); ━━━━━━━━━━━━━━━━━━━━━━ ━ Delphi function manual ABORT function caused abandoned unexpected processing ABS function absolute value function addExitProc function Add a process to the end of the runtime library End Process table The addr function returns the address of the specified object AdjustLineBreaks function to adjust the thread sanker of the given string. For the CR / LF sequence align property, the control is set at a part of the Alignment property control tag for the Window. ALLOCMEM function assigns a given to the set size on the stack. The allowing attribute allows a grayscale to select the AnsicompareStr function comparison string (case sensitive) ansicompareText function Comparison string (in case case) ansilowercase function converts characters to lowercase ANSIUPPERCASE functions Transfer characters to uppercase Append functions to open existing file Arctan functions The existing file Arctan function The remaining function assignfile function gives the file variable assigned an external file name Assigned Function test function or process variables are empty autosize properties Automatic control tag size BackgroundDi2001.jpg Property Background, beplaceread function, builds the BEVELINNER attribute control box of the memory management in the appropriate manner. BEVELOLOLOLOLOLOLOLOLOLOUTER. Outside the BEVELWIDTH Property Control Frame Width BlockRead Function Reads One or Multiple Record to Variables The blockwrite function writes one or more records from the variable One or more records Borderstyle attribute boundary type BorderWidth property boundary width BREAK command Termination for, While, Repeat Cyclic statement brush attribute brush CAPTION Property Label text content Changefilee The suffix chDIR function for the XT function change file Change the current directory Checked property to determine the check box Select the status chr function Returns the character closefile command to close the Open File Color Property Tag Color Columns Attribute Shows Column number CompareStr function comparison strings (distinction Case

Concat Function Merge Strings Continue Command Continued For, While, Repeat's next loop COPY function Returns a string of a string CoS function Cosmuncing function CTL3D attribute whether there is a 3D effect Cursor property mouse pointer to the shape Date function Returns the current date DateTimetOfileDate function Convert Delphi's date format DateTimetostr function to the date time format to string DateTimetostring function Transfer the date time format to a string DateTostr function to convert the date format to a string DAYOFWEEK function Return to the Week Numeric DEC Function The decoding variable value decodedate function decomposes the date format Decodeime function to decompose the time format to time, minute, second, millisecond Delete function from the string delete substring deletefile command Delete file DiskFree function Returns the size of the remaining disk space Disksize function Returns the Space DisposeStr function of the specified disk to release the space DisposeStr function of the dynamic variable to release the memory space in the stack DITHERBACKGROUNDDI2001.JPG? Make the color of the background color or decrease 50% Dragcursor property When the mouse Press the shape of the mouse Press Time Scalar DragMode Properties Press the action of the DROPDOWNCOUNT property allowed to display the number of display data items EDITMASK Property Edit Mode Enabled Attributes Does the Label Rendering Open State Encodedate Function The day and months are combined into the date format Encodetime function, minute, second, millisecond synthesis time format EndMargin attribute end Edmar EOF Function Checks if there is a type or non-type file test Whether to go to the file tail EOLN function Return to the line end of the text file ERASE command Delete ExceptAddr function Returns the current unexpected address Exclude function From the collection Some elements ExceptObject functions Returns the current unexpected index EXIT command to exit the EXP function index function from the current statement block returns a string extendedSelect property that contains absolute paths extendedSelect attributes to allow the selection mode, True,

multiselect makes sense extractfiledir function returns the drive and path extractfileext function returns the suffix extractfilename function file returns the file name extractfilepath function returns the specified file path fileage function returns the time fileclose command files that already exist closed the file specified filecreate command to establish with the specified file name The new file fileDateTodateTime function converts DOS's date format for Delphi Date format FileExists function Check if there is a FileGataTr function returned to the file's DOS date DOS date Time Tag FileOpen command Open the specified file filepos function with the specified access mode Returns the file of the file that the fileRead command reads the filesearch command from the specified file FileSearch command to search the specified file Fileseek function change file pointer FileSetattr function setting file attribute FileSetDate function setting file DOS date Time Mark FileSize function Returns the size of the current file FileWrite Functions Do Write the FillChar function for the specified file FillChar function Filled the number of FindClose commands for the continuous byte with the specified value, the FindFirst / FINDNEXT sequence findfirst command returns the specified file name and the property search directory findnext command to match the file name and attribute matching One entry floattodecimal function converts floating point numbers to decimal number FLOATTOSTRF functions convert floating-point numbers to string floattostr functions to convert floating-point numbers to string floattotext functions to convert a given floating point number into a decimal number of floattotextFMT functions to convert a given floating point number For the decimal number Flush function, the content refresh the contents of the buffer to the output text file is loaded into a string FMTSTR function formatted a series of parameters from the resource string table of the program, and the result is returned to the font property to set the font format by the parameter result. Function formatting a series of parameters and returns the Pascal string formatbuf function formatted a series of parameters formatDateTime functions formatted with the specified format Formatfloa T function Specifies the decimal part of the FRAC function returns the parameter of the freeMem function to release the space GetDir accounted for a given size to the current directory getHeapStatus returns the current state of the specified drive. The current state GetMem creates a designated size dynamic variable,

And point the pointer to the entry point Glyph function button of the memory manager, the GetMemoryManager, the execution of the image HALT stop program on the Memory Manager and returns the upper limit value of the HIGH returned to the operating system Hi return parameter hiGH return parameter hint property prompt information INT Returning the integer part of the parameter INCLUDE Add Element to the Collection Insert In the String String INTTOHEX converts the integer to the hexadecimal number INTOSTR to convert the whole number into a string iResult Returns the latest I / O operation completion status IsValidident test string is a valid identifier Items attribute default display Node Kind property placed style LARGECHANGE attribute Maximum change Value Layout Property Image Layout Length Function Returns Dynamic Length Lines Attribute Default Display Content LN Function Natural Logo Function LO Function Returns the LOADSTR function of the parameter LOADSTR function from the application's executable LowerCase function to change the given string to lowercase LOW function Return parameters Limited value max attribute max MAXLENGTH attribute maximum length min The attribute minimum mkdir command creates a subdirectory MOVE function from the source to the target copy byte multislect property Allows the same number of data item Name property controls, the name of the NAME attribute control, establishes a new dynamic variable and set a pointer variable to his newstr function in the stack Upset the new string NOW function Returns the current date and time ODD test parameter to move to an odd onactivate event focus to the form on the form to trigger an onclick event Click Form Blank Area to trigger the OndblClick event Double-click the window blank area to trigger an onclosequery event. Try to close the form to trigger the onClose event Form to trigger the oncreate event form to trigger an ONDEACTIVATE event user to switch to another application to trigger the onDragDrop event mouse to trigger the onDragover event. There are other controls from him. The above moves the ONMOUSEUP event when the mouseup event is turned on, trigger the onMouseMove event when it is triggered when the ONMOUSEMOVE event is sent to the mouse button, and trigger the onkeydown event to press the keyboard to press the keyboard for a key. ESS event Press the single character button on the keyboard to trigger the onkeyup event to release a key on the onpaint event form. There is a new part to expose the onResize event to re-adjust the form size to trigger the onshow event before the form is actually displayed. Trigger ORD Return Sequence Class OutlineStyle Property Type OutofMemoryError Cause OutofMemory Accident PageIndex Property Page Index Pages Property Page Paramcount Function Returns Parameters Parameters Parameters Parameters Paramstr Functions Returns the Spectrounce Pen Version PEN Properties Paint Brush Settings PI Function Return Wen We Rate Pi Picture Property Display Image PictureClosed Property Settings Closed Bitmap PictureLeaf Property Settings LEAF Bitmap Pictureminus Property Settings MINUS Bitmap PictureOpen Property Settings Open Bitmap PicturePlus Property Settings Plus Bitmap POS Functions In Search Subtr Strings PRED Function Returns Previous The parameter random function returns a random function Randomize function to initialize the built-in random number generator read function to format files, read one file component to the variable; for text files, read one or more values to one or The readln function in multiple variables performs the READ process.

Then jump to the file next to a row readonly property Read-only property ReallocMem function Assign a dynamic variable RENAME Function Rename External file RenameFile function Open the file Rename RET function Open the existing file REWRITE function to establish and open a new file RMDIR function Delete empty The subdirectory Round function puts the real value RUNERROR function stop program execution ScrollBars property scroll bar status seek function Moves the current pointer of the file to the specified component The SEEKEOF function returns the file end status Seekeoln function returns the file Row End State SelectedColor Property Selected Color SetMemoryManager Function Settings Memory Manager Entry Point SetTextBuf Functions Specifying the Shape SHOWEXCEPTION Function Displayed by I / O Buffer Shape Property Display Unexpected Message and Address SIN Function Strove Function Return Parameters Bytes SMALLCHANGE Property Minimum change value Sorted attributes Allow Sort SQR Function Square SQRT Function Square Root Function STARTMARGIN Attributes Start Edge State Properties Control Current Status Str Function To String String String String String String String String String String Maximum Length -1 The buffer strbufsize function returns the maximum number of characters of the character buffer allocated by the Stralloc to attach a string to another string and returns the combined string strCOMP function compares the two string StrCopy functions A string is copied to another string StrDispose function Release the string STRECOPY function on the stack to copy a string to another string and return the pointer string of the result string STREND function returns the pointer to the tail of the string Stretch property Automatic Adaptation Control Size Strfmt Formatting A Series of Parameters StriComp Functions Compare Two Strings (Inconstriction) StringTowideChar Functions Convert the ANSI string to the Unicode string strlcat function to attach characters in a string to another The string and returning the merged string strlcomp function compares the two string strlcopy functions to copy characters in a string to another. Strlen function returns a series of parameters formatted in the string in the string, and the result contains a pointer string that points to the target buffer to compare two strings (in case case) strlower in maximum length. The function converts characters in the string to lowercase Strmove functions to copy characters in a string to another string Strnew function allocated a string strPas function on the stack to convert a string of strings to the PASCAL class. Character String strpcopy functions Copy the string of the Pascal class to the string StrPlcopy function ended with NULL Copy the maximum length string of the Pascal class to the string StrPos function ended with NULL Returns a string in another string first appearance pointer STRSCAN function Returns the pointer of the last character in the string StRTSCAN function returns a first character in the string Strtodate function to convert a string into a date format The StrtateTime function converts the string to the date / time formatting StrtOFLOAT function will give a given string Converting the floating point STRTOINT function to convert a string into an integer strt DEF function to convert a string into an integer or default value. The STRTOTIME function converts the string to the time format Strupper function to convert the characters in the string to the uppercase style attribute type Select Suce Function Returns the SUP function swap function exchange parameters High low address bit Tabs Properties Tag each item TabINDEX Property tag index text TEXTTOFLOAT function Take a string (end of NULL)

Converting to floating point number Time function Returns the current time Timetostr function converts the time format to a string Trim function from a given string to delete the front and tail spaces and control character trimleft functions from a given string to delete the first space And the Control Character Trimight function removes the space for the tail from a given string and the control character Trunc function to intercept the real value to the integer value truncate function. The contents of the current file position will be converted to the unselected color UpCase converted the character to the character. Upper write uppercase changes the given string to the uppercase VAL function to convert a string to the integer value VaRrayCreate function with a given boundary and dimension Establish variant array variety valuedimcount function Returns the dimension of the Dimension of the Dimension VARARRAYHIGHBOUND function Returns a given The upper bound of variant array dimensions Locks the given variant array VARARRAYLOWBOUND function Returns the lower boundary of the changed body array dimension to the specified variant of the array element VararrayRedim function to adjust the variant of the Varrarrayunlock by changing the upper limit The function unlocks the specified variant array variant value VARASTYPE function converts the variant to the specified type VARCASE function converts the variants to the specified type and saves his VARCLER function to clear the specified variant Varcopy function to copy the specified variant to the specified variant VarformDateTime function returns a variant VarisArray function test variant whether the variant is the array varisempty function test variant whether the unassigned varisull function Test variant is a null varicatetime function converts a given variant to the date time Vartype function will change the variant Convert to the specified type and save the visibility of the Visible property control to TRUE, press Enter to generate a carriage return; for false, press Ctrl Enter to generate the carrier WRITE command to format File, write a variable to the file component; write a text file, write one or more values to the file WRITELN command, then output a line end flag widecharlentostring function converts the ANSI string to Unicode string Widecharle ntostrwar function ansi unicode string into a string variable widechartostring function to convert a unicode string ansi unicode string widechartostrvar function ansi string into a string variable uses StrUtils; String [] header functions Encyclopedia function AnsiResemblesText (const AText , AOther: string): Boolean; $ [StrUtils.pas function Description returns whether two strings similar ANSI (American national standards Institute) American national standards Institute; case-insensitive reference function StrUtils.SoundexProc; var StrUtils.AnsiResemblesProc example CheckBox1 . CHECKED: = ANSIRESEMBLESTEXT (Edit1.Text, Edit2.Text); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━━━━━━ 首首━━;; ;xxx s; Boolean; $ [Strutils.pas feature Returns the string ATEXT contains the substring asubtext explanation Not distinguishes the case reference reference Function strutils.ansiUppercase; Function Strutils.ansipos example checkbox1.checked: =

Ansicontainstext (edit1.text); ━━━━━━━━━ 首首━━━━━━━━━ 首首━━━━━━━━ 首首 f:::;;;;;; $ [Strutils. PAS feature returns a string AText whether the beginning of the sub-string asubtext indicates that the case is not distinguished. The reference refinction windows.CompareString example checkbox1.checked: = ANSISTARTSTEXT (Edit1.Text, Edit2.text); ━━━━━━━━━━━━ ━━━━━━━━ 首 The first Function AnsiendStext (const asubtext, at: String): boolean; $ [Strutils.PAS feature Return string ATEXT whether the end of the sub-string asubtext instructions Not Distortment Reference Function Windows.comPareString Example checkbox1.checked: = ansiendstext (edit1.text, edit2.text); ━━━━━━━━━ 首━━━━━━━━━━ 首首首━━━━━━━━━ 首首━━━━━et━━ 首首首━━━━━etetet━ 首首 ((━━━━━etetet━━ 首): string; $ [StrUtils.pas function returns a string AText replaced by substrings AFromText substrings AToText results described with reference to a case-insensitive function SysUtils.StringReplace; type SysUtils.TReplaceFlags example Edit4.Text: = AnsiReplaceText (Edit1. TEXT, EDIT2.TEXT, EDIT3.TEXT); ━━━━━━━━ 首首首━━━━━━━━━ 首首 f━━━━;; 首首 f f;;;; Const Avalues: Array Of String: Boolean ; $ [Strutils.pas feature Returns whether there is a string ATEXT in the string array ATEXT instructions Not Case Uprecognition Reference Functio N strutils.ansiindextext example Checkbox1.checked: = ANSIMATCHTEXT (Edit1.Text, ['A1', 'A2', 'A3', 'A4']); ━━━━━━━━━━━━━━━ ━━━━━ ━ 首首c iondDext (Const Atext: Array Of String): Integer; $ [Strutils.PAS feature Return Strings ATEXT in the character string array Avalues] If you do not distinguish Do not include, return -1 reference function sysutils.ansisametext example = ANSIINDEXText (edit1.text, ['A1', 'A2', 'A3', 'A4']); ━━━━━━━━━ ━━━━━━━━━ 首首 The first Function Ansicontainsstr (const attext, asubtext: String): boolean; $ [strutils.pas feature Returns AText Whether to include Subtrust Asubtext Description Case Size Size Reference Function Strutils. Ansipos example checkbox1.checked: = ansicontainsstr (edit1.text, edit2.text);

━━━━━━━━━━━━━━━━━━━ 首首首首 f f 首首首首 f;;;; $ [Strutils.PAS feature Returns ATEXT Whether as the sub-string asubtext Opening instructions Case Size Reference Function Sysutils.ansisameSTR example checkbox1.checked: = ANSISTARTSTR (Edit1.Text, Edit2.Text); ━━━━━━━━ 首首首━━━━━━━━━ 首首首首━━━━━━━━━ 首首首首首━━━━━━━━━ 首首首首━━━━━━━━━━ 首首首━━━━━━━━━ 首首━━━━━━━━━━ 首首━━━━━━━━━ 首首首━━━━━━━━━ 首首首━━━━━━━━━━ 首首首━━━━━━━━━ 首首首━━━━━━━━━ 首首首━━━━━━━━ 首首首首━━━━━━━━━ AnsiEndsStr (const ASubText, aText: string): Boolean; $ [StrUtils.pas function returns a string that ends with a substring aText whether ASubText described with reference to an example case sensitive SysUtils.AnsiSameStr function CheckBox1.Checked: = AnsiEndsStr (Edit1.Text, Edit2 .Text); ━━━━━━━━━━━━━━━━━━━━ 首首 f 首━━━━ (━ 首首 f f f:: String; $ [Strutils.PAS feature Returns string AText AFromText replaced by substring substrings AToText results described with reference to a case-sensitive function SysUtils.StringReplace; type SysUtils.TReplaceFlags example Edit4.Text: = AnsiReplaceStr (Edit1.Text, Edit2.Text, Edit3.Text); ━━━ ━━━━━━━ 首首首━━━━━━ 首首首 f━━━━;; 首首 f f (const avate: array of string): Boolean; $ [Strutils.PAS feature Return to the string array Avalues Whether Contains String AText Description Case Size Size Reference Function Strutils.ansiIndexstr Example CheckBox1.Checked: = ANSIMAT Chstr (edit1.text, ['A1', 'A2', 'A3', 'A4']); ━━━━━━━━━ 首首━━━━━━━━ 首首━━━━━━ ((( Const ATEXT: STRING; Const Avalues: Array Of String): Integer; $ [Strutils.PAS feature Return Strings ATEXT Location Description Case Size Size Size Size SystiLs.ansageStr Example Spinedit1.Value: = ANSIInDexStr Edit1.Text, ['A1', 'A2', 'A3', 'A4']); ━━━━━━━━━ 首首首━━━━━━━━ 首首首━━━━━━ (((((((((((( : String; ACOUNT: Integer: String; $ [Strutils.PAS feature Returns a string ATEXT ACOUNT note Note When ACOUNT returns' '' reference function system.setlength example edit3.text: = DupeString (Edit1.Text , Spinedit1.Value); ━━━━━━━━ 首首首━━━━━━━ 首首首 f━━:::: 首::: String;

$ [Strutils.PAS feature Returns a string ATEXT Reverse Description ReverseString ('1234') = '4321' Reference Function System.SetLength An example edit3.text: = reverseString (edit1.text); ━━━━━━━━ ━━━━━━━━━━ 首首首首首首首 (const at: String; Astart, ALENGTH: cardinal; const asubText: string): String; $ [Strutils.PAS feature Return Nested string Description ASTART: Nested start position; ALENGTH: Nested length; stuffstring ('Abcd', 2, 0, '12') = 'a12bcd' Reference function system.copy example Edit3.Text: = stuffstring (edit1.text, spinedit1.value, Spinedit2.value, edit2.text); ━━━━━━━━ 首首首━━━━━━━━ 首首 f━━━━━ :━━ 首:; overluead; $ [Strutils. PAS feature Random Returns a character string array Avalues before instructions before suggest execution of Randomize reference function system.random example randomize; edit3.text: = randomFrom (['A1', 'A2', 'A3', 'A4']) ━━━━━━━━━━ 首首首━━━━ (━━ 首首 f f; (Avalue: Boolean; Const Atrue: String; Afalse: String = '): String; OverLoad; $ [Strutils .PAS feature returns the specified logical string Description ifthen (true, 'is', 'no') = 'is'; ifThen (false, 'is', 'No') = 'No'

$ [SYSUTILS.PAS feature returns to format an array constant to the buffer buffer in the Buffer Buffer

reference

转载请注明原文地址:https://www.9cbs.com/read-43699.html

9cbs

New Post(0)