String nach Wort durchsuchen

[Kolone]

Hallo allerseits,
ich hab nun schon mehrere Foren durchsucht, aber ich werde einfach nicht schlauer.
Ich möchte ein Programm schreiben, mit dem man chatten kann.
Ich hab mir gedacht ein Editfeld und ein button. Wenn man den Button drückt soll geschaut werden, ob das Editfeldein ein bestimmtes Wort enthält um dann antworten zu können. Leider find ich nirgends eine richtige Lösung. Vielen Dank schonmal

[DeddyH]

Pos, PosEx, AnsiContainsText, AnsiContainsStr fallen mir da spontan ein.

[Kolone]

Ah okay danke ich werde dann mal schauen

[Kolone]

Okay ich komm damit leider nicht ganz klar. Ich hab mir die funktion Pos angeschaut, aber wie schaffe ich es jetzt, dass sobald ich auf ein Button drücke, das Editfeld ausgelesen wird?
Kann mir jemand Pos vielleicht nochmal erläutern?
Oder kann man das auch anders machen?
Gibt es eine Möglichkeit einen unbekannten string zu erstellen?
zum Beispiel so dann :

if Edit1.Text= UnbekannterString + Gesuchterstring + UnbekannterString?

[DeddyH]

Hä? Was genau hast Du denn vor?

[Metschu]

In der "OnClick" Procedure des Buttons ein Befehl in die Richtung eingeben:

If Pos(Gesuchter Text, inhalt des Editfeldes) > 0 then machewasichwill

Anders ausgedrück:

Wenn die Position (nicht Anzahl - Sorry) von "Gesuchter Text" im "Inhalt des Editfeldes" mehr als 0 ist, dann mache was ich will

[Aviator]

Hi,

die Funktion Pos() ist folgendermaßen aufgebaut

function Pos(Str, Source : string): integer;
Beim ersten Parameter gibst du an, welcher String bzw. Char gesucht werden soll. Zurück bekommst du einen Integer Wert, der dir die Position des ersten Zeichens liefert, an dem der String bzw. Char gefunden wurde.

Delphi-Quellcode:

var
HelpStr : String;

begin
  Edit1.Text := 'Das ist ein Test um die Funktion Pos() zu erklären';
  HelpStr := 'Test':
  ShowMessage(IntToStr(Pos(HelpStr, Edit1.Text));
end;

In diesem Beispiel würdest du die Meldung mit der Zahl 12 (wenn ich mich nicht verzählt habe) angezeigt bekommen.

[Kolone]

Zitat von Metschu:

In der "OnClick" Procedure des Buttons ein Befehl in die Richtung eingeben:

If Pos(Gesuchter Text, inhalt des Editfeldes) > 0 then machewasichwill

Ah okay danke danach hab ich gesucht

[DeddyH]

Zitat:

Gibt den Indexwert des ersten Zeichens in einem festgelegten Teil-String zurück, der in einem gegebenen String vorkommt.

In Delphi sucht Pos in dem String S nach dem Teilstring Substr. Die Parameter Substr und S sind String-Ausdrücke.

Wird der Teilstring gefunden, gibt Pos den Integer-Index des ersten Zeichens von Substr in S zurück. Die Groß/Kleinschreibung wird von Pos berücksichtigt. Ist Substr nicht vorhanden, gibt Pos den Wert Null zurück.

Ist das denn so unverständlich?

[Aviator]

Ne eigentlich net

Nur manchmal helfen Beispiele bei mir auch weiter