Nur große Buchstaben im Edit Feld

[Alfi]

Hallo,ich möchte,egal ob der benutzer in mein editfeld groß oder kleine buchstaben tippt,das alles in großbuchstaben geändert wird ! Kann ich ja sicher in das OnChange Ereignis des Edit Feldes schreiben,oder ?

Also,egal was der Benutzer ins Editfeld tippt,ob groß oder kleine buchstaben,sie sollen immer in groß buchstaben geändert werden.

Hoffe doch da weiß jemand etwas drüber.

Alfi

[Lightning]

du kannst ja im onchange alle buchstaben überprüfen und falls sie klein sind in groß ändern. noch besser wäre es, wenn du das ganze im "onkeypress" machst. überprüfe den ascii code des eingegebenen buchstaben und falls er der für den kleinen buchstaben ist, dann soll der für den großen ausgegeben werden. geht vielleicht auch einfacher, aber das fällt mir grad so ein.

[Alfi]

Die Idee hatte ich auch schon,aber ich weiß halt nicht wie ich das machen soll.

[marian19]

im object inspector gibt es die property charcase.. wahle da --]ecUpperCase

[Lightning]

Code:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

If key = #97 then key := #65;

end;

hier wird das "a" durch ein "A" ersetzt
falls du die ascii codes für alle tasten brauchst, schick ich dir ein kleines prog

[Lightning]

außerdem kannst du so ja z.b. ein "a" auch durch ein "B" ersetzen oder so, damit kann man ein bisschen blödsinn machen ;)

[marian19]

dan ginge das so etwas einfacher

procedure TFormPatience.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
key := upcase(key);

end;

[Lightning]

das kannte ich noch gar nicht.

[marian19]

keiner weis alles :--)

[Alfi]

Das mit der OJI Einstellung hat funktioniert,mehr wollt ich gar nicht,aber trotzdem danke an alle :)

Alfi

[AndreasMascher]

Schreib ins onexit (onchange is da aber nich so gut)
edit1.text := AnsiUpperCase(edit1.text);