Überprüfen ob String in Array of String drinne ist.

[Sharky]

Uff...

ich bin ja auch doof

Delphi-Quellcode:

var
  Zahlen : set of '0'..'9';
  Temp1, Temp2: Char;

procedure TForm1.Button1Click(Sender: TObject);
begin
  temp1 := 'A';
  temp2 := 'b';
  if (not (Temp1 in Zahlen)) or (not(Temp2 in Zahlen)) then
  begin
    exit;
  end
end;

in geht nur bein einem set of von Ordinalentypen (Char)