![](templates/Jet/images/c_left_top.gif) |
![](templates/Jet/images/c_right_top.gif) |
![](templates/Jet/images/spacer.gif) |
Autor |
Mensagem |
LINCK
Usuário
![Usuário Usuário](images/2.gif)
![](images/avatars/7354088324f71bdb043cb2.jpg)
Registrado: 26/02/12 Mensagens: 117
|
|
variavél global |
|
Como vai rapaziada !!!
Alguém sabe como faço para a variável global armazenar letras ao invés de números.
Agradeço desde já a atenção ...
_________________ "Não pense que é capaz. Saiba que é."
"Cedo ou tarde, você vai aprender, assim como eu aprendi, que existe uma diferença entre CONHECER o caminho e TRILHAR o caminho." (MATRIX)
http://pcmodesto.blogspot.com |
|
Sáb Abr 14, 2012 7:44 pm |
![Exibir perfil de usuários Exibir perfil de usuários](templates/Jet/images/lang_english/icon_profile.gif) |
![](templates/Jet/images/spacer.gif) |
welgomes
Usuário
![Usuário Usuário](images/3.gif)
![](images/avatars/95998694250d5d6cb51a5e.png)
Registrado: 10/07/11 Mensagens: 827 Localização: São Paulo - Capital |
|
|
|
A função ReadGlobalVar( ) não funcionou?
Porque na ajuda está falando que ela retorna um variant, ou seja, qualquer coisa, então teoricamente ela pode tanto retornar um número como uma string.
|
|
Dom Abr 15, 2012 12:46 am |
![Exibir perfil de usuários Exibir perfil de usuários](templates/Jet/images/lang_english/icon_profile.gif) |
![](templates/Jet/images/spacer.gif) |
LINCK
Usuário
![Usuário Usuário](images/2.gif)
![](images/avatars/7354088324f71bdb043cb2.jpg)
Registrado: 26/02/12 Mensagens: 117
|
|
|
|
Seguindo o exemplo do Edno Rodrigues, coloquei um painel para inserir senha que vai ler um Edit que vai ser enviada para variavel global no OnCreate no mapa:
WriteGlobalVar('Acesso', 0);
No MainLoop: tento carregar letras no variavel global:
if ReadGlobalVar('Acesso') = stars then
Begin
//---Begin Script Builder: Move Objeto Estatico---//
if Round(GetObjectPositionX('Cubo64')) < 1 then
SetObjectPosition('Cubo64', GetObjectPositionX('Cubo64')+0.02, GetObjectPositionY('Cubo64'), GetObjectPositionZ('Cubo64'));
//---End Script Builder---//
se eu coloco numeros funciona:
if ReadGlobalVar('Acesso') = 2231 then
Begin
//---Begin Script Builder: Move Objeto Estatico---//
if Round(GetObjectPositionX('Cubo64')) < 1 then
SetObjectPosition('Cubo64', GetObjectPositionX('Cubo64')+0.02, GetObjectPositionY('Cubo64'), GetObjectPositionZ('Cubo64'));
//---End Script Builder---//
_________________ "Não pense que é capaz. Saiba que é."
"Cedo ou tarde, você vai aprender, assim como eu aprendi, que existe uma diferença entre CONHECER o caminho e TRILHAR o caminho." (MATRIX)
http://pcmodesto.blogspot.com |
|
Dom Abr 15, 2012 1:20 am |
![Exibir perfil de usuários Exibir perfil de usuários](templates/Jet/images/lang_english/icon_profile.gif) |
![](templates/Jet/images/spacer.gif) |
welgomes
Usuário
![Usuário Usuário](images/3.gif)
![](images/avatars/95998694250d5d6cb51a5e.png)
Registrado: 10/07/11 Mensagens: 827 Localização: São Paulo - Capital |
|
|
|
Essa stars é uma variável? Ou é a senha?
Porque se for a senha, tem que colocar aspas: "stars"
E se for uma variável, você tem que colocar um valor dentro dela:
stars = "sua senha aqui";
|
|
Dom Abr 15, 2012 3:12 am |
![Exibir perfil de usuários Exibir perfil de usuários](templates/Jet/images/lang_english/icon_profile.gif) |
![](templates/Jet/images/spacer.gif) |
welgomes
Usuário
![Usuário Usuário](images/3.gif)
![](images/avatars/95998694250d5d6cb51a5e.png)
Registrado: 10/07/11 Mensagens: 827 Localização: São Paulo - Capital |
|
|
|
![](templates/Jet/images/quote_header.gif) | ![](templates/Jet/images/spacer.gif) |
E se for uma variável, você tem que colocar um valor dentro dela:
stars = "sua senha aqui"; |
Ops! Faltou os dois-pontos.
stars := "sua senha aqui";
|
|
Dom Abr 15, 2012 3:13 am |
![Exibir perfil de usuários Exibir perfil de usuários](templates/Jet/images/lang_english/icon_profile.gif) |
![](templates/Jet/images/spacer.gif) |
LINCK
Usuário
![Usuário Usuário](images/2.gif)
![](images/avatars/7354088324f71bdb043cb2.jpg)
Registrado: 26/02/12 Mensagens: 117
|
|
|
|
É a senha, tentei colocar " " e deu erro, depois coloquei com ' ' até rodou mas depois deu erro, será que não tem que colocar o IntToStr ? ou declarar a variável com string, se tiver como faço isso ?
Valeu pela atenção !!!
_________________ "Não pense que é capaz. Saiba que é."
"Cedo ou tarde, você vai aprender, assim como eu aprendi, que existe uma diferença entre CONHECER o caminho e TRILHAR o caminho." (MATRIX)
http://pcmodesto.blogspot.com |
|
Dom Abr 15, 2012 3:26 am |
![Exibir perfil de usuários Exibir perfil de usuários](templates/Jet/images/lang_english/icon_profile.gif) |
![](templates/Jet/images/spacer.gif) |
welgomes
Usuário
![Usuário Usuário](images/3.gif)
![](images/avatars/95998694250d5d6cb51a5e.png)
Registrado: 10/07/11 Mensagens: 827 Localização: São Paulo - Capital |
|
|
|
Ops! Outro erro meu. Pascal se usa aspas simples e não aspas duplas.
Como é a senha seu código tem que ficar assim:
![](templates/Jet/images/code_header.gif) | ![](templates/Jet/images/spacer.gif) | if ReadGlobalVar('Acesso') = 'stars' then |
Que erro deu quando você usou aspas simples?
![Question](images/smiles/icon_question.gif)
|
|
Dom Abr 15, 2012 4:32 am |
![Exibir perfil de usuários Exibir perfil de usuários](templates/Jet/images/lang_english/icon_profile.gif) |
![](templates/Jet/images/spacer.gif) |
LINCK
Usuário
![Usuário Usuário](images/2.gif)
![](images/avatars/7354088324f71bdb043cb2.jpg)
Registrado: 26/02/12 Mensagens: 117
|
|
|
|
Sim dá o seguinte erro:
could not convert variant of type (string) into type (double)
_________________ "Não pense que é capaz. Saiba que é."
"Cedo ou tarde, você vai aprender, assim como eu aprendi, que existe uma diferença entre CONHECER o caminho e TRILHAR o caminho." (MATRIX)
http://pcmodesto.blogspot.com |
|
Dom Abr 15, 2012 4:36 am |
![Exibir perfil de usuários Exibir perfil de usuários](templates/Jet/images/lang_english/icon_profile.gif) |
![](templates/Jet/images/spacer.gif) |
|
|
![](templates/Jet/images/spacer.gif) |
![](templates/Jet/images/c_left_bottom.gif) |
![](templates/Jet/images/c_right_bottom.gif) |
|