POS: Groß-/kleinschreibung?

[Sharky]

Hai,

ich bekomme eine Kriese.
Nachdem ich in diesem Thread gelesen habe das POS abhängig der Delphi-Version unterschiedliche Ergebnisse liefern soll habe ich es mal mit den Versionen die ich zur Verfügung habe getestet.

Bei mir ist das Ergebniss so:

• Delphi3 Professional - Casesensitiv
• Delphi5 Enterprise - Casesensitiv
• Delphi7 Enterprise - Casesensitiv

Mit diesem Code habe ich getestet.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
 if (Pos(Edit2.Text,Edit1.Text) = 0) then
  begin
   ShowMessage ('Nicht gefunden');
  end
 else
  begin
   ShowMessage ('Gefunden');
  end;
end;

Steht in Edit1 "Dies ist ein Test" habe ich bei:

Edit2 = "Test" ein gefunden
Edit2 = "test" ein nichtgefunden

Jetzt verstehe ich überhaupt nix mehr.

[Robert Marquardt]

Da hat offensichtlich jemand Murks erzaehlt. Pos war schon immer case-insensitiv.

[Sharky]

Zitat:

Zitat von Robert Marquardt

Da hat offensichtlich jemand Murks erzaehlt. Pos war schon immer case-insensitiv.

Hai Robert,

kannst Du es mal testen?

[Robert Marquardt]

In Delphi 6 prof getestet. CASE-INSENSITIV!

[APP]

Hallo Robert,

Zitat:

Zitat von Robert Marquardt

Da hat offensichtlich jemand Murks erzaehlt. Pos war schon immer case-insensitiv.

Bei meinem D5pro zu Hause hat das keine Auswirkung:

Delphi-Quellcode:

IF Pos('a', 'AAAAA') <> 0 THEN ShowMessage('OK');

das allerdings schon:

Delphi-Quellcode:

IF pos('A', 'AAAAA') <> 0 THEN ShowMessage('OK');

daher könnte man sagen, dass POS in D5 schon die Groß- bzw.
Kleinschreibung berücksichtigt = case sensitive ist.

Bei D7 bin ich mir nicht mehr so sicher, kann ich erst am Montag
sagen bzw. Sharky hat das schon geprüft.

[Alexander]

Also bei mir, D6 PE, wird glaube ich auch die Groß- und kleinschreibung berücksichtigt.
Will ich das mal nciht haben, so nutze ich einfach die Funktion UpperCAse...

[Daniel]

Also die Funktion ist in meinem D6 Pro definitiv case-sensitive. Erstes Indiz:

Zitat:

Zitat von Die englische (!) Delphi-Hilfe

Pos searches for Substr within S and returns an integer value that is the index of the first character of Substr within S. Pos is case-sensitive. If Substr is not found, Pos returns zero.

Mein Testfall:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var s : String;
begin
  s:= 'Delphi-PRAXiS rulez!';

  // Der Test mit Großbuchstaben
  If (Pos('RULEZ', s) > 0) Then
    ShowMessage('RULEZ im String gefunden')
  Else
    ShowMessage('RULEZ nicht im String gefunden');     // <----- wird angezeigt

  // Gegenprobe:
  If (Pos('rulez', s) > 0) Then
    ShowMessage('rulez im String gefunden')  // <----- wird angezeigt
  Else
    ShowMessage('rulez nicht im String gefunden');
end;

In meinem Fall kann ich die Frage ganz klar mit 'sensitive' beantworten.

[Daniel]

Habe mir eben die deutschen Hilfedateien zu D6 heruntergeladen. Et voilá:

Zitat:

Pos sucht in dem String S nach dem Teil-String Substr. Die Parameter Substr und S sind String-Ausdrücke.
Wird der Teil-String gefunden, gibt Pos den Integer-Index des ersten Zeichens von Substr in S zurück. Die Groß/Kleinschreibung wird von Pos nicht berücksichtigt. Ist Substr nicht vorhanden, wird der Wert Null zurückgegeben.

Den rot markierten Teil halte ich für eine glatten Übersetzungsfehler.

[APP]

Hallo Daniel,

Zitat:

Zitat von Delphi-Hilfe

Pos searches for Substr within S and returns an integer value that is the index of the first character of Substr within S. Pos is case-sensitive. If Substr is not found, Pos returns zero.

der erste Reinfaller ist, wie Christian Seehase richtig erkannt hat, in der deutsche Delphi Hilfe zu finden:

Zitat:

Zitat von Deutsch: Delphi5 Hilfe

... Die Groß/Kleinschreibung wird von Pos nicht berücksichtigt...

Un die Geschichte mit D7 habe ich zu vorschnell positiv beantwortet, da hat mich Sharky ja oben wiederlegt :stupid:

[Duffy]

Hallo alle zusammen,
Pos ist definitiv case-sensitive. Wer es testen will, anbei eine kleine Demo.

bye
Claus