mysql e duvidas
16/03/2003
0
Olá pessoal...
Onde posso encontrar componentes de comunicação com mysql.
Pessoal tenho um programa que ao fechar ele tem que salvar um arquivo txt. (etou usando aquele savetofile....)só que toda vez ela sobrescreve o arquivo). Como fasso para qdo o programa fechar ele adicione no arquivo ao invez sobrescrever...
Obrigado
Gustavo
Onde posso encontrar componentes de comunicação com mysql.
Pessoal tenho um programa que ao fechar ele tem que salvar um arquivo txt. (etou usando aquele savetofile....)só que toda vez ela sobrescreve o arquivo). Como fasso para qdo o programa fechar ele adicione no arquivo ao invez sobrescrever...
Obrigado
Gustavo
Anonymous
Curtir tópico
+ 0
Responder
Posts
16/03/2003
Aroldo Zanela
Olá pessoal...
Onde posso encontrar componentes de comunicação com mysql.
Pessoal tenho um programa que ao fechar ele tem que salvar um arquivo txt. (etou usando aquele savetofile....)só que toda vez ela sobrescreve o arquivo). Como fasso para qdo o programa fechar ele adicione no arquivo ao invez sobrescrever...
Obrigado
Gustavo
Gustavo,
Sobre mySQL eu não sei nada.
Quanto ao arquivo que você salva no final, você verificar se tem o arquivo e se existir carregar para a memória, concatenar e depois salvar, ou então, escrever uma rotina para fazer ´append´.
Responder
16/03/2003
Henry Lima
Você tem que fazer o seguinte :
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
Var
Arquivo : TStringList;
Begin
Arquivo := TStringList.Create;
Arquivo.LoadFromFile(C:\LOGFILE.TXT´);
Arquivo.Add(´Nova linha ao arquivo de texto´);
Arquivo.SaveToFile(C:\LOGFILE.TXT´);
Arquivo.Free;
End;
Espero que isso ajude você. Sobre os componentes MySql, você pode baixar na página www.mysql.com drivers de conexão ODBC, dai você não precisará de nenhum componente específico para se conectar ao banco MySql.
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
Var
Arquivo : TStringList;
Begin
Arquivo := TStringList.Create;
Arquivo.LoadFromFile(C:\LOGFILE.TXT´);
Arquivo.Add(´Nova linha ao arquivo de texto´);
Arquivo.SaveToFile(C:\LOGFILE.TXT´);
Arquivo.Free;
End;
Espero que isso ajude você. Sobre os componentes MySql, você pode baixar na página www.mysql.com drivers de conexão ODBC, dai você não precisará de nenhum componente específico para se conectar ao banco MySql.
Responder
Clique aqui para fazer login e interagir na Comunidade :)