Selam Arkadaşlar Delphi Projesi Var elimde... Sorunum Şu ; Edit1 nesnesine girilecek karakterlerin hepsi büyük harfle olsun.. Bunun komutu nedir bulamadım.. Kullanım Şekliyle Beraber yardımcı olursanız sevinirim + 3 karma

Function BuyukHarf : Char; begin case Harf of 'ı': Result:='I'; 'ğ': Result:='Ğ'; 'ü': Result:='Ü'; 'ş': Result:='Ş'; 'i': Result:='İ'; 'ö': Result:='Ö'; 'ç': Result:='Ç'; else Result:=UpCase ; end; end; procedure TForm1. Edit1KeyPress ; begin Key:=BuyukHarf ; end; yukarıdaki gibi tüm harfleri tanımlarsan ii olur. daha basit yöntemlerde vardır ama bu işini görür.