Also ich habe mir jetzt
das andere Thema durchgelesen und
gesehen das es doch nicht so leicht ist wie ich mir dachte....
Da ich die Abfrage eh nur 1x im Program habe, lasse ich es jetzt ganz einfach bei
Delphi-Quellcode:
if (temp<>'oben') and (temp<>'links') and (temp<>'unten') and (temp<>'rechts') and (temp<>'up') and (temp<>'left') and (temp<>'down') and (temp<>'right') then
begin
showmessage('Fehler...');
exit;
end;