Como acessar uma base de dados mysql

[Huntervtr 0]

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 topico, 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 tb.

 

 

Bom, agora os componentes ja foram colocados em seu formulário.

Agora vamos a configuração dos componentes:

 

no componente "SQLConnection" de 2 cliques sobre ele, irá aparecer a janela abaixo:

 

 

 

Em "Driver Name", esolha a opção "MYSQL" como na figura abaixo:

 

Em "Connection Name", escolha a opção "MSConnection" como na figura abaixo:

 

Agora em "Connection Settings", configure da seguinte forma:

 

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, ai 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".

 

De 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;

 

 

Após feito isto, basta colocar o arquivo libmysql.dll na pasta onde salvou o projeto, e na pasta C:\Windows\System, e executar o sistema.

Pronto ai está um pequeno sistema, de como acessar base de dados mysql, e como inserir dados.

 

ATenção, alguns computadores, ja existe o arquivo libmysql.dll, mas os que não existe é bom baixar, e fazer passar a existir.