Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Isalpha, IsNum, IsNumeric als eine Function

    Delphi
    by Namenloser, 4. Apr 2009
  Das Case wollte ich auch vorschlagen... aber hast du ja leider schon :mrgreen:
  Wieso hast du auskommentiert, und stattdessen UpperCase aufgerufen? Ich wette, dass es so schneller ist:
  function CheckStr(Str: string): TStringTyp;
  var
  i: Integer;
  begin
  Result := ;
  for i := 1 to Length(Str) do
  begin
  Case Str of