Página 1 de 1

Edicao de texto e acentuacao.

Enviado: 29 Jul 2008 00:27
por marcos.gurupi
Caros, eu tenho um arquivo INI com o conteudo de um contrato, acontece que quero deixar o usuario editar o ARQ.INI. Qual eh o comando em hwgui para fazer essa edicao? Outra duvida e sobre acentuacao, fiz a acentuacao mas quando eh gravado no arq. INI fica cheio de caracter.

Marcos Roberto

Re: Edicao de texto e acentuacao.

Enviado: 29 Jul 2008 14:08
por sygecom
Tinha respondido mas não tinha entendido direito e apaguei o post, pode usar HB_AnsiToOem() e HB_OemToAnsi() antes de gravar no INI par ter ver se fica com a Acentuação correta.

Re: Edicao de texto e acentuacao.

Enviado: 30 Jul 2008 09:41
por marcos.gurupi
Leonardo, no post acima eu tenho na verdade duas perguntas, uma eh sobre a acentuacao q vc respondeu a outra eh saber qual eh o comando q uso em hwgui para abrir o arq. ini na tela editar e depois gravar. Nao me refiro aos comandos hb_...ini, mas algum editext. Espero ter me expressado melhor.

Marcos Roberto.

Re: Edicao de texto e acentuacao.

Enviado: 30 Jul 2008 13:57
por sygecom
Marcos, nos meus INI eu uso assim:
Para Criar um INI:

Código: Selecionar todos

Function Cria_INI
Private oDirec:=DiskName()+":\"+CurDir()+"\"
IF !FILE("sygecom.ini")
   Hwg_WriteIni( 'Mysql', 'Host',     "localhost", oDirec+"sygecom.Ini" )
   Hwg_WriteIni( 'Mysql', 'Usuario',  "root",      oDirec+"sygecom.Ini" )
   Hwg_WriteIni( 'Mysql', 'Senha',    "",          oDirec+"sygecom.Ini" )
   Hwg_WriteIni( 'Mysql', 'Banco',    "sygecom",   oDirec+"sygecom.Ini" )
   Hwg_WriteIni( 'Mysql', 'Porta',    "3306",      oDirec+"sygecom.Ini" )
Endif
RETURN
Para Ler o INI:

Código: Selecionar todos

Function Ler_INI
Private vHost, vUsuario, vSenha, vBanco, vPorta
Private oDirec:=DiskName()+":\"+CurDir()+"\"
vHost    :=Hwg_GetIni( 'Mysql', 'Host'   , ,       oDirec+"sygecom.Ini" )
vUsuario :=Hwg_GetIni( 'Mysql', 'Usuario', ,       oDirec+"sygecom.Ini" )
vSenha   :=Hwg_GetIni( 'Mysql', 'Senha'  , ,       oDirec+"sygecom.Ini" )
vBanco   :=Hwg_GetIni( 'Mysql', 'Banco'  , ,       oDirec+"sygecom.Ini" )
vPorta   :=Hwg_GetIni( 'Mysql', 'Porta'  , ,       oDirec+"sygecom.Ini" )
RETURN
Quando eu quero alterar um .INI eu deleto o .INI e crio novamente com a estrutura que quero, usando compos GET comun para o usuario digitar.

Re: Edicao de texto e acentuacao.

Enviado: 30 Jul 2008 14:00
por esbasso
Use o controle RICHEDIT para editar ele. É SO IMPLEMENTAR.

Re: Edicao de texto e acentuacao.

Enviado: 30 Jul 2008 14:18
por marcos.gurupi
Era o "RICHEDIT" que eu queria lembrar, n consegui encontrar no samples da hwgui. Obrigado.

Marcos Roberto.