Postado Ter Fev 21, 2012 12:09 pm
Conectando MySQL através do Delphi
Bom, como todos sabem, o Delphi tem a possibilidade de usar banco de dados MySQL.
Mas muitas pessoas não sabem como fazer isso, para ter uma idéia, o banco de dados SQL, é bem conhecido na programação em Object Pascal, mas servidores SQL são muito caros.
Por isso irei lhes mostrar neste artigo, como usar banco de dados Mysql, que é muito mais em conta que servidores SQL.
- Mas afinal, o que é MySQL?
MySQL é um sistema de gerenciamento de banco de dados relacional que utiliza a linguagem padrão SQL e é largamente utilizado em aplicações internet.
Agora vamos, ao que interessa, que é como usar conexão a banco de dados Mysql, e quais componentes usar.
No decorrer deste artigo, irei dar alguns exemplos, comandos e outros.
Na barra de ferramentas do Delphi, crie um novo aplicativo em File >New >Application.
Após feito isto, va até a 7ª aba "dbExpress", após isto coloque os componentes "SQLConnection", "SQLQuery".
Depois de ter colocado estes 2 componentes acima, clique na 5ª aba "Data Access", e coloque o 1º componente, "DataSource" no form também.
Bom, agora os componentes já foram colocados em seu formulário, vamos à configuração dos componentes:
No componente "SQLConnection" de 2 cliques sobre ele.
Em "Driver Name", esolha a opção "MYSQL".
Em "Connection Name", escolha a opção "MSConnection".
Agora em "Connection Settings", configure da seguinte forma:
Quote
. BlobSize = -1;
. Database = Nome do banco de dados MySQL;
. DriverName = MYSQL;
. ErrorResourceFile = Deixe em branco;
. HostName = Nome ou IP do host;
. LocaleCode = 0000;
. Password = Senha do host;
. User_Name = Usuário do host.
Após feita a configuração, clique no botão acima em "Test Connection", para testar a conexão, em seguida clique em OK.
Agora no componente "SQLQuery", na propriedade "SQLConnection" coloque o valor "SQLConnection1".
No componente "DataSource", na propriedade "DataSet", atribua o valor "SQLQuery1".
Pronto sua conexão ao Mysql foi feita, agora vou mostrar um pequeno exemplo, de como iserir dados.
No form, coloque os componentes: "TEdit", "TButton", todos dois estão localizados na 1ª aba "Standard".
Dê 2 cliques sobre o componente "TButton", ai, aparecerá uma tela, para editar, ai, escreva o seguinte:
SQLQuery1.Active := False;
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('insert into nome_tabela (campo1) values ('+''''+edit1.Text+''''+') ');
SQLQuery1.ExecSQL;
Pronto ai está um pequeno sistema que nos mostra passo-a-passo como acessar base de dados mysql e também como iserir dados usando sintaxe sql, não vou me aprofundar mais sobre as sintaxes SQL, para isso visite:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Para executar um sistema que utiliza o banco de dados MySQL é necessário a existência do arquivo libmysql.dll em C:\Windows\System.
creditos: - mr.sz! e a mim pelo topico.
Última edição por ''Lucassww'' em Dom Mar 25, 2012 10:29 pm, editado 1 vez(es)
