Forum: Win32/Win64 API (native code)
Delphi
by Sir Rufo,
27. Feb 2014
Hier ist als Whitespace nur das Leerzeichen definiert. Die Erfahrung zeigt aber, dass in der Realität mehrere Zeichen als Whitespace genommen werden (z.B. ' ,.?!;') und diese Funktion berücksichtigt das dann einfach und bei einer StringList muss ich erst vorher alles umwandeln.
Beliebt ist es auch zusammenhängende Wörter in "" zu setzen, die dann trotz Whitspace zusammenbleiben.
Input:...
Forum: Win32/Win64 API (native code)
Delphi
by Sir Rufo,
27. Feb 2014
Das Array sollte mit Length( InputStr ) div 2 + 1 initialisiert werden, denn 'a b' ergibt 2 Suchworte, aber du initialisierst mit 3 div 2 = 1 und es knallt ;)
Dafür würde bei meiner Version das letzte Wort nicht in das Array geschrieben :shock: und du müsstest bei deiner Version nur 2 Zeilen tauschen, damit es trotzdem funktioniert. :oops:
(Ist gefixed)
Ein weiteres Problemchen ist, dass...
Forum: Win32/Win64 API (native code)
Delphi
by Sir Rufo,
26. Feb 2014
Ähm, ja ... ich überlege mir immer wie ich das "zu Fuß" bzw. "per Hand" machen würde.
Also auf einem Blatt Papier steht ein Satz und ich soll alle Worte einzeln untereinander schreiben.
Wenn man jetzt einmal ganz genau darauf achtet, was man wirklich da macht, und sich zusätzlich einmal vorstellt, dass die Worte in einer mir völlig fremden Sprache (aber schon links-nach-rechts) sind, dann...
Forum: Win32/Win64 API (native code)
Delphi
by Sir Rufo,
26. Feb 2014
Entweder ist das Zeichen Whitespace oder nicht.
Wenn kein Whitespace dann das Zeichen an den Buffer (string) geben
Wenn Whitespace und der Buffer nicht leer ist, den Buffer an das Array und den Buffer wieder leeren.
function ParseSearchStr( const SearchStr : string ) : TArray<string>;
var
LCount : integer;
LBuffer : string;
LChar : Char;
Forum: Win32/Win64 API (native code)
Delphi
by Sir Rufo,
26. Feb 2014
Indem du den string durch einen kleinen Parser schickst?
Jedesmal wenn du auf ein Whitespace-Zeichen (Trenner für Worte) triffst, dann wird das Wort an das Array gehängt.
Forum: Win32/Win64 API (native code)
Delphi
by Sir Rufo,
25. Feb 2014
Ich glaube ja ;)
Nehmen wir doch mal den Text hier
Delphi in die Praxis umsetzen
und das als Sucheingabe
Delphi ums
Forum: Win32/Win64 API (native code)
Delphi
by Sir Rufo,
24. Feb 2014
Du musst nach jedem Suchwort einzeln suchen. Dazu musst du aber auch vorher den Suchtext in einzelne Worte auftrennen und dann der Suchroutine übergeben (z.B. als Array)
