Thema: Delphi Live Stichwortsuche

Einzelnen Beitrag anzeigen

Benutzerbild von Ajintaro
Ajintaro

Registriert seit: 20. Okt 2004
Ort: Sankt Augustin
138 Beiträge
 
Delphi XE6 Starter
 
#10

AW: Live Stichwortsuche

  Alt 26. Feb 2014, 10:14
Ich bin gerade dabei den "Parser" zu erstellen, welcher mir während der Editfeld-Eingabe ein Array erstellt. Das Leerzeichen soll als Trenner dienen.

Ich hab das Array auf 3 Elemente limitiert, da ich davon ausgehen kann dass man nach 3 Wörtern den gewünschten Eintrag herausfiltern kann.

Delphi-Quellcode:
procedure TForm1.e_inputChange(Sender: TObject);
var i:integer;
my_arr: Array[1..3] of String;
begin
 if e_input.text <> 'then
  begin
    //Nicht leer

    for i := 1 to length(e_input.text) do
    begin
      if e_input.text[i] = ' then
      begin
        //add to array
        my_arr[i] := e_input.Text;
      end;
    end;

 end;
Das funktioniert natürlich nur bis zum 1. Leerschritt, beim 2. knallts. Ich vermute mal da werde ich Pos und PosEx bemühen müssen um mir die Whitespace zu merken?
Jaimy
DAoC 2.0 -> Camelot Unchained !
  Mit Zitat antworten Zitat