Função do cabeçalho RightStr (const Atext: String; Const Acount: Integer): String;
Função retorna os caracteres de aceitação no lado direito da string atext
Descrição RightStr ('123456', 3) = '456'
Consulte o System.Copy
Exemplo edit3.text: = rightstr (edit1.text, spinedit1.value);
━━━━━━━━━━━━━━━━━━━━━
Função de cabeçalho Midstr (const Atext: String; Const Astart, ACONTE: Inteiro): String;
Função retorna a string atext Acep Tow
Significa cópia
Consulte o System.Copy
Exemplo edit3.text: = midstr (edit1.text, spinedit1.value, spinedit2.value);
━━━━━━━━━━━━━━━━━━━━━
Função de cabeçalho SearchBuf (BUF: PCHAR; BUFLEN: INTERGER; SelStart, Length Length: Inteiro; Pesquisa: String; Opções: TStringSearchOptions = [SODOWN]): PCHO;
Função retorna a primeira posição do ponteiro pesquisado
Explique esta função é frequentemente usada para pesquisar strings no texto
Referência <NULL>
exemplo
////////// Begin SearchBuf
função pesquisada (editControl: tcustomedit; const searchstring: string;
SearchOptions: TStringSearchOptions;
var
Buffer, p: pchar;
Tamanho: palavra;
Começar
Resultado: = false;
if (comprimento (searchstring) = 0) depois saia;
Tamanho: = editControl.getTextlen;
if (size = 0) então saia;
Buffer: = stralloc (tamanho + 1);
tentar
EditControl.getTextBuf (buffer, tamanho + 1);
P: = SearchBuf (Buffer, Size, EditControl.SelStart, EditControl.sellength,
Pesquisa de pesquisa, searchptions);
Se p <> nil, então comece
EditControl.SelStart: = p - buffer;
EditControl.selngth: = Length (SearchString);
Resultado: = true;
fim;
Finalmente
Strdispose (buffer);
fim;
fim;
Procedimento TForm1.Button1Click (remetente: TOBJECT);
var
SearchOptions: TStringSearchOptions;
Começar
SearchOptions: = [];
Se a caixa de seleção1.Charquei, então
Incluir (SearchOptions, SoDown);
Se a caixa de seleção. Verifiquei, então
Incluir (SearchOptions, SomatchCase);
Se a caixa de seleção. Verifiquei, então
Incluir (SearchOptions, Sowholeword);
Pesquisado (memando1, edit1.text, SearchOptions);
Memo1.setFocus;
fim;
////////// End SearchBuf
━━━━━━━━━━━━━━━━━━━━━
Função de cabeçalho SoundEx (const ATEXT: String; Alngth: tsoundExlength = 4): String;
Função retorna a sequência de detecção
Explicação: De acordo com o método de detecção (SoundEx), você pode encontrar a sequência que se cruzam;
Referência <NULL>
Exemplo edit2.text: = SoundEx (edit1.text, spinedit1.value);
━━━━━━━━━━━━━━━━━━━━━
Função de cabeçalho SoundExint (const ATEXT: String; Alngth: tsoundExintLength = 4): Inteiro;
Função retorna o número inteiro de detecção
Isso significa que quanto maior o valor do tempo, maior a precisão da decodificação
Referência <NULL>
Exemplo spinedit2.value: = SoundExint (edit1.text, spinedit1.value);
━━━━━━━━━━━━━━━━━━━━━
Função de cabeçalho DecodesoundExint (Avalue: Inteiro): String;
Função retorna a decodificação da sonda inteira
Descrição DecodesoundExint (SoundExint ('Hello')) é equivalente a SoundEx ('Hello')
Referência <NULL>
Exemplo edit2.text: = decodesoundExint (spinedit2.value);
━━━━━━━━━━━━━━━━━━━━━
Função Primeira Função SoundExword (const Atext: String): Word;
Função retorna o valor do texto de detecção
Indica que não há um parâmetro de tempo que tenha sido fixado em 4
Referência <NULL>
Exemplo spinedit2.Value: = SoundExword (edit1.text);
━━━━━━━━━━━━━━━━━━━━━
Primeira função DecodesoundExword (Avalue: Word): String;
Função retorna a decodificação do valor do texto de detecção
Descrição DecodesoundExword (SoundExword ('Hello')) é equivalente a SoundEx ('Hello')
Referência <NULL>
Exemplo edit2.text: = decodesoundExword (spinedit2.value);
━━━━━━━━━━━━━━━━━━━━━
Função de cabeçalho SoundExSimilar (const ATEXT, aOther: String; Alngth: tsoundExlength = 4): boolean;
A função retorna se as cordas da sonda das duas cordas são iguais
Descrição Resultado: = SoundEx (ATEXT, ALENGLE) = SoundEx (aOther, Alnken)
Referência <NULL>
Exemplo de seleção Chox1.Checked: = SoundExSimilar (edit1.text, edit2.text, spinedit1.value);
━━━━━━━━━━━━━━━━━━━━━
Função de cabeçalho SoundExCompare (const ATEXT, aOther: String; Alngth: tsoundExlength = 4): Inteiro;
Função retorna o resultado de comparar duas cordas para detectar strings
Descrição Resultado: = AnsicomParest (SoundEx (ATEXT, Alngth), SoundEx (AOther, Alnken))
Função de referência sysutils.ansicomparest
Exemplo spinedit2.value: = SoundExCompare (edit1.text, edit2.text, spinedit1.value);
━━━━━━━━━━━━━━━━━━━━━
Função SOUNDEXPROC (const Atext, aOther: String): boolean;
Função Chamada SoundExsimilar para devolver as cordas da sonda das duas cordas.
Descrição do valor padrão da variável do sistema AnsireSemblesproc
Função de referência Strutils.AnsireSEMBLETEXT
Exemplo [var AnsireSemblesproc: TComPareTextProc = SoundExProc;]