Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 4 Próxima »

Função: WriteProfString

Cria ou altera o conteúdo de uma chave no arquivo win.ini (arquivo utilizado para armazenar configurações básicas de inicialização) do sistema operacional.

WriteProfString ( < cSecao>, < cChave>, < cValor> ) --> lRet

 

NomeTipoDescriçãoObrigatórioReferência
cSecaoCaracterIndica o nome da seção que será criada ou alterada.X 
cChaveCaracterIndica o nome da chave que será criada ou alterada.X 
cValorCaracterIndica o conteúdo que será definido ou atualizado.X 

 

lRet
    (logico)
  • Retorna verdadeiro (.T.), se a chave for incluída ou alterada com sucesso, ou falso (.F.), caso ocorra alguma falha ou impossibilidade de acesso no arquivo de configuração.
  • O arquivo win.ini está disponível somente para sistemas operacionais Windows.
  •  Em ambiente Linux, será retornado o erro "cannot handle win.ini under unix systems".

 

 

Exemplo
User Function Exemplo()
	Local cSecao := "" 
	Local cChave := ""
	Local cValor := ""
	Local cRecuperado := ""
	Local cMensagem := ""
	
	//+----------------------------------------------------------------------------+
	//|Exemplifica o uso da função WriteProfString                                 |
	//+----------------------------------------------------------------------------+  
	cSecao := "SecaoExemplo"  
	cChave := "ChaveExemplo"  
	cValor := "ConteudoExemplo"  
	
	WriteProfString(cSecao, cChave, cValor)  
	
	cRecuperado := GetProfString(cSecao, cChave, "undefined")  
	
	cMensagem += "Seção [" + cSecao + "], chave [" + cChave + ;
		"] e conteúdo [" + cValor + "] " + ;
		IIf(!(cRecuperado == cValor), "não ", " ") + "gravado com sucesso!"
		
		//+----------------------------------------------------------------------------+
		//|Apresenta uma mensagem com os resultados obtidos                            |
		//+----------------------------------------------------------------------------+
		
	MsgInfo(cMensagem, "Exemplo do WriteProfString")
Return

 

Exemplo da função WriteProfString
Microsiga Protheus 8.11 , Protheus 10

 

  • Sem rótulos