Re: [delphi-br] Ajua arquivo ini
Retirei da DTDelphi:
---
Inclua a unit IniFiles na clausula uses do seu form.
Procedure TForm1.GravaIni( Numero : Longint ; Texto : String ; Condicao : Boolean);
var
ArqIni : TIniFile;
begin
ArqIni := TIniFile.Create('c:\windows\temp\Teste.Ini');
Try
ArqIni.WriteInteger('Dados', 'Numero', Numero);
ArqIni.WriteString('Dados', 'Texto', Texto);
ArqIni.WriteBool('Dados', 'Condição', Condicao);
Finally
ArqIni.Free;
end;
end;
Procedure TForm1.LeIni( Var Numero : Longint ; Var Texto : String ; Var Condicao :
Boolean);
var
ArqIni : tIniFile;
begin
ArqIni := tIniFile.Create('c:\windows\temp\Teste.Ini');
Try
Numero := ArqIni.ReadInteger('Dados', 'Numero', Numero );
Texto := ArqIni.ReadString('Dados', 'Texto', Texto );
Condicao := ArqIni.ReadBool('Dados', 'Condição', Condicao );
Finally
ArqIni.Free;
end;
end;
Utilize as procedures assim:
procedure TForm1.Button1Click(Sender: TObject);
begin
GravaIni(1234,'TESTE',True);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
N: Integer;
T: String;
C: Boolean;
begin
LeIni(N,T,C);
Showmessage(IntToStr(N)+' '+T);
end;
--
Abraços,
Marcos Antonio Campos Jordão
WillkerY <[EMAIL PROTECTED]> wrote:
Alguém tem algum arquivo q me mostre como configurar meu banco de dados com
arquivo.ini
Uso delphi6 e firebird uso o componente da tabela interbase ibdatabase
[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] ou [EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
function SearchComboBox() { if
(document.form_combo.keyword.value.length==0){ alert("Por favor, digite algo.");
return false; }else { document.form_combo.action
="http://br.rd.yahoo.com/SIG=12ats0iu3/M=264105.3931087.6562589.1588051/D=brclubs/S=2137111264:HM/EXP=1099246890/A=2361264/R=0/SIG=11uaou2jn/*http://www.bondfaro.com/bondfaro/in/combosearch_in.jsp?sk=11";;
} return true;} [input] [input] [input]
-
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 Termos do Serviço do Yahoo!.
-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
[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] ou [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] Ajua arquivo ini
Eu desenvolvi uma DLL que faz isso, posso montar um exemplo e te enviar, caso queira mas a idéia que eu implementei foi: na DLL, implementei um form e as funções para leitura e gravação no INI, com a opção de definir qual a conexão padrão, assim, pode-se definir diversas conexões e sempre utilizar uma padrão... uma segunda função, é a que busca a conexão padrão e verifica se está acessível, caso sim, retorna os dados da conexão com estes dados, basta atribuir em sua conexão e pronto... problemas com este método: 1 - a senha está desprotegida, preciso implementar uma rotina de criptografia 2 - a próxima versão do windows, segundo o que rolou neste lista, não terá suporte a arquivos ini's, para sanar isto, estou pensando em alterar e colocar um .DB, ou outro formato de arquivo para armazenar isto e claro, que não utilize BDE, por ex., para realizar a conexão, tem que sem algo bem neutro e livre, mas estou sem tempo e caso alguém estiver afim de fazer, posso ajudar. Eu comecei a implementar com ADO e access, mas quando uso Piradox, dá pau Ricardo Queiroz WillkerY <[EMAIL PROTECTED]> wrote: Alguém tem algum arquivo q me mostre como configurar meu banco de dados com arquivo.ini Uso delphi6 e firebird uso o componente da tabela interbase ibdatabase [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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos Ricardo Queiroz - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! [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] ou [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
[delphi-br] Ajua arquivo ini
Alguém tem algum arquivo q me mostre como configurar meu banco de dados com arquivo.ini Uso delphi6 e firebird uso o componente da tabela interbase ibdatabase [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] ou [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
