Pular para o conteúdo principal

Postagens

Delphi Exception Logger

Olá pessoal, achei esta unit na internet, e resolvi fazer uma "cópia" do site onde ela estava hospedada. Link original:  http://www.jirihajek.net/delphi/ExceptLog.htm A free exception logging for Delphi with additional information like source files, procedure names, line numbers, exception messages, etc. (c) Jiri Hajek 2003-2005 E-mail:   jh   at   j i r i h a j e k   dot   net Created for  MediaMonkey , a free mp3 jukebox player and music library organizer Purpose: When you include this unit in your project, all exceptions that happens at run-time are automatically logged together with exception message, information about source of the exception and call stack content together with source files and line numbers information. Environment: This unit was tested under Delphi 7, it would probably work under other Delphi versions as well, but it might need some modifications in some magic constants in the code below. Usage: Include this unit in your project. You'll also need an
Postagens recentes

Nostalgia - Computadores Antigos

 Ola pessoal, este post é pra quem curte os computadores mais antigos, mais especificamente da decada de 1980/1990/2000. Tantos computadores como video games, revistas, livros, etc. Vale a pena conferir o site  https://datassette.org/ Software antigos, ZX Spectrum, apple, MSX, CP-500, revista Mico Sistemas, revista Info, livros de Assembly, Cobol, BASIC, dBase II, e muito mais. Atari, Mega Drive. Manuais tecnicos antigos, Cartões de Referência. Muita coisa mesmo. Abraço a todos.

SQL - Selecionar os 5 maiores por cidade

Olá galera, vejam um exemplo de como selecionar os 5 maiores vendedores por cidade WITH xdados2 AS (   WITH xdados AS (SELECT cidade,      nome,      SUM(total) AS total     FROM dados     GROUP BY cidade, nome     ORDER BY cidade, nome, volume DESC)   SELECT cidade,      nome,      total,     ROW_NUMBER() OVER (PARTITION BY cidade ORDER BY total DESC) row_num   FROM xdados ) SELECT cidade, nome, ROUND(total, 4), row_num  FROM xdados2 HAVING row_num <= 5

Delphi - Acessando Paradox/DBase sem BDE

Olá amigos, mais um post pra ficar registrada uma dica de como acessar tabelas Paradox ou DBase sem o uso da BDE Como o BDE está parando de funcionar em algum lugares, caso alguém esteja precisando fazer conexão com arquivos Paradox, só usar essa connectionString no ADO Connection. Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\PastaComArquivoDb;Extended Properties=Paradox 5.x Talvez isso ajude alguém um dia. E caso precise fazer alguma conexão com arquivo DBase, só trocar a _extended properties para dBASE IV Créditos para o nosso amigo Rômulo Nascimento

ACBR - Corrigir Erro Interno: 12175/12030/12029/12031

Erro Interno: 12175/12030/12029/12031 Atualização do Windows - Habilitar o TSL 1.2 ✔1.0) Instalar o Service Pack 1 (SP1) - Baixar em  https://www.microsoft.com/pt-BR/download/details.aspx?id=5842 ✔1.1) Responsável por atualização dos protocolos de SSL - Instalar KB2992611, https://www.catalog.update.microsoft.com/Search.aspx?q=2992611 ✔1.2) Responsável por HABILITAR o protocolo TLS 1.1 e 1.2. Instalar KB3140245  https://www.catalog.update.microsoft.com/search.aspx?q=kb3140245 ✔1.3) ou Baixar todas as atualizações disponíveis. Configuração do Protocolo no Internet Explorer Marque as opções Opções de Internet (no IE, menu Ferramentas, Opções de Internet) ✔ Não salvar páginas criptografadas em disco;  ✔ Usar SSL 3.0;   ✔ Usar TLS 1.0;   ✔ Usar TLS 1.2;  Desmarque as opções caso tenha ou estejam marcadas: ❌ Usar SSL 2.0;  ❌ Usar TLS 1.1; #Atualizações das Cadeias de Certificado ✔ https://www.gov.br/iti/pt-br/assuntos/navegadores Certificados por Navegadores fonte - http://www.iti.gov.br/na

ACBr - remover arquivos para nova instalação

Ola pessoal, vamos para mais uma dica. Quando vamos reinstalar o ACBr, às vezes precisamos apagar os arquivos da instalação anterior, e para isso recorremos ao arquivo apagarACBr.bat. Esse comando funciona, porem é muito lento. Aqui vou apresentar uma solução que localiza os arquivos na velocidade da luz. 1. Instale o Everything: www.voidtools.com 2. Abra o arquivo apagarACBr.bat em um editor de textos, e copie a lista de arquivos a serem apagados. Substitua os espaços por uma barra horizontal (|). A lista pronta esta logo abaixo: ACBr*.bpl|ACBr*.dcp|ACBr*.dcu|PCN*.bpl|PCN*.dcp|PCN*.dcu|SYNA*.bpl|SYNA*.dcp|SYNA*.dcu|pnfs*.dcu|pcte*.bpl|pcte*.dcp|pcte*.dcu|pmdfe*.bpl|pmdfe*.dcp|pmdfe*.dcu|pgnre*.dcp|pgnre*.bpl|pces*.bpl|pgnre*.dcu|pces*.dcp|pces*.dcu|pca*.dcp|pca*.dcu 3. Abra o Everything e cole essa lista no campo de pesquisa 4. Agora só selecionar os arquivos e excluir

FastReport - Modelo Relatorio com Cantos Arredondados

Pra quem precisa de um modelo de relatório com cantos arredondados, ai tem um exemplo (basta remover o texto: LABEL: Color: clWhite - Borda Esquerda/Direita ) Link pra download do fr3: https://drive.google.com/file/d/1uyLaMxSVo4ew_lOFPM757JaCXfo3U-Zu/view?usp=sharing