Página 1 de 1

Como funciona o #command read do std.ch ?

Enviado: 25 Mai 2020 18:41
por lwinter
Pessoal, estou tentando entender o comando #command read que consta no std.ch mas tenho uma duvida quanto a ultima instrucao ao final do comando "(GetList)" .

#command READ => ReadModal( GetList ) ; GetList := {} ; ( GetList )

Alguem saberia me dizer do que se trata?
Eu precisava alterar o getsys.prg para incluir mais um parametro de cordenadas do mouse, para que o GET passe a aceitar eventos de botoes em console. Ja esta praticamente tudo certo só falta isso.
Na realidade eu gostaria de entender pra nao cometer nenhum bobagem e tambem ganhar tempo.

Penso em assim:
ReadModal (GetList, nPos, lIsMouse, getMouseButtons )
GetList = {}

Posso fazer assim? ou falta alguma coisa? Digo isso pois nao entendi o "(GetList)" e se isso pode complicar algo.

Obriagdo!

Como funciona o #command read do std.ch ?

Enviado: 25 Mai 2020 22:40
por JoséQuintas
lwinter escreveu:Alguem saberia me dizer do que se trata?
Não significa nada.
Até já usei isso pra compilar LIBs gráficas com -w3 -es2.

Código: Selecionar todos

PROCEDURE Main

   LOCAL x

   (x)

   RETURN
Só elimina o erro de compilação por não usar a variável.
Desse jeito usa.... pra nada, mas usa.

Como funciona o #command read do std.ch ?

Enviado: 25 Mai 2020 22:44
por JoséQuintas
Retirado do std.ch:

Código: Selecionar todos

#define HB_SYMBOL_UNUSED( symbol )  ( ( symbol ) )

Como funciona o #command read do std.ch ?

Enviado: 25 Mai 2020 22:48
por Vlademiro
Interessante. Já tava pensando que era um erro.

Como funciona o #command read do std.ch ?

Enviado: 26 Mai 2020 14:17
por lwinter
Quer dizer que se eu compilar com (variavel) engana o compilador com as diretivas -es2 -w3?
Interessante mesmo! Cada dia aprendendo um pouco de Harbour.

Como funciona o #command read do std.ch ?

Enviado: 26 Mai 2020 14:22
por lwinter
testei e nao é que funcionou!!!
Muito bom agora vou tapear o compilador quando precisar....kkkk... as vezes estou no meio do dev e tenho que ficar inventado moda para compilar , agora nao preciso mais.

Como funciona o #command read do std.ch ?

Enviado: 31 Mai 2020 12:19
por Vlademiro
Esse GetList é uma variável private, provavelmente. Se for ainda acho melhor usar local GetList := {}. É como eu fazia na época do Clipper. Isso evita problemas com gets aninhados. Continua sendo uma boa prática.