Skip to content

Instantly share code, notes, and snippets.

View matheusd's full-sized avatar

Matheus Degiovani matheusd

View GitHub Profile
@matheusd
matheusd / MDWSLoader.js
Created May 24, 2017 20:25
Optimzed CSS download for my website
/** My dynamic CSS loader for embedding. */
(function () {
var MDWSLoader = {
/** Sets the CSS files used by the system. */
setCSS: function (files) {
this.cssFiles = files;
},
/** Load the css files using document.write(link...). */
@matheusd
matheusd / unDebugUnitInitOrder.pas
Created December 15, 2016 08:44
Unit para depuração da ordem de carregamento de units de um programa Delphi
unit unDebugUnitInitOrder;
interface
uses
Windows, SysUtils, Classes, Forms, StrUtils, JclDebug;
procedure extractUnitOrder;
implementation
@matheusd
matheusd / sistema.dpr
Created December 15, 2016 08:26
Exemplo de programa instrumentado com a UnPerfCounter.pas
program sistema;
uses
unPerfCounter,
Forms,
Unit1 in 'Unit1.pas' {Form1},
//...
Unit1000 in 'Unit1000.pas' {Form1000};
{$R *.RES}
@matheusd
matheusd / UnPerfCounter.pas
Created December 15, 2016 08:09
Unit de cálculo de tempo de execução para Delphi em plataforma Windows
unit UnPerfCounter;
interface
uses
windows, SysUtils;
type
{: Um contador de alta performance, utilizado para realizar medições de
tempo/velocidade. }