Verwerwendung von TCharHelper

[EdAdvokat]

Ich möchte in einem Editfeld die Großbuchstaben in kleine umwandeln.
So habe ich nachfolgenden Code eingegeben:

Delphi-Quellcode:

procedure TForm1.btn27Click(Sender: TObject);
begin
  edt27.text:=ToLower(edt27.text);
end;

Das klappt zwar, aber ich erhalte die Warnung Symbol 'ToLower' ist veraltert: use 'TCharHelper'

Wie muß ich die obige Zeile edt27.text.... unter Verwendung von TCharHelper schreiben?
Aus der Hilfe werde ich nicht schlau.

[uligerhardt]

Ungetestet:

Delphi-Quellcode:

edt27.text := edt27.text.ToLower;

[EdAdvokat]

nein das war es nicht. :cry:

[uligerhardt]

Oh Mann - Text ist vom Typ TCaption, nicht string. Und schwupps ist der TStringHelper ausgehebelt.

Delphi-Quellcode:

edt27.Text := string(edt27.Text).ToLower;

geht. :shock:

[EdAdvokat]

Danke, das funktioniert und ich erhalte keine Warnung mehr.
Was ist denn nun mit TCharHelper.toLower? Das muß ich überhaupt nicht angeben und trotzdem wird es angewendet?

[Redeemer]

Warum nicht das bewährte SysUtils.AnsiLowercase? (Hat übrigens nichts mit ANSI zu tun, das steht da nur so drin.)

Außerdem hat TEdit eine Eigenschaft, über die man Uppercase erzwingen kann.

[uligerhardt]

Zitat:

Zitat von EdAdvokat (Beitrag 1498006)

Danke, das funktioniert und ich erhalte keine Warnung mehr.
Was ist denn nun mit TCharHelper.toLower? Das muß ich überhaupt nicht angeben und trotzdem wird es angewendet?

Ist ein record helper. Damit kannst du sogar Zeug wie

Delphi-Quellcode:

42.ToString

statt

Delphi-Quellcode:

IntToStr(42)

schreiben. :pale:

[uligerhardt]

Zitat:

Zitat von Redeemer (Beitrag 1498007)

Warum nicht das bewährte SysUtils.AnsiLowercase? (Hat übrigens nichts mit ANSI zu tun, das steht da nur so drin.)

Wenn da nicht auch ein deprecated kommt. :-D

Zitat:

Zitat von Redeemer (Beitrag 1498007)

Außerdem hat TEdit eine Eigenschaft, über die man Uppercase erzwingen kann.

Der OP will aber Lower case.

[Redeemer]

Zitat:

Zitat von uligerhardt (Beitrag 1498010)

Zitat:

Zitat von Redeemer (Beitrag 1498007)

Außerdem hat TEdit eine Eigenschaft, über die man Uppercase erzwingen kann.

Der OP will aber Lower case.

Ja, egal, geht beides: Vcl.StdCtrls.TEdit.CharCase

[EdAdvokat]

Ich danke allen usern, die mir geholfen haben. Es funktioniert also ohne Warnungen.
Jedoch habe ich noch immer nicht den tiefen Sinn von TCharHelper verstanden. Allein die Tatsache, dem edt27.Text einen string(edt27.Text).ToLower zuzuweisen, sagt dass
TCharHelper Verwendung fand. Na gut, wenn es so ist.