Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi TEdit erste Buchstabe immer Groß schreiben...

**Klaus01**

im onExit Ereignis:

Delphi-Quellcode:

			MyText := Edit.Text; 

MyText := LowerCase(MyText); 

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

Edit.Text := MyText;

Grüße
Klaus

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.757 Beiträge Delphi 10.4 Sydney	#7 Re: TEdit erste Buchstabe immer Groß schreiben... 30. Dez 2008, 13:14 im onExit Ereignis: markieren Delphi-Quellcode: MyText := Edit.Text; MyText := LowerCase(MyText); MyText[0] := UpperCase(MyText[0]); Edit.Text := MyText; Grüße Klaus Klaus
	Zitat