| 4D v18CREATE ALIAS | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D v18
 CREATE ALIAS 
         | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| CREATE ALIAS ( rotaObjetivo ; rotaAlias ) | ||||||||
| Parâmetro | Tipo | Descrição | ||||||
| rotaObjetivo | String |   | Nome da rota de acesso do alias/atalho alvo | |||||
| rotaAlias | String |   | Nome ou rota de acesso completa para o alias ou atalho | |||||
O comando CREATE ALIAS cria um alias (chamado “atalho” em Windows) do arquivo ou pasta objetivo passado em rotaObjetivo. O nome e a localização são definidos pelo parâmetro rotaAlias.
Pode criar um alias de todo tipo de documento ou de pasta. O ícone do alias será idêntico ao do elemento objetivo. O ícone contém uma pequena flecha na parte inferior esquerda. Em Mac OS, o nome do ícone é mostrado em caracteres em itálico.
Este comando não atribui um nome por padrão, o nome tem que ser passado no parâmetro rotaAlias. Se apenas passa um nome neste parâmetro, o alias é criado na pasta ativa atual (geralmente a pasta que contém o arquivo de estrutura).
Nota: em Windows, os atalhos são arquivos com extensão “.LNK” (invisível). Se esta extensão não for passada, é adicionada automaticamente pelo comando.
Se for passada uma string vazia em rotaObjetivo, o comando não faz nada.
Seu banco gera arquivos de texto chamados “RelatórioNúmero” armazenados na pasta do banco. O usuário quer criar atalhos a estes relatórios e armazená-los em uma localização conveniente:
  `Método CRIAR_RELATORIO
 C_TEXT($vtInf)
 C_STRING(250;$vtRota)
 C_STRING(80;$vaNome)
 C_TIME(vDoc)
 C_INTEGER($NumRelatorio)
 
 $vtInf:=... `Criar relatorio
 $NumRelatorio:=... `Calculo do número do relatório
 $vaNome:="Relatório"+String($NumRelatório)+".txt" `Nome do arquivo
 vDoc:=Create document($vaNome)
 If(OK=1)
    SEND PACKET(vDoc;$vtInf)
    CLOSE DOCUMENT(vDoc)
  `Adicionar o alias
    CONFIRM("Criar um alias para este relatório?")
    If(OK=1)
       $vtRuta:=Select folder("Onde quer criar o alias?")
       If(OK=1)
          CREATE ALIAS($vaNome;$vtRota+$vaNome)
          If(OK=1)
             SHOW ON DISK($vtRota+$vaNome)
  `Mostrar a localização do alias
          End if
       End if
    End if
 End ifA variável sistema OK assume o valor 1 se o comando for executado corretamente, se não assume o valor 0.
	Produto: 4D
	Tema: Documentos de Sistema
	Número 
        694
        
        
        
	
	Criado por: 4D v6.7
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	Manual de linguagem 4D ( 4D v18)
	
	
	
	
	
 Adicionar um comentário
Adicionar um comentário