bencz escreveu:E se eu tiver um arquivo, que contenha as informações tipo:
Código: Selecionar todos
@ 02, 04 to 06, 15
@ 03, 05 prompt " Consulta "
@ 04, 05 prompt " Inclusão "
@ 05, 05 prompt " Exclusão "
Se for o que eu entendi, seria colocar o código fonte acima listado num arquivo e esse conteúdo traduzi-lo para macro e depois executar. Se for isso, vai demandar um trabalho enorme e não sei se irá ficar bom, isso em decorrimento dessa forma em que você indicou e que estaria no arquivo. Pois veja que para executar o comando MENU TO vai precisar exibir em linha e coluna cada opção de menu. Então sugiro você gravar no arquivo algo assim:
|  03,  |  05,  |  " Consulta "  |
|  04,  |  05,  |  " Inclusão "  |
|  05,  |  05,  |  " Exclusão "  |
Então daí você pode ler o arquivo linha a linha, desmembrando cada informação separada por vírgula armazenado em vetores, assim você poderia traduzir isso para comando do MENU TO.
Olha eu fiz um exemplo que condiz com essa indicação e que já te dá uma ideia do que precisaria:
Código: Selecionar todos
Cls
aMenu:={" Consulta "," Inclusao "," Exclusao "}
aLin:={03,04,05}
aCol:={05,05,05}
@ 02, 04 to 06, 15
For i=1 to Len(aMenu)
@ aLin[i],aCol[i] Prompt aMenu[i]
Next
Menu to OP
Você poderia contar-nos para quê serviria isso ?