PHSYS - Wiki

A variável ScriptServer retorna verdadeiro se o Script estiver sendo executado no servidor, caso contrário retorna falso.

Sintaxe

ScriptServer :Boolean;

Exemplos

 begin
    if ScriptServer then
     Informacao('Está no Servidor')
    else
     Informacao('Está no Cliente');                     
  end.