kod: function IsUpperCase(Value: string): Boolean; begin Result := Value = UpperCase(Value); end;
YaSa22 Fahri Üye Fahri Üye Katılım 12 Temmuz 2014 Mesajlar 2,293 Tepkime puanı 2 Puanları 0 Konum GTA 13 Ağustos 2014 #1 kod: function IsUpperCase(Value: string): Boolean; begin Result := Value = UpperCase(Value); end;