Minha história de Borland começou no Brasil em dezembro de 1995, teve muitos capítulos (Borland/Inprise/CodeGear/Embarcadero), um novo e importante capítulo iniciou em dezembro de 2006 com minha vinda para os Estados Unidos e hoje este capítulo chega ao fim. Hoje é meu último dia na Embarcadero Technologies.

Eu gostaria de agradecer a todos ao redor do mundo pelos grandes momentos que compartilhamos durante todos estes anos, por todas as conversas online, via email, telefone e frente a frente. Ter trabalhado como seu porta-voz durante todos estes anos foi algo único e que eu fiz com prazer, algo que irei levar sempre comigo.

Os 17 anos de Delphi só se tornou possível por causa do suporte desta grande e energética comunidade, continue enviando seus feedbacks para a Embarcadero (newsgroup em inglês é um ótimo canal pra isso), especialmente agora com o FireMonkey que tem um longo caminho.

Meu blog continua e desenvolvimento de software continuará sendo o tópico principal. Meus vídeos no YouTube irão continuar lá e espero publicar outros vídeos no futuro, para finalizar você pode continuar ou começar a me seguir no Twitter @andreanolanusse

Estarei por perto e você pode me contactar através deste link ou através do e-mail andreano AT gmail DOT com

Agora é hora de começar a escrever o próximo capítulo e buscar novas oportunidades que sejam desafiadoras e divertidas.

Sinceramente,

Andreano Lanusse

Posts relacionados

• Disponibilizado o Trial, Datasheet, Matriz de Recursos e FAQ para as versões XE2
• Delphi Conference 2011 – chamada para submissão de palestras
• RAD Studio XE2 uma nova era para desenvolvedores Delphi e C++Builder
• Exemplos e slides do Delphi Meeting 2011
• Vídeo de lançamento da familia XE do Delphi, C++Builder, RadPHP e Delphi Prism
• Disponibilizada nova versão do Delphi XE, C++Builder XE, Delphi Prism XE e RadPHP XE

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Você pode obter este update de 3 formas:

• Atualizando via o mecanismo de Automatic Upgrade
• Manualmente através da opção Checking for Updates
• Fazendo o download a partir da página de usuários registrados

A lista completa de alterações, correções e novos recursos neste update está disponível aqui.

Dois novos recursos que destaco neste update é o suporte a impressora em Mac através do FireMonkey Printing API e o suporte a geração de proxy para FreePascal através do DataSnap Mobile Connector.

Você poder fazer o download do ISO para Delphi XE2 e C++Builder XE2 que inclui o Update 4 aqui.

Posts relacionados

• Bye Bye Embarcadero
• Desenvolvendo o FireMonkey 3D Text Editor para Windows e Mac
• Conectando ao PostgreSQL com dbExpress ODBC driver
• Disponibilizado Update 2 para Delphi XE2, C++Builder XE2 e RadPHP XE2
• Vídeo: Delphi XE2 e FireMonkey app no Windows, Mac e iOS
• Hotfix 2 e Help Update 2 para Delphi XE, C++Builder XE e RAD Studio XE

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

A aplicação é um editor de objetos 3D (3D Text Editor) que permite ao usuário interagir com objetos 3D através de rotação, mudança de cores, textura, tamanho dos objetos, exportar o texto 3D como imagem PNG e muito mais.

Essa aplicação é um excelente começo para quem está interessado em aprender sobre FireMonkey e expõe muitos recursos interessantes, não somente mostra como usar 3D, animações, luz, camera, elementos 2D in containers 3D, etc., mas também como criar interfaces de usuário modernas, como tirar proveito do conceito de componente composto, como usar Scalable Vector Graphics (SVG) e mais.

Em breve estarei publicando uma série de artigos e vídeos em português que irão explicar em detalhes os recursos do FireMonkey utilizados neste aplicação, até lá lhe convido a assistir o vídeo (inglês) abaixo onde eu mostro a aplicação em ação.

Posts relacionados

• Vídeo: Delphi XE2 e FireMonkey app no Windows, Mac e iOS
• Bye Bye Embarcadero
• Vídeo: Desenvolvendo para iOS com FireMonkey e Delphi XE2
• Vídeo: Desenvolvimento para iOS com FireMonkey
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Conectando ao PostgreSQL com dbExpress ODBC driver

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Este grupo tem o suporte direto da Atozed e em português

http://br.groups.yahoo.com/group/iwbr/

Além disso, se está anunciando na lista um curso de 36 horas, pago e online de Intraweb, maiores detalhes acesse a lista. O curso está programado para dia 28 de fevereiro.

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Desenvolvendo o FireMonkey 3D Text Editor para Windows e Mac
• Vendas de Delphi e C++Builder crescem 54% em um ano
• Hora de seguir em frente
• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

A boa notícia é que acabamos de divulgar o crescimento nas vendas do Delphi e C++Builder, crescimento este que foi de 54% sobre as vendas do ano anterior (2010), acelerando ainda mais nos últimos três anos de crescimento consecutivo de 15% ano-sobre-ano do Delphi e da linha de produtos do RAD Studio.

Este crescimento mostra claramente que estamos no caminho certo, diversas inovações nos últimos anos, como: FireMonkey, suporte a Windows, Mac, iOS e futuramente Android e outras plataformas estão fazendo a diferença. Comunidade Delphi e C++Builder podem comemorar.

Abaixo, o press release oficial divulgado esta semana.

Embarcadero Technologies Grows Delphi and C++ by 54% in 2011

Release of RAD Studio XE2 and FireMonkey Enhance Cross Platform

Development Capabilities and Drive Growth

SAN FRANCISCO –February 7, 2012— Embarcadero Technologies, a leading provider of software solutions for application and database development, announced today that worldwide sales for its new RAD family of development tools, including RAD Studio, Delphi, and C++Builder, grew 54 percent over sales of the previous version in 2010, further accelerating the previous three years of consecutive 15 percent year-over-year growth of the Delphi and RAD Studio product lines.

With the release of both RAD Studio XE2 and FireMonkey in 2011, the RAD Studio suite now offers a powerful toolset to C++ and Delphi developers, enabling them to develop rich applications across desktop and mobile platforms with integrated native support for the most popular database platforms including Oracle, SQL Server, DB2, Sybase, InterBase, MySQL and more.

FireMonkey, a new addition to the RAD Studio family, is a next generation application platform that enables organizations to build visually stunning HD and 3D business applications for Windows (32-bit and 64-bit), Mac, and iOS. RAD Studio XE2 is a highly productive development environment for the popular Delphi, C++ and PHP programming languages. The extensive Embarcadero developer community is the second largest Windows developer community in the world after Microsoft.

“The world for Windows developers is changing. Every month Windows developers are facing an increasing demand for Mac and Mobile, and at the same time they are expected to raise the bar on user experience and interoperability.” said Michael Swindell, Senior Vice President of Marketing and Products at Embarcadero. “Developers need tools to help them deliver on these new demands without materially increasing timelines and budgets. We’re proud that RAD Studio XE2 is helping Windows developers tame these pressures and develop rich native applications across multiple platforms from a single codebase. And this is the key driver behind Delphi and C++Builder’s impressive growth.”

According to a recent Forrester report, nearly 50 percent of businesses in North America and Western Europe now issue Mac computers in the workplace, and 27 percent of those companies offer support for the iPad. It’s clear that Apple is becoming an important factor in the Enterprise, and developers must address that as they build business applications. RAD Studio’s cross platform development capabilities address the rapidly growing Mac and iOS markets, which enables developers to reach an additional 10 to 15 percent of the Desktop market with minimal additional development cost. Developers using RAD Studio can write an application once and compile to both Windows and Mac – no need for a separate development team using different development tools or duplicating effort to create Windows and Mac versions of an application.

In fall 2011, Embarcadero hosted a RAD Studio XE2 world launch tour, which brought the Delphi developer community together in countries across North America, APAC and EMEA. Over three months, more than 70 events were held in 30 countries with almost 10,000 registered. The events showcased the new features of both RAD Studio XE2 and FireMonkey, and provided the community with a chance to learn, connect, and share their experiences with RAD Studio. To learn more about the full line of Embarcadero application development tools including Delphi, C++Builder, and RAD Studio, please visit http://www.embarcadero.com/products/application-development.

About Embarcadero Technologies

Embarcadero Technologies, Inc., a software management and delivery company, is a leading provider of database and application development software tools. By using Embarcadero‘s award-winning products, professionals can design systems right, build them faster and run them better, regardless of their platform or programming language. Three million users worldwide and 90 of the Fortune 100 companies rely on Embarcadero products to increase productivity, reduce costs, simplify change management and compliance, and accelerate innovation. Founded in 1993, Embarcadero is headquartered in San Francisco, with offices located around the world. Embarcadero is online at www.embarcadero.com.

###

Embarcadero, the Embarcadero Technologies logos and all other Embarcadero Technologies product or service names are trademarks or registered trademarks of Embarcadero Technologies, Inc. All other trademarks are the property of their respective owners.

Press contacts:

Lindsey Pappas

Atomic PR for Embarcadero

415-593-1400

lindsey@atomicpr.com

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Desenvolvendo o FireMonkey 3D Text Editor para Windows e Mac
• Lista de discussão sobre Intraweb no yahoo
• Hora de seguir em frente
• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Este exemplo demonstra como validar um conteúdo a partir de uma string em quatro diferentes expressões regulares, que são:

• Validar se a string enviada contém um endereço de e-mail
• Validar se a string enviada contém um endereço de IP válido
• Validar se a string enviada está no formato dd-mm-yyyy
• Validar se a string enviada está no formato mm-dd-yyyy

O código a seguir mostra as quatro expressões regulares usadas por essa aplicação.

void __fastcall TForm1::lbRegExpChange(TObject *Sender) {
	switch (lbRegExp->ItemIndex) {
	case 0:
		lbType->Text = "E-mail for validation";

		MemoRegEx->Text =
			"^((?>[a-zA-Z\d!#$%&''*+\\-/=?^_`{|}~]+\\x20*" "|\"((?=[\\x01-\\x7f])[^\"\\\\]|\\\\[\\x01-\\x7f])*\"\\"
			"x20*)*(?\.?[a-zA-Z\d!" "#$%&''*+\\-/=?^_`{|}~]+)+|\"\"((?=[\\x01-\\x7f])"
			"[^\"\\\\]|\\\\[\\x01-\\x7f])*\")@(((?!-)[a-zA-Z\\d\\" "-]+(?)$";

		break;
	case 1: {
			// Accept IP address between 0..255
			lbType->Text = "IP address for validation (0..255)";
			MemoRegEx->Text =
				"\\b(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\\" ".(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\\."
				"(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\\." "(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\\b";
			break;

		}
	case 2: {
			// Data interval format mm-dd-yyyy
			lbType->Text =
				"Date in mm-dd-yyyy format from between 01-01-1900 and 12-31-2099";
			MemoRegEx->Text =
				"^(0[1-9]|1[012])[- /.](0[1-9]|[12][0-9]|3[" "01])[- /.](19|20)\\d\\d$";
			break;

		}
	case 3: {
			// Data interval format mm-dd-yyyy
			lbType->Text =
				"Date in dd-mm-yyyy format from between 01-01-1900 and 31-12-2099";
			MemoRegEx->Text =
				"^(0[1-9]|[12][0-9]|3[01])[- /.](0[1-9]|1[01" "2])[- /.](19|20)\\d\\d$";
			break;

		}
	}
	EditTextChangeTracking(EditText);

}

Para executar a validação, utilizamos o método TRegExp::IsMatch como demonstrado a seguir:
To execute the validation you can use the method TRegExp::IsMatch as you can see bellow:

void __fastcall TForm1::EditTextChangeTracking(TObject *Sender) {
       // EditText contain the string value and MemoRegEx the regular expression
	if (TRegEx::IsMatch(EditText->Text, MemoRegEx->Text)) {
		SEResult->ShadowColor = TAlphaColors::Green;
	}
	else
		SEResult->ShadowColor = TAlphaColors::Red;

}

Uma vez que este é um aplicativo FireMonkey, utilizei o efeito de sombra para demonstrar ao usuário se o valor informado no Edit é válido ou não (Verde = válido / Vermelho = inválido). A seguinte imagem demonstra o que irá acontecer caso o usuário informe um endereço de e-mail inválido no Windows e Mac.

Abaixo o resultado quando o usuário informar o endereço de e-mail válido.

Você pode baixar o código fonte  aqui ou atualizar a pasta de exemplos local do seu RAD Studio XE2 a partir do repositório do RAD Studio XE2 no SVN.

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Desenvolvendo o FireMonkey 3D Text Editor para Windows e Mac
• Usando dbExpress Framework no Windows e Mac com C++Builder
• Conectando ao PostgreSQL com dbExpress ODBC driver
• Vídeo: Delphi XE2 e FireMonkey app no Windows, Mac e iOS

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Neste primeiro artigo, demonstro como usar dbExpress Framework para executar SQLs em um banco de dados InterBase, meu objetivo é executar a aplicação no Windows e Mac, tendo que escrever uma única aplicação, assim sendo criei um aplicativo console que utilizar FireMonkey.

O assistente (Wizard) para criação de aplicações console em C++ foi atualizado no C++ Builder XE2, este agora contém a opção Target Framework, como você pode ver abaixo.

O código abaixo mostra como conectar a uma base de dados InterBase, executar um SELECT na tabela COUNTRY e exibir os resultados, vale lembrar que você pode usar o dbExpress Framework para interagir com qualquer banco de dados suportado pelo dbExpress, lembrando que alguns drivers dbExpress não estão disponíveis no Mac, como por exemplo, SQL Server e o driver ODBC.

Se você é um desenvolvedor C++ rapidamente irá entender o código abaixo, o qual contém comentários para facilitar o entendimento.

#include <fmx.h>

#pragma hdrstop
#pragma argsused

#include <tchar.h>
#include <stdio.h>
#include <System.SysUtils.hpp>
#include <Data.DBXDynalink.hpp>
#include <Data.DBXCommon.hpp>
#include <Data.DBXInterbase.hpp>
#include <memory>

int _tmain(int argc, _TCHAR* argv[]) {

	// Get database connection instance
	std::auto_ptr<TDBXConnection>conn
		(TDBXConnectionFactory::GetConnectionFactory()->GetConnection
		("EMPLOYEE", "sysdba", "masterkey"));

	if (conn.get() != NULL) {

		printf("================= Connection Properties ============\n");

		AnsiString s = conn->ConnectionProperties->Properties->Text + "\n";
		printf(s.c_str());

		// create command and transaction objects to execute the query
		std::auto_ptr<TDBXCommand>command(conn->CreateCommand());

                // initiate a transaction
		TDBXTransaction *transaction =
			conn->BeginTransaction(TDBXIsolations::ReadCommitted);

		command->Text = "SELECT * FROM Country";
		command->Prepare();

		// execute the query and get the cursor (DBXReader)
		std::auto_ptr<TDBXReader>reader(command->ExecuteQuery());

		// print number of columns and each record
		printf(AnsiString("Number of Columns:" + IntToStr(reader->ColumnCount) +
			"\n").c_str());

		// display the list of records
		while (reader->Next()) {
			printf((reader->Value[reader->GetOrdinal("COUNTRY")]->GetAnsiString
				() + "\n").c_str());
		}

		printf("====================================================\n");

		conn->CommitFreeAndNil(transaction);
	}

	Sleep(5000);
	return 0;
}

Antes de executar esse código, certifique-se que o alias dbExpress EMPLOYEE está configurado para a conectar ao banco de dados EMPLOYEE.GDB e o cliente do InterBase esteja instalado, a partir do momento em que o ambiente está configurado, compile e execute este aplicativo no Windows e Mac, a imagem a seguir mostra esta aplicação rodando no Mac.

Existem alguns pontos que você precisa estar ciente quando distribuir e executar suas aplicação no Mac, estou preparando um post onde vou explicar mais sobre este tema.

Até aqui aprendemos como usar DBX Framework, distribuir e executar este tipo de aplicação no Windows e Mac.

Você pode baixar o código fonte aqui ou apenas atualizar suas pasta de exemplos do RAD Studio XE2 a partir do repositório do RAD Studio no SVN.

Posts relacionados

• Conectando ao PostgreSQL com dbExpress ODBC driver
• Bye Bye Embarcadero
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Desenvolvendo o FireMonkey 3D Text Editor para Windows e Mac
• Usando expressões regulares em aplicações FireMonkey com C++Builder
• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Se você pretende adquirir novas licenças ou ainda não atualizou para Delphi XE2, C++Builder XE2, RAD Studio XE2, agora é hora. Ao adquirir uma das seguintes edições você pode levar até 4 ferramentas grátis, além de um voucher para a Certificação Delphi Developer para cada licença adquirida.

Recentemente publiquei o artigo em inglês “Razões para migrar para o Delphi XE2 | O que você pode ter perdido desde o Delphi 7″, que pode lhe ajudar na decisão sobre migrar.

Aproveita porque essa promoção, pois acaba dia 24 de dezembro de 2011, você pode obter mais informações neste aqui ou contactar a E do Brasil nosso parceiro no Brasil.

É hora de seguir em frente

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Desenvolvendo o FireMonkey 3D Text Editor para Windows e Mac
• Lista de discussão sobre Intraweb no yahoo
• Vendas de Delphi e C++Builder crescem 54% em um ano
• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

A partir do Delphi XE2 Update 2 isso não é mais problema, o suporte a blob no método CopyReaderToClientDataSet foi implementando.

Para saber como utilizar o método CopyReaderToClientDataSet na prática leia o artigo “Copiando estrutura e dados de um DBXReader para ClientDataSet  - DataSnap“

Posts relacionados

• Conectando ao PostgreSQL com dbExpress ODBC driver
• Monitoramento e controle de conexões em DataSnap XE2
• Implementando cache de dados em servidores DataSnap
• Exemplos e slides do Delphi Meeting 2011
• Vídeos sobre DataSnap para 2011 – o que você gostaria de ver?
• Apresentações do Delphi Conference 2010 disponível para download

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Para mostrar na prática como funciona, criei uma aplicação FireMonkey que conecta a uma base de dados PostgreSQL.

Como requisito, você precisa instalar na máquina onde a aplicação será executada o driver ODBC do PostgreSQL, que pode ser baixado aqui. Vale lembrar que aplicações compiladas como 32-bit requerem a versão 32-bit do driver ODBC da base de dados a ser utilizada, para aplicações 64-bit será necessário o driver ODBC 64-bit.

Após instalado o driver, crie e configure o User DSN ou System DSN no ODBC Data Source Administrator (odbcad32.exe):

Instruções para windows 64-bit

• Para aplicações 32-bit use o c:\Windows\SysWOW64\odbcad32.exe
• Para aplicações 64-bit use o c:\Windows\system32\odbcad32.exe

Instruções para windows 32-bit

• Use o c:\Windows\system32\odbcad32.exe

O próximo passe é criar um alias dbExpress ODBC no Data Explorer, onde Database Name é o nome do Data Source criado anteriormente, no meu exemplo este Data Source se chama PostgreSQL35W. Todas as informações relacionada a qual base de dados conectar, usuário e senha já foram configuradas no Data Source, você pode sobrescrever o usuário e senha na conexão dbExpress.

Supondo que você já saiba como utilizar os componentes SQLConnection, DataSetProvider e ClientDataSet ou SimpleDataSet e DataSource, basta conectá-los da mesma forma que você sempre fez com aplicações que utilizam os componentes dbExpress. A configuração do SQLConnection será configurada conforme abaixo:

  object SQLConnection1: TSQLConnection
    ConnectionName = 'PostgreSQLOdbc'
    DriverName = 'ODBC'
    LoginPrompt = False
    Params.Strings = (
      'drivername=ODBC'
      'Database=PostgreSQL35W')
  end

Além de poder utilizar os componentes dbExpress em aplicações VCL e FireMonkey, você pode utilizar o dbExpress framework para conectar a bancos de dados que não tenham um driver nativo. A figura abaixo mostra a aplicação FireMonkey conectada a PostgreSQL através do dbExpress ODBC driver.

Download do código fonte disponível aqui.

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Desenvolvendo o FireMonkey 3D Text Editor para Windows e Mac
• Usando dbExpress Framework no Windows e Mac com C++Builder
• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”
• Vídeo: Delphi XE2 e FireMonkey app no Windows, Mac e iOS

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Você pode efetuar o download do Update 2 para Delphi e C++Builder através da opção “Check for Updates”.

RAD Studio XE2 Update 2

• Update 2 para Delphi, C++Builder e RAD Studio XE2 – http://cc.embarcadero.com/item/28597
• ISO do Delphi XE2 e C++Builder XE2 (inclui Update 2) – http://cc.embarcadero.com/item/28616
• Lista de bugs resolvidos no Delphi XE2 e C++Builder XE2 Update – http://edn.embarcadero.com/article/41750

RAD Studio XE2 Help Update 1 – http://cc.embarcadero.com/item/28613

RadPHP XE2 Update 2

Update 2 para o RadPHP – http://cc.embarcadero.com/item/28614
Lista de bugs resolvidos no RadPHP XE2 Update 2 – http://edn.embarcadero.com/article/41756

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Disponibilizado o Trial, Datasheet, Matriz de Recursos e FAQ para as versões XE2
• Delphi Conference 2011 – chamada para submissão de palestras
• Delphi Tour 2011
• RAD Studio XE2 uma nova era para desenvolvedores Delphi e C++Builder

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Aproveitando a oportunidade, dia 30 de Novembro acontece o Delphi Conference 2011, o maior evento de Delphi do Brasil, um dia inteiro para aprimorar seus conhecimento em Delphi e ir a fundo nas mais recentes novidades. Todas as informações no site do evento HTTP://www.delphiconference.com.br

Pra começar, toda a implementação do monitoramento e controle foi implementada para protocolo TCP/IP o que permite monitorar e derrubar qualquer conexão, assim sendo o componente TDSTCPServerTransporter recebeu dois novos eventos OnConnect e OnDisconnect, estes eventos são muito importantes, pois através deles gerenciamos a lista de conexões no servidor podendo fazer o que quiser com as mesmas. Além disso toda conexão está associado a um Session ID que é único, o Session ID já está disponível desde as versões anteriores do DataSnap.

Para exemplificar o funcionamento e implementação do monitoramento definimos uma lista (collection) conforme abaixo para armazenar as instâncias de cada conexão (TIdTCPConnection) e protocolo (TDSTCPChannel)

FConnections: TObjectDictionary<TIdTCPConnection,TDSTCPChannel>;

A partir dai implementamos os eventos OnConnect e OnDisconnect no TDSTCPServerTransporter. Implementar o evento OnConnect é bem simples, você tem apenas que armazenar as informações referente a conexão na sua lista e caso tenha alguma interface para atualizar com as informações referentes a esta conexão, assim faze-lo.

O código abaixo adiciona a nova conexão utilizando os métodos TMonitor.Enter e TMonitor.Exit para assegurar que nenhuma outra thread irá tentar atualizar esta lista.

Após adicionar a lista utilizamos o método EnableKeepAlive que irei explicar em seguida.

procedure TCMServerForm.CMServerTransportConnectEvent(Event: TDSTCPConnectEventObject);
begin
  System.TMonitor.Enter(FConnections);
  try
    FConnections.Add(TIdTCPConnection(Event.Connection), Event.Channel);
  finally
    System.TMonitor.Exit(FConnections);
  end;

  //Enable Keep-alive for this new connection.
    Event.Channel.EnableKeepAlive(10000);
end;

A implementação do método OnDisconnect terá que localizar a instância da conexão e remove-la da lista, OnDisconnect será executado quando a aplicação cliente desconectar do servidor, seja de forma natural, queda de rede, etc.

Por padrão, o evento OnDisconnect não será notificado se o cliente de forma abrupta perde sua conexão internet. Isso acontece porque a conexão Socket permanece aberta até que ocorra alguma chamada e esta falhe. Se o sistema operacional está configurado para usar pacotes keep-alive para todas as conexões TCP/IP e com base na sua configuração, você verá o evento OnDisconnect ser notificado. Se você desejar controlar este comportamento para cada conexão, então use os métodos EnableKeepAlive e DisableKeepAlive para cada instância do TDSTCPChannel.

No código acima foi definido para cada conexão o KeepAlive em 10 segundos, isso quer dizer que o server irá enviar um pacote (fazer um ping) no cliente quando o mesmo estiver inativo por mais de 10 segundos, se o cliente não responder o server irá tentar novamente, a quantidade de tentativas é baseada no sistema operacional, por exemplo Windows 7 tenta 10 vezes. Você ainda pode definir o intervalo entre os pings, basta configurar o KeepAliveInterval.

O código abaixo demonstra como remover a instância da conexão da lista e como atualizar a interface do usuário utilizando TThread.Synchronize.

procedure TCMServerForm.CMServerTransportDisconnectEvent(Event: TDSTCPDisconnectEventObject);
var
  Index: Integer;
begin
  if (FConnections = nil) or (Event.Connection = nil) then
    Exit;

  //This is called when a TCP connection is closed, for whatever reason.
  System.TMonitor.Enter(FConnections);
  try
    FConnections.Remove(TIdTCPConnection(Event.Connection));

    TThread.Synchronize(nil, procedure
      begin
        //update the connection list box, removing the connection that was just closed
        Index := ConnectionsList.Items.IndexOfObject(Event.Connection);
        if Index > -1 then
        begin
          ConnectionsList.Items.Delete(Index);

          if ConnectionsList.SelCount = 0 then
            SessionIdList.ClearSelection;
        end;
      end);
  finally
    System.TMonitor.Exit(FConnections);
  end;

Até aqui sabemos quem está conectado ao servidor, a partir dai podemos derrubar qualquer conexão, visto que temos a instância de cada TDSTCPChannel e este contém o método close que encerra a conexão cliente, ao ser desconectado o lado cliente recebe uma exception quando tentar executar qualquer operação no servidor.
No exemplo abaixo encerramos a conexão selecionada em um ListBox, o método GetSelectedChannel busca a instância do Channel baseado na conexão selecionada no ListBox.

Quando executamos o método Channel.Close o evento OnDisconnect será notificado.

procedure TCMServerForm.ButtCloseSelectedClick(Sender: TObject);
var
  Channel: TDSTCPChannel;
begin
  //Find the selected connection's channel, and then close it.
  Channel := GetSelectedChannel;

  //after calling close, the CMServerTransportDisconnectEvent event will be notified.
  if Channel <> nil then
  begin
    Channel.Close;
  end;
end;
function TCMServerForm.GetSelectedChannel(Conn: TIdTCPConnection): TDSTCPChannel;
begin
  Result := nil;

  //Finds the selected connection
  if Conn = nil then
    Conn := GetSelectedConnection;

  //uses the selected connection to look up the associated channel.
  if Conn <> nil then
    FConnections.TryGetValue(Conn, Result)
end;

O RAD Studio XE2 traz um exemplo completo sobre o assunto e se você já usa a versão XE2 pode encontrá-lo em C:\Users\Public\Documents\RAD Studio\9.0\Samples\Delphi\DataSnap\DataSnapMonitor ou fazer o download direto do repositório de demos do RAD Studio XE2 aqui.

Posts relacionados

• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”
• Implementando cache de dados em servidores DataSnap
• Exemplos e slides do Delphi Meeting 2011
• Vídeos sobre DataSnap para 2011 – o que você gostaria de ver?
• Vídeo de lançamento da familia XE do Delphi, C++Builder, RadPHP e Delphi Prism
• Bye Bye Embarcadero

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Nos planejamos disponibilizar todas as informações no site em breve. O anúncio oficial das ferramentas e do FireMonkey será feito em breve também. Nós achamos que vocês iriam gostar de ter acesso aos softwares um pouco mais cedo.

Agora é hora de se divertir com as novidades!!!

Posts relacionados

• Bye Bye Embarcadero
• Delphi Conference 2011 – chamada para submissão de palestras
• RAD Studio XE2 uma nova era para desenvolvedores Delphi e C++Builder
• Exemplos e slides do Delphi Meeting 2011
• Vídeo de lançamento da familia XE do Delphi, C++Builder, RadPHP e Delphi Prism
• Disponibilizada nova versão do Delphi XE, C++Builder XE, Delphi Prism XE e RadPHP XE

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Submeta sua proposta de apresentação enviando me um e-mail com o título “Delphi Conference 2011 – Submissão de Palestra” até o dia 19 de setembro de 2011, para facilitar o envio do e-mail clique neste link.

Este ano é um ano de muitas novidades e muito especial para o Delphi, este ano o Delphi Conference terá seis salas simultâneas consequentemente irá abordar um número maior de temas.

Para lhe ajudar na elaboração do tema, abaixo segue uma lista de temas que poderão ser abordados na sua proposta, lembre-se que o público do Delphi Conference é exigente e buscam sempre apresentações onde se apresente temas relacionados a realidade do desenvolvimento de software.

A apresentação deverá utilizar um dos IDE’s Delphi, .NET com Prism, PHP com RadPHP e C++ com C++Builder, focando as inúmeras tecnologias suportadas pelo RAD Studio, como temas relacionados aos listados abaixo, fique a vontade para sugerir novos temas:

• Desenvolvimento de aplicações VCL
• Desenvolvimento para Windows 64-bit
• Desenvolvimento de aplicações Delphi para Mac OS X com FireMonkey
• Desenvolvimento para iOS com Delphi
• Desenvolvimento para Windows Phone com Prism
• Desenvolvimento de aplicações Web otimizadas para Mobile
• Desenvolvimento de clientes heterogêneos (Web, iOS, Android, Windows Phone, Web) conectados a servidores DataSnap
• Arquitetura de aplicações e banco de dados
• Otimização de banco de dados
• Melhores práticas no desenvolvimento multi-camada com DataSnap
• Melhores práticas para desenvolvimento OO
• Melhores práticas para criação de relatórios
• Integração com Cloud  (Amazon, Microsoft Azure)
• Web Services (SOAP, RESTful)
• Criação de componentes VCL e FireMonkey
• Integração de aplicações com Redes Sociais (Facebook, Twitter, Orkut, Google Plus e outras)
• Metodologias Ágeis (SCRUM, FDD, XP e outras)
• E vários outros temas focados na sua experiência diária.

O e-mail deverá conter as informações conforme abaixo, somente serão consideradas as submissões que apresentarem todas as informações solicitadas abaixo:

• Nome completo e mini-curriculum de no máximo 5 linhas
• Nome da Empresa
• E-mail para contato (utilizar email registrado no EDN)
• Telefone para contato
• Cidade onde reside atualmente
• Tipo da apresentação: Palestra/Mini-curso

Palestra: Apresentações com duração de 60 minutos, focadas num público que está à procura de tópicos específicos para ampliar seu conhecimento sobre desenvolvimento em Delphi, Prism, PHP e C++, assim como as melhores práticas utilizadas no desenvolvimento de software.

Minicurso: Sessões com duração de 2 horas e altamente interativas que permite aos participantes desenvolverem o conhecimento de forma prática.

• Título da apresentação
• Resumo da apresentação de no mínimo 5 e no máximo 7 linhas. (O resumo será chave para aprovar ou não sua palestra, além de ser utilizado nos materiais de divulgação. Portanto é muito importante que esteja bem escrito, com mínimo de 5 linhas (80 colunas cada linha) e exponha bem o tema a ser apresentando)

Com relação a temas relacionados a banco de dados, você pode e deve adicionar qualquer banco de dados que seja suportado por um dos IDE’s mencionados acima, como por exemplo: InterBase, Firebird, SQL Server, Oracle, DB2, Informix, Sybase e outros.

Atente para o prazo de encerramento das submissões: 19/Setembro/2011.

Não se esqueça de revisar se o conteúdo do seu trabalho se enquadra no tipo e duração definido para a sessão selecionada antes de submeter o formulário.

Divulga o evento para sua comunidade local, além das redes sociais. No twitter o hashtag oficial para o é evento é #delphiconference

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado o Trial, Datasheet, Matriz de Recursos e FAQ para as versões XE2
• RAD Studio XE2 uma nova era para desenvolvedores Delphi e C++Builder
• Exemplos e slides do Delphi Meeting 2011
• Vídeo de lançamento da familia XE do Delphi, C++Builder, RadPHP e Delphi Prism
• Disponibilizada nova versão do Delphi XE, C++Builder XE, Delphi Prism XE e RadPHP XE

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Entre os dias 16 e 24 de agosto o Delphi Tour irá percorrer 8 cidades pelo Brasil, trazendo todas as novidades do RAD Studio XE2 que traz as novas versões XE2 do Delphi, C++Builder, RadPHP e Prism.

Diversos temas serão abordados em detalhes durante o evento:

• Desenvolvimento de aplicações HD e 3D com FireMonkey utilizando todo o poder da GPU
• Aplicações 64-bit Windows com Delphi
• Desenvolvimento de aplicações nativas com Delphi para Mac OSX e iOS (iPhone, iPad e iPod)
• Monitoramento de servidores DataSnap e conectividade com Mobile e RADCloud
• Nova tecnologia LiveBindings para conectar objetos e dados
• Modernização do visual de aplicações Windows com VCL Styles
• Criação de aplicações web otimizadas para Android e iOS com RadPHP

A seguir um preview do que será apresentado no Delphi Tour 2011.

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado Update 2 para Delphi XE2, C++Builder XE2 e RadPHP XE2
• Disponibilizado o Trial, Datasheet, Matriz de Recursos e FAQ para as versões XE2
• Delphi Conference 2011 – chamada para submissão de palestras
• RAD Studio XE2 uma nova era para desenvolvedores Delphi e C++Builder
• Exemplos e slides do Delphi Meeting 2011

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Existem inúmeras possibilidades com FireMonkey e todos os novos recursos do RAD Studio XE2, todas estas novidades estão sendo apresentadas no RAD Studio XE2 World Tour, no Brasil será realizado o Delphi Tour 2011 como parte do World Tour, garanta já o seu lugar no Delphi Tour 2011, fazendo sua inscrição o quanto antes.

Para que você tenha uma idéia das novidades do RAD Studio XE2 e mate um pouquinho da curiosidade, preparei um vídeo de 5 minutos (em inglês) com um preview do Delphi XE2 e aplicações HD no FireMonkey rodando em Windows (64-bit), Mac e iOS, além de usar componentes 3D e animações.

Registre-se hoje mesmo para o Delphi Tour 2011

Posts relacionados

• Desenvolvendo o FireMonkey 3D Text Editor para Windows e Mac
• Bye Bye Embarcadero
• Vídeo: Desenvolvendo para iOS com FireMonkey e Delphi XE2
• Vídeo: Desenvolvimento para iOS com FireMonkey
• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Conectando ao PostgreSQL com dbExpress ODBC driver

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Esta versão representa um marco para os desenvolvedores Delphi e C++Builder, muitas são as novidades e iremos apresentar todas estas grandes novidades durante o RAD Studio XE Tour, enquanto isso vou destacando algumas das novidades:

• Delphi 64-bit para Windows e suporte completo para a VCL/RTL
• Driver ODBC para dbExpress ODBC
• Monitoramento e controle de conexões para servidores DataSnap
• LiveBinding, o novo mecanismo para conectar e atualizar qualquer tipo de dado
• Cloud API com suporte a Amazon S3
• VCL Styles para modernizar o visual das suas aplicações VCL
• FireMonkey a nova plataforma para desenvolvimento de software NATIVO

FireMonkey é um grande passo adiante, abre um mercado totalmente novo para desenvolvedores Delphi e C++Builder, permitindo oferecer seus atuais aplicativos para Mac, desenvolver novas aplicações e distribuí-los através da App Store, alcançado assim milhões de usuários finais. Os inúmeros recursos do FireMonkey irá distinguir as suas aplicações de qualquer outro.

Muito mais está por vir, fique atento a este blog, outros blogs Embarcadero e ao nosso website Embarcadero durante este mês para saber mais.

Registre-se hoje para o RAD Studio XE2 World Tour

Posts relacionados

• Bye Bye Embarcadero
• Disponibilizado o Trial, Datasheet, Matriz de Recursos e FAQ para as versões XE2
• Delphi Conference 2011 – chamada para submissão de palestras
• Exemplos e slides do Delphi Meeting 2011
• Vídeo de lançamento da familia XE do Delphi, C++Builder, RadPHP e Delphi Prism
• Disponibilizada nova versão do Delphi XE, C++Builder XE, Delphi Prism XE e RadPHP XE

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Quando implementamos cache para este cenário, a primeira solicitação obtém os dados a partir do banco de dados e os mantém em memôria, a partir da segunda solicitação o servidor de aplicação irá buscar estes dados em memória e retornar para a aplicação cliente, em outra palavras a aplicação tocou o banco de dados apenas uma única vez.

A combinação entre o gerenciamento de memória do DataSnap, DBXReader e ClientDataSet é o que você precisa para implementar uma solução de cache.

O gerenciamento de memória do DataSnap é definido através do componente DSServerClass e sua respectiva propriedade LifeCycle, que você pode ser definida como:

• Server → O servidor mantém uma única instância da classe no server, todos os clientes ao solicitar essa classe receberão sempre a mesma instância (Singleton)
• Session → O servidor mantém uma instância da classe por sessão do DataSnap, cada cliente recebe uma instância diferente da classe (Statefull)
• Invocation → A cada execução de um server method uma instância da classe será criada e logo depois destruída (Stateless), você pode intervir no processo de criação e destruição desta classe a partir do servidor.

Vamos ver como podemos implementar uma solução de cache usando o cenário onde terei que armazenar uma lista de estados, esta informação está na tabela de STATE.

A minha classe no servidor (ServerClass) foi criada a partir de um DSServerModule e se chama TDMDataSet5, contém dois métodos privados (private) e um público (public), que são:

private
   function GetRecords(Fields, Table: String): TDBXReader;
   function GetData(Cds : TClientDataSet; Fields, Table: String) : TDBXReader;
public
   function GetState: TDBXReader;

O método GetRecords irá consultar o banco de dados e retornar os registros como um DBXReader, este método não implementa nenhuma lógica para verificar se o cache já está preenchido.

function TDMDataSet5.GetRecords(Fields, Table: String): TDBXReader;
var
    cmd: TDBXCommand;
begin

    cmd := DMServerContainer.GetConnection.DBXConnection.CreateCommand;
    try
      cmd.Text := 'Select ' + Fields + ' from ' + Table;
      Result := cmd.ExecuteQuery;
    except
      raise;
    end;
end;

Como o DBXReader é unidirecional não podemos manter os dados em memória, a solução para isso é copiar os dados e mantê-los em um ClientDataSet.

GetData é um método interno responsável por criar, manter e retornar os dados como DBXReader.

Conforme a implementação abaixo o método irá obter os dados a partir do banco de dados (GetRecords) somente se o ClientDataSet não está ativo, em outras palavras nós nunca tivemos os dados em cache e somente iremos executar este código uma única vez. Após o bloco do IF a classe TDBXDataSetReader irá copiar os dados do ClientDataSet para um DBXReader e retorná-lo.

function TDMDataSet5.GetData(Cds: TClientDataSet; Fields, Table: String): TDBXReader;
var
    Reader : TDBXReader;
begin
    if not Cds.Active then // Not active means, never move the data to ClientDataSet – no cache
      begin
      Reader := GetRecords(Fields, Table);
      TDBXDataSetReader.CopyReaderToClientDataSet( Reader, Cds );
      Reader.Free;
      Cds.Open;
    end;

    Result := TDBXDataSetReader.Create(Cds, False (* InstanceOwner *) );
end;

Você pode estar se perguntando por que estou copiando os dados do ClientDataSet para DBXReader e não retornando diretamente o ClientDataSet, duas razões:

• Não é possível fazer o marshal/unmarshal de ClientDataSet para um objeto JSON
• DataSnap converte DBXReader em JSON quando o server methods é chamado a partir de uma interface REST.

Um ponto importante, o DSServerModule TDMDataSet5 irá gerenciar o cache, se o LifeCycle para esta classe for definido como server isso irá significar uma única instância do cache para todos os clientes, podemos chamar isso de “cache global”, caso defina como Session estaremos criando um cache para cada cliente conectado ao servidor.

Caso a sua aplicação cliente utilize o DBXClient irá receber um DBXReader a partir da execução do server method, a partir dai é sua responsabilidade decidir o que fazer com os dados, mas sendo necessário conectar estes dados a componentes data-aware será necessário copiar os dados do DBXReader para um ClientDataSet, o método TDBXDataSetReader.CopyReaderToClientDataSet é a solução pra isso.

   TDBXDataSetReader.CopyReaderToClientDataSet(Reader, CDSCity);

Se algum dados relacionado com a tabela State mudar será necessário implementar um server method para atualizar os dados. Além disso, ao definir o LifeCycle como Server o cache será destruído no momento que o servidor parar (Stop), mas se utilizamos o LifeCycle Session o cache será destruído no momento em que a aplicação cliente se desconecta do server.

Usando esta técnica você garante que o cache no servidor não depende da implementação do lado cliente, além disso quero lembrar que essa solução irá funcionar como DataSnap Servers, se você implementou o server usando DataSnap REST Interface você não terá cache, porque cada solicitação ao server funciona como o lifecycle invocation.

Este é um exemplo realista que explica como implementar cache em servidores DataSnap usando dados a partir de um banco de dados como exemplo, além disso, você aprendeu como mover dados de/para ClientDataSet de/para DBXReader.

O download do código fonte utilizado como exemplo está disponível aqui, veja a unit DataSetDM5.pas (Servidor) e FormDataSet5 (Cliente).

Posts relacionados

• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”
• Monitoramento e controle de conexões em DataSnap XE2
• Exemplos e slides do Delphi Meeting 2011
• Vídeos sobre DataSnap para 2011 – o que você gostaria de ver?
• Vídeo de lançamento da familia XE do Delphi, C++Builder, RadPHP e Delphi Prism
• Bye Bye Embarcadero

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Hotfix 2

Este fix corrige um fechamento inesperado do IDE quando se está fazendo compilação em segundo plano (background) e está documentado no QC 90864. Este fix se aplica ao Delphi XE, C++Builder XE e RAD Studio XE, todas as edições.

Links para Download:

• Usuários das edições Enterprise e Architect: http://cc.embarcadero.com/item/28257
• Usuários da edição Professional: http://cc.embarcadero.com/item/28258
• Usuários da edição Starter: http://cc.embarcadero.com/item/28259

Help Update 2

Traz várias correções e melhorias na documentação que destaco a volta do gráfico da hierarquia da VCL (imagem abaixo), documentação dos exemplos incluídos no produto, documentação para 70 mensagems do compilador, várias units e classes tiveram sua documentação atualizada e muito mais. Nossa equipe de documentação está fazendo um excelente trabalho na melhoria continua da documentação, continue enviando feedbacks, pois a nossa equipe de documentação ama.

Link para o download do Help Update 2: http://cc.embarcadero.com/item/28256

Para instalar o Help Update 2, use a seguinte linha de comando: Help_Setup /upgrade

Posts relacionados

• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Disponibilizado Update 2 para Delphi XE2, C++Builder XE2 e RadPHP XE2
• Hotfix 1 para Delphi XE, C++Builder XE e RAD Studio XE
• Update 1 para Delphi XE e C++Builder XE disponível para download
• Disponibilizado o Hotfix 2 para RAD Studio 2010
• Disponibilizado o Update 4 e 5 para RAD Studio 2010, Delphi 2010 e C++Builder 2010

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Este hotfix resolve o seguinte QC:

• QC 89242 - Este fix corrige o erro que ocorre na dupla leitura de campos ftMemo quando utilizando o driver dbExpress para InterBase ou Firebird.
• QC 88928 – Este fix corrige o erro que ocorre quando uma aplicação utilizando TClientDataSet e TProvider e ao gravar as informações no banco recebe um código de status negativo do servidor de banco de dados.

Download da correção QC 89242 em:
http://cc.embarcadero.com/item/28249 - para os usuários da edição Professional
http://cc.embarcadero.com/item/28248 – para os usuários da edição Enterprise e Architect

Download da correção QC 88928 em:
http://cc.embarcadero.com/item/28247

Leia os arquivos readme que estão incluídos nos arquivos para download para maiores informações.

Posts relacionados

• Disponibilizado o Update 4 para Delphi XE2 e C++Builder XE2
• Disponibilizado Update 2 para Delphi XE2, C++Builder XE2 e RadPHP XE2
• Hotfix 2 e Help Update 2 para Delphi XE, C++Builder XE e RAD Studio XE
• Update 1 para Delphi XE e C++Builder XE disponível para download
• Disponibilizado o Hotfix 2 para RAD Studio 2010
• Disponibilizado o Update 4 e 5 para RAD Studio 2010, Delphi 2010 e C++Builder 2010

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse