if - vergleich mit Teilstring?

[cRayZo]

Wie kann ich es erreichen, bei einer If-Abfrage nur die ersten 'x' Zeichen zu vergleichen und die stellen dahinter zu ignorieren?

Beispiel:

text:=hallo, wie gehts dir?
//
Wenn die ersten 5 Zeichen von 'Text' "Hallo" ergeben, dann Aktion

Den Vergleich mit einem Buchstaben krieg ich hin:
if text[1]='H' then aktion es hapert halt nur an den mehreren Buchstaben!

Wenn das auch ohne schleife geht, wär das echt gut!!

mfg, cRayZo

[mkinzler]

Copy()

[FAlter]

Hi,

da gibt es mehrere Möglichkeiten:

Wie bereits erwähnt, Copy:
 if Copy(MyStr, 1, 5) = 'ABCDE' then ... Oder per Pos:
if Pos('ABCDE', MyStr) = 1 then ... würden mir spontan einfallen. Was schneller ist weiß ich jetzt aber nicht.

Mfg
FAlter

[jim_raynor]

oder mit:

if StrLComp(PChar(text),'Hallo')=0 then Es gibt unzählig viele Varianten

[mkinzler]

z.Bb. noch StrScan()

[marabu]

Nicht zu vergessen: LeftStr() und AnsiStartsStr() bzw. AnsiStartsText().

[cRayZo]

okay^also ich habs jetzt einfach mal mit Copy gemacht.
Trotzdem danke für die Antworten.

Nur noch eine Frage:
if StrLComp(PChar(text),'Hallo')=0 then wie funktioniert dieser Code? Suchte der im string 'text' nach "Hallo" ? oder wie jetzt?^^

[DeddyH]

Zitat von Delphi-Hilfe:

Die Funktion vergleicht zwei Strings bis zu einem bestimmten Zeichen.

Unit

SysUtils

Kategorie

String-Verarbeitung (nullterminiert)

Delphi-Syntax:

function StrLComp(const Str1, Str2: PChar; MaxLen: Cardinal): Integer;

C++ Syntax:

extern PACKAGE int __fastcall StrLComp(const char * Str1, const char * Str2, unsigned MaxLen);

Beschreibung

StrLCompvergleicht bis zu MaxLen Zeichen der beiden Strings Str1 und Str2. In der folgenden Tabelle sind die Rückgabewerte erläutert:

Rückgabewert Bedingung

<0 Str1 kommt vor Str2
=0 Str1 ist mit Str2 identisch
>0 Str1 kommt nach Str2

Hinweis: Verwenden Sie bei der Arbeit mit internationalen Zeichen die Funktion AnsiStrLComp.

F1 wirkt manchmal Wunder