Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
Re: Anfangsbuchstabe eines Wortes
13. Dez 2005, 13:29
Zitat von ibp:
noch Eleganter:
Delphi-Quellcode:
function IsCapitel(s: Char): Boolean;
begin
result := s in ['A'..'Z']
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(BoolToStr(IsCapitel('z'), True));
end;
Mist.
Michael Ein Teil meines Codes würde euch verunsichern.
|