syntax prob

[G G]

inkompatible typen sagt er, ich hab markiert wo der cursor stehen bleibt

image_num := strtoint (image_name2);

Delphi-Quellcode:

if image_num <> 1 and image_num <> 16 and image_num <>//hier bleibt cursor stehen
 31 and image_num <> 46 and image_num <> 61 and image_num <> 76 and image_num <> 91 and image_num <> 106 and image_num <> 121 and image_num <> 136 and image_num <> 151 and image_num <> 166 and image_num <> 181 and image_num <> 196 and image_num <> 211 and image_num <> 226 and image_num <> 241
then begin

[Sharky]

AND hat eine höhere Bindung. Darum klammern setzten.

if (image_num <> 1) and (image_num <> 16) and (image_num <> 31).....

[Nikolas]

Klammer??? Oder
if not in [6,21,61...]

Edit: Tjy, da war der Hai schneller.

[G G]

kannst du vielleicht etwas genauer zeigen wie man "if not in" benutzt? hab immer gedacht man müste immer alles ausschreiebn bei if sachen

[Sharky]

Zitat von G G:

kannst du vielleicht etwas genauer zeigen wie man "if not in" benutzt? hab immer gedacht man müste immer alles ausschreiebn bei if sachen

Hai G G,

in diesem Fall ist es eine "Mengenoperation" und darum geht es.

Delphi-Quellcode:

begin
  if not (image_num IN 6,21,61...]) then
  begin
  end;
end;

[Edit]Erster
[Edit2] Aber himitsu hat ja auch alle zahlen getippt

[Nikolas]

nein, man kann auch eine Menge benutzen. Sieht dann so aus:
if not (a in [1,2,3]) then dosomething; TOX

Edit: Also langsam find ich das echt nicht mehr lustig

[himitsu]

Delphi-Quellcode:

if not (image_num in [1, 16, 31, 46, 61, 76, 91, 106, 121, 136, 151, 166, 181, 196, 211, 226, 241] 
then begin

[edit] och menno, zu langsam -.-