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

[Sharky]

Zitat von Spider:

... Genau, aber ich stell mich echt doof an

Nö, Du kennst nur nicht die "alten" Pascalfunktionen

Delphi-Quellcode:

var
  Temp1, Temp2: String;

procedure TForm1.Button1Click(Sender: TObject);
 var
  i_tmp,
  Code1,
  Code2 : Integer;
begin
  Temp1 := '123';
  Temp2 := 'jdjd';
  Val(Temp1, i_tmp, Code1);
  Val(Temp2, i_tmp, Code2);
  if (Code1 <> 0) or (Code2 <> 0) then
  begin
    ShowMessage ('Keine Zahl!');
  end;
end;

Einfach mal die Procedure VAL in der OH ansehen.