procedure Shutdown

[Stuffy]

 

Code: [Select]

if (Shutdown) and (Timer > 0) then
     WriteConsole(0,'Scheduled server-restart in ' + IntToStr(Timer),$FF0000);
         if Timer = 0 then begin
           WriteConsole(0,'Bye.',$FF0000);
             Shutdown;
         end;
Outputs me a "Assignment expected" error for the line where Shutdown; is in.
Without the Shutdown everything works fine. Whats the problem in there?

[DarkCrusade]

Code: (pascal) [Select]


if ((Shutdown) and (Timer > 0)) then begin
  WriteConsole(0,'Scheduled server-restart in ' + IntToStr(Timer),$FF0000);
  if Timer = 0 then begin
    WriteConsole(0,'Bye.',$FF0000);
    Shutdown;
  end;
end;


[Stuffy]

what? Timer and Shutdown are different types, why should I put them into another bracket? Thats useless.

[tk]

You declared 'shutdown' as a variable before...

[DarkCrusade]

Each bracket is one condition. Not putting these conditions in one big one makes scripts crash (at least in Java, didn't test that script yet). And it's nothing wrong with doing it like that. As long as you don't use something like "if 5 = true" it's okay. Again: each bracket counts as a boolean. That's why you can use the logical and you fool

[Stuffy]

Well, I've nerver used it in my script, and they works without any problems, and those bracket fix nothing.
In some programming languages you have to put brackets around the if-conditions, but not in delphi as far is I know.

And tk was right. Now it works.