Pular para o conteúdo principal

Postagens

Mostrando postagens de fevereiro, 2010

Lazarus - Acessando banco de dados com SQLdb - Parte II

Form de Cliente No DataModule já deve ter uma TSQLQuery e um TDataSource devidamente configurados para acesso à tabela Cliente . Vamos então inserir um novo form no programa definindo Name como frmCliente , Caption como Clientes . Mande salvar e informe u_cliente no nome da unit. Acesse o editor de código referente a esse form e abaixo de Implementation , para permitir que a unit u_cliente tenha acesso aos objetos do DataModule , digite: uses u_dmdados; Volte ao form e inclua um TPanel da mesma forma que foi feito para o form de Cidade . Selecione um TDBNavigator da aba Data Controls e coloque sobre o painel. Defina a propriedade DataSource como dsCliente . Insira um TSpeedButton da aba Additional no painel e o configure semelhante ao que fizemos no form de Cidad e, inclusive definindo o código do evento OnClick para fechar o form. O form de Cliente deverá ter essa aparência: Coloque dois TDBedit no form, o primeiro deve ter Name definido como edIdCliente , Da

Lazarus - Acessando banco de dados com SQLdb - Parte I

Para fazer nossa primeira aplicação usando banco de dados no Lazarus vamos usar o SQLite e o conjunto de componentes nativo SQLdb. Inicialmente vamos apresentar passo como essa aplicação foi criada. Essa foi a maneira que eu fiz, e eu agradeço sugestões e questionamentos que pessoas que já passaram por essa experiência. Depois irei fazer algumas considerações sobre o uso do SQLdb. SQLite SQLite é uma biblioteca que implementa um motor de banco de dados SQL. É livre para qualquer finalidade, seja uso particular ou comercial. Lê e escreve em um único arquivo que pode ter além de tabelas, índices, gatilhos e visões. Executa em várias plataformas e é indicado para aplicações embarcadas. Maiores detalhes podem ser encontrados no site oficial. Para usá-lo, baixe-o do site e faça a instalação adequada para o seu sistema operacional. No Windows isso é muito simples, apenas copie sqlite3.dll para o system32 da pasta do sistema operacional. Existe uma ferramenta de linha de comando chamada

Aventurando-se no Linux - VirtualBox

Sou um remanescente do bom e velho sistema operacional (SO) MS-DOS. Tudo era feito através de linha de comando semelhante ao que é feito no Linux, mas devo confessar que a cada vez que eu vejo os procedimentos para instalar um programa no Linux eu fico cansado e desisto até de continuar lendo o tutorial. Eu uso o Windows, mesmo com todos os problemas, devido a facilidade com que eu consigo instalar um programa. É só clicar em Instalar, Próximo, Próximo ... e Finalizar. Para um sujeito preguiçoso como eu não tem coisa melhor. Bem, o que eu queria mesmo era utilizar os recursos do Cross Compiler do Lazarus. Recurso muito interessante que permite que você gere um executável para Windows a partir de uma instalação Linux, por exemplo. Em tese é possível gerar para qualquer sistema estando em qualquer um outro. Gostaria de pode criar executáveis Linux estando no Windows, mas não encontrei informação clara que me ajudasse. Em http://wiki.freepascal.org/Cross_compiling/pt#De_Windows existe

Lazarus - Barras de ferramentas e de status

Vamos continuar usando a aplicação criada no post anterior. Agora vamos acrescentar uma barra de ferramentas e de status e mostrar também como implementar menus locais, chamados de pop-ups. Barra de Ferramentas Selecione a aba Common Controls na paleta de componentes. Pegue um TToolBar e coloque no form. Não precisa se preocupar com a posição, o Lazarus sabe exatamente onde fica uma barra de ferramentas e já a posiciona corretamente. Vamos dar o nome ( Name ) de tbaPrincipal ao componente. Nossa ToolBar terá botões para alterar as cores e o alinhamento do texto. Exatamente as mesmas opções do menu. Para inserir os botões, clique com o botão direito e selecione New Button . Insira dois botões. Em seguida insira um separador, selecionando New Separator . Após isso insira mais três botões. ImageList Para definir imagens para os botões devemos usar o componente TImageList . Pegue um desses na própria aba Common Controls e dê a ele o nome imlPrincipal . Depois de por no form -