System.SysUtils.SameText

Aus RAD Studio API Documentation
Wechseln zu: Navigation, Suche

Delphi

function SameText(const S1, S2: string): Boolean;
function SameText(const S1, S2: string; LocaleOptions: TLocaleOptions): Boolean;

C++

extern DELPHI_PACKAGE bool __fastcall SameText(const System::UnicodeString S1, const System::UnicodeString S2)/* overload */;

Eigenschaften

Typ Sichtbarkeit Quelle Unit Übergeordnet
function public
System.SysUtils.pas
System.SysUtils.hpp
System.SysUtils System.SysUtils

Beschreibung

Vergleicht zwei Strings anhand des Ordinalwertes ohne Berücksichtigung der Groß-/Kleinschreibung.

SameText vergleicht S1 mit S2 und gibt True zurück, wenn beide identisch sind. SameText berücksichtigt die Groß-/Kleinschreibung und wird nicht vom aktuellen Gebietsschema beeinflusst.

Hinweis: Wenn Sie loUserLocale als Wert für den Parameter LocaleOptions angeben, werden auf den Plattformen OSX, iOS und Android beim SameText-Vergleich alle Steuerzeichen (Zeichencodes zwischen #31 und #00) als dasselbe Zeichen behandelt.

Beispiel

 
 procedure TForm1.Button1Click(Sender: TObject);
 var
   c1, c2: string;
 begin
   c1 := char(6);
   c2 := char(31);
   showmessage(BoolToStr(SameText(c1, c2, loUserLocale), true));
   
   c1 := 'p'+char(6)+'p';
   c2 := 'p'+char(31)+'p';
   showmessage(BoolToStr(SameText(c1, c2, loUserLocale), true));
 end;

In beiden Beispielen ist das Ergebnis für die Windows-Plattform False und für die Plattformen OSX, iOS und Android True.


Siehe auch