Postagens

Mostrando postagens de 2018

Programando: Java vs Delphi / Lazarus: While - Parte 2

Imagem
Todo mundo sabe que alguns quarentões do Delphi ou Lazarus defende com unhas e dentes a produtividade desta maravilhosa ferramenta. Eu também faço parte deste grupo. Mas resolvi me aventurar e conhecer um pouco mais sobre como programar em Java. Este vídeo mostra minha primeira experiência, vai servir para dinossauros como eu fazer algumas comparações entre as linguagens !

Hoje vamos comparar a função While !




Programando: Java vs Delphi / Lazarus - Parte 01

Imagem
Todo mundo sabe que alguns quarentões do Delphi ou Lazarus defende com unhas e dentes a produtividade desta maravilhosa ferramenta. Eu também faço parte deste grupo.
Mas resolvi me aventurar e conhecer um pouco mais sobre como programar em Java. Este vídeo mostra minha primeira experiência, vai servir para dinossauros como eu fazer algumas comparações entre as linguagens !
Neste primeiro vídeo vamos criar um projeto em Lazarus/Delphi e outro no Java.
Vamos usar botões, variáveis e trabalhar com operador IF/ELSE.

Delphi/Lazarus mexer janelas/forms sem controlbox

Imagem
Vídeo criado pelo amigo Daniel Steckler mostrando como mover janelas sem bordas desenvolvidas em Lazarus, Delphi ou Codetyphon.

Ótimo complemento, pois quando criei meu vídeo sobre menus não testei a possibilidade de mover as janelas.

Obrigado pela Dica Daniel Steckler !!!


Consulta SQL de Vendas mensais, anuais e diárias

Imagem
Neste vídeo vou mostrar como criar consultas em SQL para obter estatísticas de vendas.

Vamos poder obter vendas anuais, mensais e diárias.

Exemplos:

Vendas Anuais:
select EXTRACT(MONTHfromCUP_VENDA.`DATA`)asMes, EXTRACT(YEARfromCUP_VENDA.`DATA`)asAno, format(sum(CUP_ITEM.TOTAL),2,'de_DE')

Como usar um subselect com update

Imagem
Neste video mostro como usar um subselect / subquery junto com o comando upgrade.

Nos exemplos atualizo campos da tabela de produto como valor NCM buscando o valor da tabela de IPBT. Outro Exemplo é de baixar o estoque de produtos usando uma query que retorna os itens do cupom.


Comandos Exemplo 001:

No Exemplo abaixo temos 2 tabelas, uma de produtos e uma IBPT.

Onde atualizamos o campo ValorIbpt do produto com a resposta do subselect da tabela IBPT

    update produto pr
    set pr.VrIPBTProd = (select ib.ValorIBPT
                         from ibptax ib
                         where ib.CodNCM = pr.NcmProd )

Exemplo 002:

Neste Exemplo temos um cupom com "n" itens.

Então fazemos o update para "baixar" o estoque de um determinado cupom.


    update produto
    set produto.EstAtualProd = produto.EstAtualProd -
        (select tmpite.tite_Qtde from tmpite
        where tmpite.tite_idVenda = 11 and tmpite.tite_CodPro = produto.CodProd)
    where produto.CodProd in (select …

Como usar um subselect em uma consulta SQL

Imagem
A definição de Subselect ou subquery é uma instrução de consulta dentro de outra consulta SQL. Aqui então vai dois exemplos simples de como usar subselect.
Exemplo da Query do Vídeo:
select TEMP.Cupom, sum(temp.Venda_bruta) as Total_Cupom
from
(select cb.tcab_IDVenda as Cupom,iv.tite_Tot as
Venda_Bruta from tmpcab cb
join tmpite as iv on cb.tcab_IDVenda = iv.tite_idVenda) as TEMP
Group by TEMP.Cupom

Instalando MySQL Server, WorkBench no Ubuntu, Mint , Debian - 2018

Imagem
Salve amigos, neste vídeo mostro como instalar o MySQL Server no novo Ubuntu 18.04, Mint 19 e derivados do novo Debian.

Fonte https://linuxconfig.org/install-mysql-on-ubuntu-18-04-bionic-beaver-linux

Comandos:
sudo apt install mysql-server
sudo mysql_secure_installation
Edite e mude bind-address para 0.0.0.0
sudo nano /etc/mysql/mysql.conf.d/mysqld.cnf
sudo service mysql restart
sudo mysql -u root
ALTER USER 'root'@'localhost' IDENTIFIED WITH mysql_native_password BY 'SuaSenha';

Lazarus e ZeusLib no Deepin Linux

Imagem
Um inscrito do canal informou que está com problemas com a instalação do Zeoslib no Lazarus instalado no Deepin Linux.
Então segue o vídeo com o Lazarus 1.8.4 e o Zeos estável 7.2 no Deepin 64.
Testado com banco de dados Firebird.




Se puder me ajudar, inscreva-se no meu canal. Isso me ajuda muito !

Criando Teclado Virtual com Delphi. Lazarus ou CodeTyphon

Imagem
Neste vídeo mostro com fazer um teclado virtual para uso em monitores touch screen. Fácil, prático, deixe seu Like ! Muito Obrigado !

Se puder me ajudar, inscreva-se no meu canal. Isso me ajuda muito !

Personalização de Menu - Dica Delphi, Lazarus e CodeTyphon

Imagem
Exemplo simples de personalização de menus sem usar componentes.
Crie seu próprio menu, use a imaginação!
Funciona em Delphi, Lazarus e Codetyphon



Se puder me ajudar, inscreva-se no meu canal. Isso me ajuda muito !

#2 - Delphi e Lazarus: Protegendo seu sistema

Imagem
O OnGuard é um componente com diversas funções para proteger o seu sistema. Vamos usar o OnGuard para criar uma solução de proteção, gerando chave de liberação por data de expiração.
Você pode gerar a chave de retorno informando uma chave de codificação (Nome da empresa, mac da eth, serie do hd, etc) e a data de expiração.

Link para o código do ongugard:
http://www.mediafire.com/file/6iki6fx8lnxni70/OnGuard_Libera_SeuSoftware


#1 - Delphi e Lazarus: Protegendo seu sistema

Imagem
O OnGuard é um componente com diversas funções para proteger o seu sistema. Vamos usar o OnGuard para criar uma solução de proteção, gerando chave de liberação por data de expiração.
Você pode gerar a chave de retorno informando uma chave de codificação (Nome da empresa, mac da eth, serie do hd, etc) e a data de expiração.
Link para o código do ongugard:
http://www.mediafire.com/file/6iki6fx8lnxni70/OnGuard_Libera_SeuSoftware

Se puder me ajudar, inscreva-se no meu canal. Isso me ajuda muito !




Grupo Telegram Lazarus/CodeTyphon:
https://t.me/joinchat/AAAAAEDYQdfQIFCU1AXEoQ
Canais sobre Lazarus:
https://www.youtube.com/user/salesdoido https://www.youtube.com/user/gadrianosl https://www.youtube.com/channel/UCzTqwiVtwbizVMh9vk7xQCQ https://www.youtube.com/channel/UClzv32uQgDneqbzH74uqm1g https://www.youtube.com/channel/UCFUsMgkoHpY98hB4sLywNsw https://www.youtube.com/channel/UCwi6wMaP6Z6nIzP57IMcr8Q https://www.youtube.com/channel/UC6Xi3bPYwTf1ppZIB81PPnQ https://www.youtube.com/channel/UCK7YL-ArAR…

Replicando dados entre Matriz e filiais

Imagem
Qual desenvolvedor de softwares que nunca pensou em criar um replicador para sincronizar base de dados, tabelas e registros entre empresas ?

Neste vídeo vou mostrar como replicar os dados (base de dados, tabelas e registros) entre matriz e filiais.

FUNCIONA EM QUALQUER LINGUAGEM DE PROGRAMAÇÃO QUE TENHA CONEXÃO MYSQL / MARIADB
NÃO É VPN!
É NATIVO DO MYSQL / Maria DB
NÃO USA COMPONENTES


Se puder me ajudar, inscreva-se no meu canal. Isso me ajuda muito !



Instalando Lazarus no MacOS X High Sierra

Imagem
Neste vídeo vou mostrar como instalar o Lazarus no MacOS X High Sierra 10.13


Como solucionar o erro:

Debugger error
Ooops, the debugger entered the error state
Save your work now !
Hit Stop, and hope the best, we’re pulling the blug.
The debugger could not run the application.
This may be caused by missing debug info.

Download do TXT com os comandos do terminal:
http://www.mediafire.com/file/y820khzs69jv4we/LazarusMacOSxHighSierra.txt

Se puder me ajudar, inscreva-se no meu canal. Isso me ajuda muito !



Dica Delphi: Conectar base de dados Oracle via Zeos Lib

Imagem
Neste vídeo vou mostrar como conectar a uma base de dados Oracle (XE) usando Delphi Start Edition e Zeos Lib.
Como fazer um simples CRUD para testes de comunicação com a tabela da base.

Se puder me ajudar, inscreva-se no meu canal. Isso me ajuda muito !



Dica Lazarus: Conectar base Oracle usando ZeosLIb

Imagem
Hoje vou mostrar como conectar a uma base de dados Oracle utilizando o componente ZeosLib.

Lembre-se que:

Se seu Lazarus for 64 bits, o Oracle deve ser 64 e esta regra deve ser respeitada para 32 bits.

A versão do Windows (32/64) não importa, mas o compilador não reconhece a oci.dll de versões diferentes.


Se puder me ajudar, inscreva-se no meu canal. Isso me ajuda muito !


Cuidado ao escolher o técnico para formatar seu computador

Imagem