Delphi TEdit erste Buchstabe immer Groß schreiben...

TEdit erste Buchstabe immer Groß schreiben...

Ein Thema von Gandimann · begonnen am 30. Dez 2008 · letzter Beitrag vom 3. Mai 2011

Matze

(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge

Turbo Delphi für Win32

30. Dez 2008, 13:04

Um trotzdem deine Frage zu beantworten, könntest du das ungefähr so lösen (OnChange):

Delphi-Quellcode:

			MyText := Edit.Text;

MyText := LowerCase(MyText);

MyText[0] := UpperCase(PChar(MyText[0]));

Edit.Text := MyText;

Oder so ähnlich. Mit dem Char bin ich mir grad nicht ganz sicher. Das müsstest du ausprobieren.

Es ist dir nicht erlaubt, neue Themen zu verfassen.

Es ist dir nicht erlaubt, auf Beiträge zu antworten.

Es ist dir nicht erlaubt, Anhänge hochzuladen.

Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.

Smileys sind an.

[IMG] Code ist an.

HTML-Code ist aus.

Refbacks are aus

Gehe zu: