Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#10

Re: Anfangsbuchstabe eines Wortes

  Alt 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.
  Mit Zitat antworten Zitat