Deklarieren von Variablen

[Marxon]

Hi,

hoffentlich fang ich nicht an zu nerven aber leider
habe ich schon wieder ein Problem in meiner DDF

Hier der Code

Code: Alles auswählen

procedure gobo1shakechange;
 begin
    DontRefresh:=true;
		case gobo1shake.itemindex of
		0: shake1active:=0;
		   shake1:=1;
		1: shake1active:=1;
		   shake1:=2;
		2: shake1active:=1;
		   shake1:=5;
		3: shake1active:=1;
		   shake1:=8;
		end;
  end;

Obwohl ich sie in den globalen Variablen mittels

Code: Alles auswählen

shake1active:integer; 
shake1:integer; 

deklariert habe, meldet PCD trotzdem
"Type of expression must be integer"
Woran könnte das liegen?

Mfg
Marxon

[Christian]

Hi,


du hast die "begin/end" im Case vergessen:

Code: Alles auswählen

procedure gobo1shakechange;
begin
    DontRefresh:=true;
      case gobo1shake.itemindex of
      0:
      begin
        shake1active:=0;
        shake1:=1;
      end;
      1:
      begin
        shake1active:=1;
        shake1:=2;
      end;
      2:
      begin
        shake1active:=1;
        shake1:=5;
      end;
      3:
      begin
        shake1active:=1;
        shake1:=8;
      end;
  end;

so sollte es funktionieren.


ciao,
Christian

[Marxon]

Guten Abend,

dank dir Christian, mit dem "begin/end" im case funktioniert es jetzt.
Das DDF ist nun bald fertig

Marxon