drgarcia1986’s gists

drgarcia1986 / TesteCotacao.dpr

Created February 13, 2014 23:03

Classe feita em Delphi para recuperar a cotação de algumas moedas estrangeiras baseada nas versões brasileiras do site CashCash.cc

	program TesteCotacao;

	{$APPTYPE CONSOLE}

	{$R *.res}

	uses
	System.SysUtils,
	Utils.Cotacao in 'Utils.Cotacao.pas';

drgarcia1986 / cotacao.py

Created February 13, 2014 23:09

Classe feita em Python para recuperar a cotação de algumas moedas estrangeiras baseada nas versões brasileiras do site CashCash.cc

	__author__ = 'diego.garcia'

	import urllib.request as req
	import re


	class Cotacao:

	def __get_cotacao(self, url, regex='^.*nacional" value="([0-9,]+)"'):
	pagina = req.urlopen(url)

drgarcia1986 / UDP.Server.Exemplo.pas

Last active August 29, 2015 13:56

Classe feita em Delphi que encapsula um servidor UDP, trabalhando com método anônimo para regatar as mensagens recebidas e determinar a resposta que o servidor deve devolver para o cliente.

	procedure TForm1.BitBtn1Click(Sender: TObject);
	begin
	TUDPServer.GetInstance().SetReponseToMessage(
	function(const AMsg : string):String
	begin
	Memo1.Lines.Insert(0,AMsg);
	if AMsg = 'UDP-MSG' then
	Result := 'DONE'
	else
	Result := ReverseString(AMsg);

drgarcia1986 / udp_client.py

Created February 17, 2014 23:51

Classe feita em Python que encapsula um cliente UDP enviando e recebendo mensagens de um servidor.

	__author__ = 'diego.garcia'

	import socket


	class UDPClient:
	__IP = '255.255.255.255'
	__PORT = 49152
	__udp_cli = ''

drgarcia1986 / UDP.Client.Exemplo.pas

Created February 19, 2014 17:56

Classe feita em Delphi que encapsula um cliente UDP enviando e recebendo mensagens de um servidor.

	procedure TForm1.Button1Click(Sender: TObject);
	var
	wPort: Word;
	sIp: string;
	sMsg: string;
	begin
	TUDPClient.GetInstance().EndOfProtocol := '.';
	sMsg := TUDPClient.GetInstance().SendBroadcast('UDP-MSG',sIp,wPort);

	Memo1.Lines.Add(Format('[%s] [%d] : %s',[sIp,wPort,sMsg]));

drgarcia1986 / Rastreio.Correios.pas

Created February 24, 2014 23:16

Classe escrita em Delphi que recupera e interpreta o rastreio de encomendas do site dos correios.

	unit Rastreio.Correios;

	interface

	uses
	IdHTTP,
	System.Generics.Collections;

	type
	TStatus = record

drgarcia1986 / Singleton.Example.pas

Created February 25, 2014 18:18

Esqueleto para criação de uma classe Singleton em Delphi

	unit Singleton.Example;

	interface

	type
	TMyClass = class
	strict private
	class var FInstance : TMyClass;
	private
	class procedure ReleaseInstance();

drgarcia1986 / singleton_example.py

Created March 11, 2014 19:55

Esqueleto para criação de uma classe Singleton em Python

	class MyClass:

	__instance = None

	@staticmethod
	def instance():
	if not MyClass.__instance:
	MyClass.__instance = MyClass()
	return MyClass.__instance

drgarcia1986 / CurrencyConvertor.pas

Created March 17, 2014 23:12

Aplicativo de exemplo referente a post de titulo "Recuperando o XML de uma requisição SOAP em Delphi" no blog http://drgarcia1986.wordpress.com/

	// ************************************************************************ //
	// The types declared in this file were generated from data read from the
	// WSDL File described below:
	// WSDL : http://www.webservicex.net/CurrencyConvertor.asmx?WSDL
	// >Import : http://www.webservicex.net/CurrencyConvertor.asmx?WSDL>0
	// Encoding : utf-8
	// Version : 1.0
	// (27/06/2013 19:13:01 - - $Rev: 45757 $)
	// ************************************************************************ //

drgarcia1986 / datas.py

Created March 28, 2014 15:06

Exemplo básico de como trabalhar com os métodos strptime e strftime da biblioteca datetime do python

	__author__ = 'diego.garcia'

	import datetime

	dt = datetime.datetime.strptime('February 28, 2014, 7:05 AM', '%B %d, %Y, %I:%M %p')
	print(dt.strftime("%d/%m/%Y %I:%M %p"))

Diego Garcia drgarcia1986