Nesse artigo mostrarei como fazer busca de registro MySQL no Gambas2, além de outros itens interessantes.
Por que no Gambas2?
Venho apresentando uma série de artigos e dicas sobre essa IDE, acho que ela é sim uma ótima opção de ambiente de desenvolvimento para
Linux, além de ser bastante ágil fazer as coisas por ela. Possui hoje uma documentação satisfatória e quando se fala de trabalhar com banco de dados, ela realmente supera algumas outras opções.
Mesmo assim, acho que faltam algumas coisas para aprimorar o desenvolvimento de aplicações para uso comercial, já que quando se fala em desenvolvimento de aplicações comerciais, ganha aquela que faz tudo de forma automatizada. Mas vamos lá a mais um artigo!
No MySQL crie a seguinte tabela:
Banco: agenda
Tabela: cadastro
Campos:
- código - tipo inteiro (dessa vez não vamos utilizar auto-numeração, vou apresentar como gerar o próximo código, via programação, para caso se trabalhe com algum banco de dados que não apresente esse recurso);
- nome - tipo texto, varchar(50);
- telefone - tipo texto, varchar(15).
Bom, nem vamos criar uma tabela enorme, já que fazer a programação de poucos ou muitos campos é a mesma coisa, só muda o tempo que vai demorar.
O script SQL ficou assim:
CREATE TABLE `agenda`.`cadastro` (
`codigo` integer NOT NULL,
`nome` varchar(100) NOT NULL,
`telefone` varchar(15) ,
PRIMARY KEY (`codigo`)
)
ENGINE = MyISAM;
Depois desse exaustivo processo, vamos começar a utilizar o Gambas2! : )
Abra o Gambas2, crie um novo projeto e clique em database access para já ativar os componentes necessário para trabalhar com banco de dados. No Gambas3 existirá o componente gb.mysql para acesso a base de dados MySQL, mas no 2.x ainda é utilizado o gb.db.
Feito isso acabe de criar o projeto normalmente.
Se tudo ocorreu bem até agora, vamos começar a programar.
Crie um módulo com o nome "cnx", esse módulo será utilizado para criar a conexão com o banco. A programação do módulo cnx será aqui.
PUBLIC conexao AS NEW Connection
PUBLIC PROCEDURE ConectarBanco()
conexao.type = "mysql"
conexao.user = "root"
conexao.password = "1"
conexao.name = "agenda"
conexao.Open()
END
Feito isso teste a conexão para isso, faça o seguinte, clique em fmain duas vezes, vai abrir o evento form_open():
PUBLIC SUB Form_Open()
cnx.ConectarBanco()
END
Aperte F5. Se ele abriu o formulário sem nenhum erro, muito provável que esteja tudo certo.
Para entender o que foi feito acima, leia isso:
Gambas2: Inserindo dados em tabela SQLite.