Re: [delphi-br] Leitura contrária de INI
E tu não consegue trocar as letras ? á por a ?
algo tipo:
cNomeTabela := 'Usuário';
qry.Sql.Add('Select blablabla from ' + TrocaLebra(cNomeTabela));
//=
function TrocaLetra(cPalavra: String): String
begin
for nCnt := 1 to length(cPalavra)
begin
if cPalavra[nCnt] = 'á' then cPalavra[nCnt] := 'a';
if cPalavra[nCnt] = 'é' then cPalavra[nCnt] := 'e';
if cPalavra[nCnt] = 'ç' then cPalavra[nCnt] := 'c';
...
end;
Result := cPalavra;
end;
//=
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 10:24 AM
Subject: RES: [delphi-br] Leitura contrária de INI
Rogério,
É o caso q expliquei no e-mail q vc respondeu...rs...
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form...
porém, me deparei com comparações mil dentro do sistema com strings exibidas
ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o
acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta
palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem
tarefas a serem executas. Por isso preciso fazer a reversão
Basicamente o usuário escolhe com qual tipo de cadastro ele quer lidar em um
Combobox antigamente exibia-se Usuario, o q é feio, pois este é o nome
da tabela, então o usuário escolhendo a tabela usuário, era so montar o
select: select * from cmbtabela.text mas como o text passou a ser
Usuário com acento, gera o erro de sqlé isto q preciso reverter, de
Usuário, trazer Usuario
PS: usuário foi um exempli simplificado, o nome das tabelas é um pouco mais
complexo.rs...
Obrigada,
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rogério
Enviada em: terça-feira, 13 de junho de 2006 10:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Fiquei curioso,
Tamara, o que vc precisa solucionar? (pq procurar a diretiva à partir do
valor?)
Abraço,
Rogério Ricardo Fernandes
Desenvolvimento
http://www.strategies.inf.br
Tel.:47 3221-4500/Fax:47 3221-4599
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 9:03 AM
Subject: RES: [delphi-br] Leitura contrária de INI
Campus,
Vc diz a partir deste stringlist gerado procurar a string desejada e
atraves do copy pegar o q preciso? Uhm... se for isso, torna-se inviável...
por meu INI tem uma unica [Section] então o stringlist conteria td o meu
INI e na maior parte das vezes o q eu preciso, se for procurado simplesmente
como string dentro de um texto, acabará por gerar falhas... pode até ser q
não, mas é muito apto a falhas... vou exemplificar melhor
[Section do INI]
cadastro=cadastrar
usuario=usuário
cadastrar usuario=Cadastrar usuário
visitas=Visitantes
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form...
porém, me deparei com comparações mil dentro do sistema com strings exibidas
ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o
acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta
palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem
tarefas a serem executas. Por isso preciso fazer a reversão entendeu?
E pq não posso utilizar sua ideia: procurar no arquivo td um string, alem
de ser relativamente demorado, se eu procurar por usuário, terei como
resposta, duas strings, só neste pequeno exemplo
Obrigada pela atenção
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Campus
Enviada em: segunda-feira, 12 de junho de 2006 18:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
No meu Delphi (5), não tem nenhuma função que faça isso. dá uma olhada no
help do teu delphi no TIniFile, e ve se tem alguma coisa nos métodos.
Se não tiver, tu pode contornar com o ReadSection, ele carrega todas as
chaves do teu indice numa string list, daí fica fácil procurar.
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
RES: [delphi-br] Leitura contrária de INI
A questão ñ é pura e simplesmente trocar letras... no caso de Usuário q foi um,
assim como falei, um simples exemplo, eu teria: Controle de Usuários sendo
exibido ao usuario e a tabela de nome ControleUsuario... entendeu?
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Campus
Enviada em: quarta-feira, 14 de junho de 2006 09:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
E tu não consegue trocar as letras ? á por a ?
algo tipo:
cNomeTabela := 'Usuário';
qry.Sql.Add('Select blablabla from ' + TrocaLebra(cNomeTabela));
//=
function TrocaLetra(cPalavra: String): String
begin
for nCnt := 1 to length(cPalavra)
begin
if cPalavra[nCnt] = 'á' then cPalavra[nCnt] := 'a';
if cPalavra[nCnt] = 'é' then cPalavra[nCnt] := 'e';
if cPalavra[nCnt] = 'ç' then cPalavra[nCnt] := 'c';
...
end;
Result := cPalavra;
end;
//=
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 10:24 AM
Subject: RES: [delphi-br] Leitura contrária de INI
Rogério,
É o caso q expliquei no e-mail q vc respondeu...rs...
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form...
porém, me deparei com comparações mil dentro do sistema com strings exibidas
ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o
acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta
palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem
tarefas a serem executas. Por isso preciso fazer a reversão
Basicamente o usuário escolhe com qual tipo de cadastro ele quer lidar em um
Combobox antigamente exibia-se Usuario, o q é feio, pois este é o nome
da tabela, então o usuário escolhendo a tabela usuário, era so montar o
select: select * from cmbtabela.text mas como o text passou a ser
Usuário com acento, gera o erro de sqlé isto q preciso reverter, de
Usuário, trazer Usuario
PS: usuário foi um exempli simplificado, o nome das tabelas é um pouco mais
complexo.rs...
Obrigada,
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rogério
Enviada em: terça-feira, 13 de junho de 2006 10:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Fiquei curioso,
Tamara, o que vc precisa solucionar? (pq procurar a diretiva à partir do
valor?)
Abraço,
Rogério Ricardo Fernandes
Desenvolvimento
http://www.strategies.inf.br
Tel.:47 3221-4500/Fax:47 3221-4599
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 9:03 AM
Subject: RES: [delphi-br] Leitura contrária de INI
Campus,
Vc diz a partir deste stringlist gerado procurar a string desejada e
atraves do copy pegar o q preciso? Uhm... se for isso, torna-se inviável...
por meu INI tem uma unica [Section] então o stringlist conteria td o meu
INI e na maior parte das vezes o q eu preciso, se for procurado simplesmente
como string dentro de um texto, acabará por gerar falhas... pode até ser q
não, mas é muito apto a falhas... vou exemplificar melhor
[Section do INI]
cadastro=cadastrar
usuario=usuário
cadastrar usuario=Cadastrar usuário
visitas=Visitantes
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form...
porém, me deparei com comparações mil dentro do sistema com strings exibidas
ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o
acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta
palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem
tarefas a serem executas. Por isso preciso fazer a reversão entendeu?
E pq não posso utilizar sua ideia: procurar no arquivo td um string, alem
de ser relativamente demorado, se eu procurar por usuário, terei como
resposta, duas strings, só neste pequeno exemplo
Obrigada pela atenção
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br
RES: [delphi-br] Leitura contrária de INI
Campus,
Vc diz a partir deste stringlist gerado procurar a string desejada e atraves do
copy pegar o q preciso? Uhm... se for isso, torna-se inviável... por meu INI
tem uma unica [Section] então o stringlist conteria td o meu INI e na maior
parte das vezes o q eu preciso, se for procurado simplesmente como string
dentro de um texto, acabará por gerar falhas... pode até ser q não, mas é muito
apto a falhas... vou exemplificar melhor
[Section do INI]
cadastro=cadastrar
usuario=usuário
cadastrar usuario=Cadastrar usuário
visitas=Visitantes
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form... porém,
me deparei com comparações mil dentro do sistema com strings exibidas ao
usuário, como é o caso da palavra usuário, q estava sendo exibida sem o acento,
o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta palavra acaba
por ser o nome da tabela, q apos sua escolha pelo usuário tem tarefas a serem
executas. Por isso preciso fazer a reversão entendeu?
E pq não posso utilizar sua ideia: procurar no arquivo td um string, alem de
ser relativamente demorado, se eu procurar por usuário, terei como resposta,
duas strings, só neste pequeno exemplo
Obrigada pela atenção
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Campus
Enviada em: segunda-feira, 12 de junho de 2006 18:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
No meu Delphi (5), não tem nenhuma função que faça isso. dá uma olhada no
help do teu delphi no TIniFile, e ve se tem alguma coisa nos métodos.
Se não tiver, tu pode contornar com o ReadSection, ele carrega todas as
chaves do teu indice numa string list, daí fica fácil procurar.
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '') meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos
|
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação,
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RES: Re: [delphi-br] Leitura contrária de INI
Bom dia José,
Seria exatamente isto o q eu preciso, porém, testando aqui a sua função, me
deparei com um problema: não sei se o stringlist tem um limite a ser carregado
nele, mas de acordo com o tamanho do meu arquivo INI, ele não chega até a
metade do arquivo fazendo a verificação particionei meu arquivo e ele
encontrou direitinho a minha string conforme eu precisava :(
Existe alguma extensão do stringlist?
Muito Obrigada pela ajuda
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de José
Claudemir
Enviada em: segunda-feira, 12 de junho de 2006 21:01
Para: delphi-br@yahoogrupos.com.br
Assunto: Res: Re: [delphi-br] Leitura contrária de INI
Olá !!
Não seria isso o que VC está querendo .. !!
Até mais !!!
Function AchaDiretiva(MyIni,MyIndice,MyStr: String): String;
Var
AppIni : TIniFile;
Items : TStringList;
I : INteger;
SStr : String;
SChave : String;
Begin
Result := '';
Items := TStringList.Create;
AppIni := TIniFile.Create(MyIni);
AppIni.ReadSectionValues(MyIndice,Items);
For I:=0 to Items.Count - 1 do begin
SChave := Copy(Items[I],1,Pos('=',Items[I])-1);
SStr := AppIni.ReadString(MyIndice,sChave,'');
If sStr = MyStr then begin
Result := sChave;
Exit;
End;
End;
AppIni.Free;
End;
Procedure TForm1.Button1Click(Sender: TObject);
Begin
ShowMessage(achaDiretiva('c:\arquivo.ini','indice','meu texto2'));
end;
CCNA / Certificado Borland Delphi / MCSA
---Mensagem original---
De: Julio Cesar
Data: 06/12/06 18:50:12
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Faz a leitura de linha a linha, dai da um pos() na string q vc quer, caso
haja na linha entao vc faz a copia do inicio da string ate a pos() do sinal
de igual...
Julio Cesar
[EMAIL PROTECTED]
+353 (87) 2184139
+353 (091) 630317
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 9:22 PM
Subject: RES: [delphi-br] Leitura contrária de INI
Ulisses,
Não é bem isso q eu preciso o q eu preciso não é pegar o texto de
dentro dos colchetes[] e sim o q tem antes do sinal de igual até onde
andei pesquisando, eu conseguiria pegar o texto de dentro dos colchetes
atraves de uma função como o readstring mas antes do sinal de igual ñ
encontrei nd...
Obrigada pela atenção...
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ulisses
Enviada em: segunda-feira, 12 de junho de 2006 17:02
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Boa tarde!
Tenta localizar o caractere [, salva o texto que estiver antes do
caractere ].
Só uma idéia. Se encontrar algo melhor, me avisa.
Boa sorte.
Ulisses
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '')
meu retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e
Treinamentos | Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação
Re: [delphi-br] Leitura contrária de INI
Fiquei curioso,
Tamara, o que vc precisa solucionar? (pq procurar a diretiva à partir do valor?)
Abraço,
Rogério Ricardo Fernandes
Desenvolvimento
http://www.strategies.inf.br
Tel.:47 3221-4500/Fax:47 3221-4599
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 9:03 AM
Subject: RES: [delphi-br] Leitura contrária de INI
Campus,
Vc diz a partir deste stringlist gerado procurar a string desejada e atraves
do copy pegar o q preciso? Uhm... se for isso, torna-se inviável... por meu INI
tem uma unica [Section] então o stringlist conteria td o meu INI e na maior
parte das vezes o q eu preciso, se for procurado simplesmente como string
dentro de um texto, acabará por gerar falhas... pode até ser q não, mas é muito
apto a falhas... vou exemplificar melhor
[Section do INI]
cadastro=cadastrar
usuario=usuário
cadastrar usuario=Cadastrar usuário
visitas=Visitantes
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form... porém,
me deparei com comparações mil dentro do sistema com strings exibidas ao
usuário, como é o caso da palavra usuário, q estava sendo exibida sem o acento,
o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta palavra acaba
por ser o nome da tabela, q apos sua escolha pelo usuário tem tarefas a serem
executas. Por isso preciso fazer a reversão entendeu?
E pq não posso utilizar sua ideia: procurar no arquivo td um string, alem de
ser relativamente demorado, se eu procurar por usuário, terei como resposta,
duas strings, só neste pequeno exemplo
Obrigada pela atenção
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Campus
Enviada em: segunda-feira, 12 de junho de 2006 18:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
No meu Delphi (5), não tem nenhuma função que faça isso. dá uma olhada no
help do teu delphi no TIniFile, e ve se tem alguma coisa nos métodos.
Se não tiver, tu pode contornar com o ReadSection, ele carrega todas as
chaves do teu indice numa string list, daí fica fácil procurar.
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '') meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos
|
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação,
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http
RES: [delphi-br] Leitura contrária de INI - a solu ção!!!
Olá Tâmara, tente isto deve resolver o seu problema:
var a : TIniFile,
str : TStrings;
begin
Str := TStringList.Create;
a.ReadSectionValues('section'; str);
Str1 := TStringList.Create;
a.ReadSection('Section', Str1);
depois basta vc relacionar no código, a linha 1 de Str será o valor do campo
que está na linha 1 do Str1.
Ok?
Depois responde ae se resolveu...
Um Abraço
____
/ \ /| |'-.
.\__/ || | |
_ / `._ \|_|_.-'
| / \__.`=._) (_ Marcos André
|/ ._/ ||
|'. `\ | | Analista de Sistema
;/ / | | Easy Corporation
) /_/| |.---.| http://www.e-easy.com.br/ www.e-easy.com.br |
http://www.eassyxp.com.br/ www.eassyxp.com.br
' `-` ' msn: mailto:[EMAIL PROTECTED]
[EMAIL PROTECTED]
Desenvolvimento e hospedagem de sites apartir de R$ 4,00
Planos profissionais com qualidade.
Consulte nossos planos: http://www.e-easy.com.br/ www.e-easy.com.br
Desenvolvimento de sistemas e sistemas prontos para comercializar,
ferramentas para desenvolvedores e muito mais: http://www.easyxp.com.br/
www.easyxp.com.br.
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rogério
Enviada em: terça-feira, 13 de junho de 2006 09:40
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Fiquei curioso,
Tamara, o que vc precisa solucionar? (pq procurar a diretiva à partir do
valor?)
Abraço,
Rogério Ricardo Fernandes
Desenvolvimento
http://www.strategies.inf.br
Tel.:47 3221-4500/Fax:47 3221-4599
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 9:03 AM
Subject: RES: [delphi-br] Leitura contrária de INI
Campus,
Vc diz a partir deste stringlist gerado procurar a string desejada e
atraves do copy pegar o q preciso? Uhm... se for isso, torna-se inviável...
por meu INI tem uma unica [Section] então o stringlist conteria td o meu
INI e na maior parte das vezes o q eu preciso, se for procurado simplesmente
como string dentro de um texto, acabará por gerar falhas... pode até ser q
não, mas é muito apto a falhas... vou exemplificar melhor
[Section do INI]
cadastro=cadastrar
usuario=usuário
cadastrar usuario=Cadastrar usuário
visitas=Visitantes
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form...
porém, me deparei com comparações mil dentro do sistema com strings exibidas
ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o
acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta
palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem
tarefas a serem executas. Por isso preciso fazer a reversão entendeu?
E pq não posso utilizar sua ideia: procurar no arquivo td um string, alem
de ser relativamente demorado, se eu procurar por usuário, terei como
resposta, duas strings, só neste pequeno exemplo
Obrigada pela atenção
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Campus
Enviada em: segunda-feira, 12 de junho de 2006 18:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
No meu Delphi (5), não tem nenhuma função que faça isso. dá uma olhada no
help do teu delphi no TIniFile, e ve se tem alguma coisa nos métodos.
Se não tiver, tu pode contornar com o ReadSection, ele carrega todas as
chaves do teu indice numa string list, daí fica fácil procurar.
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '')
meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu
RES: [delphi-br] Leitura contrária de INI
Rogério, É o caso q expliquei no e-mail q vc respondeu...rs... Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um sistema muito grande era inviável corrigir manualmente, form a form... porém, me deparei com comparações mil dentro do sistema com strings exibidas ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem tarefas a serem executas. Por isso preciso fazer a reversão Basicamente o usuário escolhe com qual tipo de cadastro ele quer lidar em um Combobox antigamente exibia-se Usuario, o q é feio, pois este é o nome da tabela, então o usuário escolhendo a tabela usuário, era so montar o select: select * from cmbtabela.text mas como o text passou a ser Usuário com acento, gera o erro de sqlé isto q preciso reverter, de Usuário, trazer Usuario PS: usuário foi um exempli simplificado, o nome das tabelas é um pouco mais complexo.rs... Obrigada, Tamara Clemente - Suporte Técnico Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rogério Enviada em: terça-feira, 13 de junho de 2006 10:16 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Leitura contrária de INI Fiquei curioso, Tamara, o que vc precisa solucionar? (pq procurar a diretiva à partir do valor?) Abraço, Rogério Ricardo Fernandes Desenvolvimento http://www.strategies.inf.br Tel.:47 3221-4500/Fax:47 3221-4599 - Original Message - From: Moked - Tamara (Brazil) To: delphi-br@yahoogrupos.com.br Sent: Tuesday, June 13, 2006 9:03 AM Subject: RES: [delphi-br] Leitura contrária de INI Campus, Vc diz a partir deste stringlist gerado procurar a string desejada e atraves do copy pegar o q preciso? Uhm... se for isso, torna-se inviável... por meu INI tem uma unica [Section] então o stringlist conteria td o meu INI e na maior parte das vezes o q eu preciso, se for procurado simplesmente como string dentro de um texto, acabará por gerar falhas... pode até ser q não, mas é muito apto a falhas... vou exemplificar melhor [Section do INI] cadastro=cadastrar usuario=usuário cadastrar usuario=Cadastrar usuário visitas=Visitantes Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um sistema muito grande era inviável corrigir manualmente, form a form... porém, me deparei com comparações mil dentro do sistema com strings exibidas ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem tarefas a serem executas. Por isso preciso fazer a reversão entendeu? E pq não posso utilizar sua ideia: procurar no arquivo td um string, alem de ser relativamente demorado, se eu procurar por usuário, terei como resposta, duas strings, só neste pequeno exemplo Obrigada pela atenção Tamara Clemente - Suporte Técnico Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Campus Enviada em: segunda-feira, 12 de junho de 2006 18:16 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Leitura contrária de INI No meu Delphi (5), não tem nenhuma função que faça isso. dá uma olhada no help do teu delphi no TIniFile, e ve se tem alguma coisa nos métodos. Se não tiver, tu pode contornar com o ReadSection, ele carrega todas as chaves do teu indice numa string list, daí fica fácil procurar. - Original Message - From: Moked - Tamara (Brazil) [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Monday, June 12, 2006 2:58 PM Subject: [delphi-br] Leitura contrária de INI http://www.moked.com.br/ Tamara Clemente - Suporte Técnico Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ Grau de Sigilo: Confidencial Reservado Interno Amplo Nível de Prioridade: Alto Médio Baixo Destinatário/s: Lista de divulgação - Boa Tarde, Pessoal, como faço para ler arquivo .INI ao contrario? Maiores explicações: Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de igual
RES: Re: [delphi-br] Leitura contrária de INI
Olá Tamara !!
Realizei um teste aqui , criei um arquivo com a estrutura de um ini que deu
+- 1mega
Varias Seções com vários valores tipo :
[Indice1]
Diretiva1=meu texto1
Diretiva2=meu texto2
Diretiva3=meu texto3
[Indice2]
Diretiva1=meu texto1
Diretiva2=meu texto2
Diretiva3=meu texto3
[Indice3]
Diretiva1=meu texto1
Diretiva2=meu texto2
Diretiva3=meu texto3
Pelo que pude observar deu problema na classe TIniFile por ela usar a API do
Windows que impõe um limite de 64kb nos arquivos INI. Se você precisar
armazenar mais de 64kb de dados, você precisará usar o TMemIniFile ao invés
da TInifile, que não possui o limite de 64kb.
No restante suto correu normalmente , so consumiu memória pra caramba,
Então se quiser fazer um teste substitua TiniFile por TMemIniFile somente e
faça um teste
Um abraço !!
CCNA / Certificado Borland Delphi / MCSA
---Mensagem original---
De: Moked - Tamara \(Brazil\)
Data: 06/13/06 09:41:53
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: Re: [delphi-br] Leitura contrária de INI
Bom dia José,
Seria exatamente isto o q eu preciso, porém, testando aqui a sua função, me
deparei com um problema: não sei se o stringlist tem um limite a ser
carregado nele, mas de acordo com o tamanho do meu arquivo INI, ele não
chega até a metade do arquivo fazendo a verificação particionei meu
arquivo e ele encontrou direitinho a minha string conforme eu precisava
:(
Existe alguma extensão do stringlist?
Muito Obrigada pela ajuda
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de José Claudemir
Enviada em: segunda-feira, 12 de junho de 2006 21:01
Para: delphi-br@yahoogrupos.com.br
Assunto: Res: Re: [delphi-br] Leitura contrária de INI
Olá !!
Não seria isso o que VC está querendo .. !!
Até mais !!!
Function AchaDiretiva(MyIni,MyIndice,MyStr: String): String;
Var
AppIni : TIniFile;
Items : TStringList;
I : INteger;
SStr : String;
SChave : String;
Begin
Result := '';
Items := TStringList.Create;
AppIni := TIniFile.Create(MyIni);
AppIni.ReadSectionValues(MyIndice,Items);
For I:=0 to Items.Count - 1 do begin
SChave := Copy(Items[I],1,Pos('=',Items[I])-1);
SStr := AppIni.ReadString(MyIndice,sChave,'');
If sStr = MyStr then begin
Result := sChave;
Exit;
End;
End;
AppIni.Free;
End;
Procedure TForm1.Button1Click(Sender: TObject);
Begin
ShowMessage(achaDiretiva('c:\arquivo.ini','indice','meu texto2'));
end;
CCNA / Certificado Borland Delphi / MCSA
---Mensagem original---
De: Julio Cesar
Data: 06/12/06 18:50:12
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Faz a leitura de linha a linha, dai da um pos() na string q vc quer, caso
haja na linha entao vc faz a copia do inicio da string ate a pos() do sinal
de igual...
Julio Cesar
[EMAIL PROTECTED]
+353 (87) 2184139
+353 (091) 630317
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 9:22 PM
Subject: RES: [delphi-br] Leitura contrária de INI
Ulisses,
Não é bem isso q eu preciso o q eu preciso não é pegar o texto de
dentro dos colchetes[] e sim o q tem antes do sinal de igual até onde
andei pesquisando, eu conseguiria pegar o texto de dentro dos colchetes
atraves de uma função como o readstring mas antes do sinal de igual ñ
encontrei nd...
Obrigada pela atenção...
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ulisses
Enviada em: segunda-feira, 12 de junho de 2006 17:02
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Boa tarde!
Tenta localizar o caractere [, salva o texto que estiver antes do
caractere ].
Só uma idéia. Se encontrar algo melhor, me avisa.
Boa sorte.
Ulisses
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de
RES: [delphi-br] Leitura contrária de INI - a solução!!!
Boa Tarde Marcos,
Finalmente consegui testar seu exemplo ñ sei se entendi direito, mas com
ele eu teria q ter um loop certo? e ai então verificar se é o q desejo...
Teve um colega de lista q passou uma solução simples, uma função q ja haviam me
passado ainda estava com problemas q eu acreditava ser no stringlist, mas logo
um colega disse q o problema era com o TIniFile q tem limite de 64Bk para
arquivo, e me aconselhou a mudar para TMenIniFile, o q deu certinho...
Obrigada e desculpe a demora, vc ñ esta com problema de envio...rs..
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcos
André
Enviada em: terça-feira, 13 de junho de 2006 11:46
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Leitura contrária de INI - a solução!!!
Olá Tâmara, tente isto deve resolver o seu problema:
var a : TIniFile,
str : TStrings;
begin
Str := TStringList.Create;
a.ReadSectionValues('section'; str);
Str1 := TStringList.Create;
a.ReadSection('Section', Str1);
depois basta vc relacionar no código, a linha 1 de Str será o valor do campo
que está na linha 1 do Str1.
Ok?
Depois responde ae se resolveu...
Um Abraço
____
/ \ /| |'-.
.\__/ || | |
_ / `._ \|_|_.-'
| / \__.`=._) (_ Marcos André
|/ ._/ ||
|'. `\ | | Analista de Sistema
;/ / | | Easy Corporation
) /_/| |.---.| http://www.e-easy.com.br/ www.e-easy.com.br |
http://www.eassyxp.com.br/ www.eassyxp.com.br
' `-` ' msn: mailto:[EMAIL PROTECTED]
[EMAIL PROTECTED]
Desenvolvimento e hospedagem de sites apartir de R$ 4,00
Planos profissionais com qualidade.
Consulte nossos planos: http://www.e-easy.com.br/ www.e-easy.com.br
Desenvolvimento de sistemas e sistemas prontos para comercializar,
ferramentas para desenvolvedores e muito mais: http://www.easyxp.com.br/
www.easyxp.com.br.
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rogério
Enviada em: terça-feira, 13 de junho de 2006 09:40
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Fiquei curioso,
Tamara, o que vc precisa solucionar? (pq procurar a diretiva à partir do
valor?)
Abraço,
Rogério Ricardo Fernandes
Desenvolvimento
http://www.strategies.inf.br
Tel.:47 3221-4500/Fax:47 3221-4599
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 9:03 AM
Subject: RES: [delphi-br] Leitura contrária de INI
Campus,
Vc diz a partir deste stringlist gerado procurar a string desejada e
atraves do copy pegar o q preciso? Uhm... se for isso, torna-se inviável...
por meu INI tem uma unica [Section] então o stringlist conteria td o meu
INI e na maior parte das vezes o q eu preciso, se for procurado simplesmente
como string dentro de um texto, acabará por gerar falhas... pode até ser q
não, mas é muito apto a falhas... vou exemplificar melhor
[Section do INI]
cadastro=cadastrar
usuario=usuário
cadastrar usuario=Cadastrar usuário
visitas=Visitantes
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form...
porém, me deparei com comparações mil dentro do sistema com strings exibidas
ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o
acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta
palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem
tarefas a serem executas. Por isso preciso fazer a reversão entendeu?
E pq não posso utilizar sua ideia: procurar no arquivo td um string, alem
de ser relativamente demorado, se eu procurar por usuário, terei como
resposta, duas strings, só neste pequeno exemplo
Obrigada pela atenção
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Campus
Enviada em: segunda-feira, 12 de junho de 2006 18:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
No meu Delphi (5), não tem nenhuma função que faça isso. dá uma olhada no
help do teu delphi no TIniFile, e ve se tem alguma coisa nos métodos.
Se não tiver, tu pode contornar com o ReadSection, ele carrega todas as
chaves do teu indice numa string list, daí fica fácil procurar.
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED
Re: [delphi-br] Leitura contrária de INI - a sol ução!!!
Tâmara, obrigado a vc tb, se eu soubesse que era tão fácil usar esse
recurso, já teria utilizado muito antes.
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 2:24 PM
Subject: RES: [delphi-br] Leitura contrária de INI - a solução!!!
Boa Tarde Marcos,
Finalmente consegui testar seu exemplo ñ sei se entendi direito, mas com
ele eu teria q ter um loop certo? e ai então verificar se é o q desejo...
Teve um colega de lista q passou uma solução simples, uma função q ja haviam
me passado ainda estava com problemas q eu acreditava ser no stringlist, mas
logo um colega disse q o problema era com o TIniFile q tem limite de 64Bk
para arquivo, e me aconselhou a mudar para TMenIniFile, o q deu certinho...
Obrigada e desculpe a demora, vc ñ esta com problema de envio...rs..
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Marcos André
Enviada em: terça-feira, 13 de junho de 2006 11:46
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Leitura contrária de INI - a solução!!!
Olá Tâmara, tente isto deve resolver o seu problema:
var a : TIniFile,
str : TStrings;
begin
Str := TStringList.Create;
a.ReadSectionValues('section'; str);
Str1 := TStringList.Create;
a.ReadSection('Section', Str1);
depois basta vc relacionar no código, a linha 1 de Str será o valor do campo
que está na linha 1 do Str1.
Ok?
Depois responde ae se resolveu...
Um Abraço
____
/ \ /| |'-.
.\__/ || | |
_ / `._ \|_|_.-'
| / \__.`=._) (_ Marcos André
|/ ._/ ||
|'. `\ | | Analista de Sistema
;/ / | | Easy Corporation
) /_/| |.---.| http://www.e-easy.com.br/ www.e-easy.com.br |
http://www.eassyxp.com.br/ www.eassyxp.com.br
' `-` ' msn: mailto:[EMAIL PROTECTED]
[EMAIL PROTECTED]
Desenvolvimento e hospedagem de sites apartir de R$ 4,00
Planos profissionais com qualidade.
Consulte nossos planos: http://www.e-easy.com.br/ www.e-easy.com.br
Desenvolvimento de sistemas e sistemas prontos para comercializar,
ferramentas para desenvolvedores e muito mais: http://www.easyxp.com.br/
www.easyxp.com.br.
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rogério
Enviada em: terça-feira, 13 de junho de 2006 09:40
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Fiquei curioso,
Tamara, o que vc precisa solucionar? (pq procurar a diretiva à partir do
valor?)
Abraço,
Rogério Ricardo Fernandes
Desenvolvimento
http://www.strategies.inf.br
Tel.:47 3221-4500/Fax:47 3221-4599
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 13, 2006 9:03 AM
Subject: RES: [delphi-br] Leitura contrária de INI
Campus,
Vc diz a partir deste stringlist gerado procurar a string desejada e
atraves do copy pegar o q preciso? Uhm... se for isso, torna-se inviável...
por meu INI tem uma unica [Section] então o stringlist conteria td o meu
INI e na maior parte das vezes o q eu preciso, se for procurado simplesmente
como string dentro de um texto, acabará por gerar falhas... pode até ser q
não, mas é muito apto a falhas... vou exemplificar melhor
[Section do INI]
cadastro=cadastrar
usuario=usuário
cadastrar usuario=Cadastrar usuário
visitas=Visitantes
Pq isso: este INI é utilizado para corrigir falhas na escrita, por ser um
sistema muito grande era inviável corrigir manualmente, form a form...
porém, me deparei com comparações mil dentro do sistema com strings exibidas
ao usuário, como é o caso da palavra usuário, q estava sendo exibida sem o
acento, o q ñ é o certo a ser exibido a um usuário do sistema, só q, esta
palavra acaba por ser o nome da tabela, q apos sua escolha pelo usuário tem
tarefas a serem executas. Por isso preciso fazer a reversão entendeu?
E pq não posso utilizar sua ideia: procurar no arquivo td um string, alem
de ser relativamente demorado, se eu procurar por usuário, terei como
resposta, duas strings, só neste pequeno exemplo
Obrigada pela atenção
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Campus
Enviada em: segunda-feira, 12 de junho de 2006 18:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
No meu Delphi (5), não tem nenhuma função que faça isso. dá uma olhada
RES: [delphi-br] Leitura contrária de INI
Ulisses,
Não é bem isso q eu preciso o q eu preciso não é pegar o texto de dentro
dos colchetes[] e sim o q tem antes do sinal de igual até onde andei
pesquisando, eu conseguiria pegar o texto de dentro dos colchetes atraves de
uma função como o readstring mas antes do sinal de igual ñ encontrei nd...
Obrigada pela atenção...
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Ulisses
Enviada em: segunda-feira, 12 de junho de 2006 17:02
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Boa tarde!
Tenta localizar o caractere [, salva o texto que estiver antes do caractere
].
Só uma idéia. Se encontrar algo melhor, me avisa.
Boa sorte.
Ulisses
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '') meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos |
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação,
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RE: [delphi-br] Leitura contrária de INI
Tamara, vc tem ReadSection, ReadSections, ReadSectionValues e ReadString como
metodos do TIniFile.
Pelo que eu entendi vc tem um texto é quer saber qual é a secao. Se for isso vc
tera q armazenar os dados do ini em um vetor e depois percorrer o vetor achando
o texto vc sabera qual é a secao.
Eduardo Castro Alves
Analista de Sistemas
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Moked
- Tamara (Brazil)
Sent: segunda-feira, 12 de junho de 2006 14:58
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '') meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos |
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo
sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] Leitura contrária de INI
faz a leitura de linha a linha, dai da um pos() na string q vc quer, caso haja
na linha entao vc faz a copia do inicio da string ate a pos() do sinal de
igual...
Julio Cesar
[EMAIL PROTECTED]
+353 (87) 2184139
+353 (091) 630317
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 9:22 PM
Subject: RES: [delphi-br] Leitura contrária de INI
Ulisses,
Não é bem isso q eu preciso o q eu preciso não é pegar o texto de dentro
dos colchetes[] e sim o q tem antes do sinal de igual até onde andei
pesquisando, eu conseguiria pegar o texto de dentro dos colchetes atraves de
uma função como o readstring mas antes do sinal de igual ñ encontrei nd...
Obrigada pela atenção...
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Ulisses
Enviada em: segunda-feira, 12 de junho de 2006 17:02
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Boa tarde!
Tenta localizar o caractere [, salva o texto que estiver antes do caractere
].
Só uma idéia. Se encontrar algo melhor, me avisa.
Boa sorte.
Ulisses
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '') meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos |
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação,
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Res: Re: [delphi-br] Leitura contrária de INI
Olá !!
Não seria isso o que VC está querendo .. !!
Até mais !!!
Function AchaDiretiva(MyIni,MyIndice,MyStr: String): String;
Var
AppIni : TIniFile;
Items : TStringList;
I : INteger;
SStr : String;
SChave : String;
Begin
Result := '';
Items := TStringList.Create;
AppIni := TIniFile.Create(MyIni);
AppIni.ReadSectionValues(MyIndice,Items);
For I:=0 to Items.Count - 1 do begin
SChave := Copy(Items[I],1,Pos('=',Items[I])-1);
SStr := AppIni.ReadString(MyIndice,sChave,'');
If sStr = MyStr then begin
Result := sChave;
Exit;
End;
End;
AppIni.Free;
End;
Procedure TForm1.Button1Click(Sender: TObject);
Begin
ShowMessage(achaDiretiva('c:\arquivo.ini','indice','meu texto2'));
end;
CCNA / Certificado Borland Delphi / MCSA
---Mensagem original---
De: Julio Cesar
Data: 06/12/06 18:50:12
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Faz a leitura de linha a linha, dai da um pos() na string q vc quer, caso
haja na linha entao vc faz a copia do inicio da string ate a pos() do sinal
de igual...
Julio Cesar
[EMAIL PROTECTED]
+353 (87) 2184139
+353 (091) 630317
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 9:22 PM
Subject: RES: [delphi-br] Leitura contrária de INI
Ulisses,
Não é bem isso q eu preciso o q eu preciso não é pegar o texto de
dentro dos colchetes[] e sim o q tem antes do sinal de igual até onde
andei pesquisando, eu conseguiria pegar o texto de dentro dos colchetes
atraves de uma função como o readstring mas antes do sinal de igual ñ
encontrei nd...
Obrigada pela atenção...
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ulisses
Enviada em: segunda-feira, 12 de junho de 2006 17:02
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Boa tarde!
Tenta localizar o caractere [, salva o texto que estiver antes do
caractere ].
Só uma idéia. Se encontrar algo melhor, me avisa.
Boa sorte.
Ulisses
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '')
meu retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e
Treinamentos | Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação,
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
__ Informação do NOD32 IMON 1.1595 (20060612) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http
Re: [delphi-br] Leitura contrária de INI
No meu Delphi (5), não tem nenhuma função que faça isso. dá uma olhada no
help do teu delphi no TIniFile, e ve se tem alguma coisa nos métodos.
Se não tiver, tu pode contornar com o ReadSection, ele carrega todas as
chaves do teu indice numa string list, daí fica fácil procurar.
- Original Message -
From: Moked - Tamara (Brazil) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '') meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos |
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação,
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RES: [delphi-br] Leitura contrária de INI
Olá !!
Não seria isso o que VC está querendo .. !!
Até mais !!!
Function AchaDiretiva(MyIni,MyIndice,MyStr: String): String;
Var
AppIni : TIniFile;
Items : TStringList;
I : INteger;
SStr : String;
SChave : String;
Begin
Result := '';
Items := TStringList.Create;
AppIni := TIniFile.Create(MyIni);
AppIni.ReadSectionValues(MyIndice,Items);
For I:=0 to Items.Count - 1 do begin
SChave := Copy(Items[I],1,Pos('=',Items[I])-1);
SStr := AppIni.ReadString(MyIndice,sChave,'');
If sStr = MyStr then begin
Result := sChave;
Exit;
End;
End;
AppIni.Free;
Items.Free;
End;
Procedure TForm1.Button1Click(Sender: TObject);
Begin
ShowMessage(achaDiretiva('c:\arquivo.ini','indice','meu texto2'));
End;
CCNA / Certificado Borland Delphi / MCSA
---Mensagem original---
De: Moked - Tamara \(Brazil\)
Data: 06/12/06 17:29:28
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Leitura contrária de INI
Ulisses,
Não é bem isso q eu preciso o q eu preciso não é pegar o texto de dentro
dos colchetes[] e sim o q tem antes do sinal de igual até onde andei
pesquisando, eu conseguiria pegar o texto de dentro dos colchetes atraves de
uma função como o readstring mas antes do sinal de igual ñ encontrei nd.
.
Obrigada pela atenção...
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ulisses
Enviada em: segunda-feira, 12 de junho de 2006 17:02
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Boa tarde!
Tenta localizar o caractere [, salva o texto que estiver antes do
caractere ].
Só uma idéia. Se encontrar algo melhor, me avisa.
Boa sorte.
Ulisses
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '') meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos
| Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação,
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
__ Informação do NOD32 IMON 1.1595 (20060612) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] Leitura contrária de INI
Abre como se fosse um arquivo texto e vai lendo linha por linha e passa por uma
função que acha o = e corta o que tá antes
Abraços, Filipe.
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 5:22 PM
Subject: RES: [delphi-br] Leitura contrária de INI
Ulisses,
Não é bem isso q eu preciso o q eu preciso não é pegar o texto de dentro
dos colchetes[] e sim o q tem antes do sinal de igual até onde andei
pesquisando, eu conseguiria pegar o texto de dentro dos colchetes atraves de
uma função como o readstring mas antes do sinal de igual ñ encontrei nd...
Obrigada pela atenção...
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Ulisses
Enviada em: segunda-feira, 12 de junho de 2006 17:02
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Leitura contrária de INI
Boa tarde!
Tenta localizar o caractere [, salva o texto que estiver antes do caractere
].
Só uma idéia. Se encontrar algo melhor, me avisa.
Boa sorte.
Ulisses
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Monday, June 12, 2006 2:58 PM
Subject: [delphi-br] Leitura contrária de INI
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Boa Tarde,
Pessoal, como faço para ler arquivo .INI ao contrario?
Maiores explicações:
Normalmente eu leio o Ini tendo como diretiva o q esta antes do sinal de
igual:
[Indice]
diretiva=meu texto
Sendo assim, quando eu utilizo o readstring('Indice', 'diretiva', '') meu
retorno será meu texto.
Agora o q eu estou precisando:
Eu passando o meu texto q ele me retorne a diretiva
Deu para entender
Espero a ajuda de vcs...
Obrigada,
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos |
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
O emitente da mensagem é o responsável por seu conteúdo e divulgação,
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
