mysql e duvidas
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
Curtidas 0
Respostas
Aroldo Zanela
16/03/2003
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´.
GOSTEI 0
Henry Lima
16/03/2003
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.
GOSTEI 0