Disponível ASP.NET MVC 3 Release Candidate

Salve, salve amigos,

O Team do ASP.NET MVC, disponibilizou a versão RC do ASP.NET MVC 3. Veja aqui, quais são as principais novidades introduzidas nesta versão.

Have a nice day.

All the best!

Microsoft Visual Studio 2010 Language Pack

Salve, salve amigos,

Clique no link abaixo, e faça o download dos pacotes de idiomas do Visual Studio 2010 são complementos gratuitos que podem habilitar o usuário a alternar a interface do usuário do Visual Studio Professional em inglês para idiomas localizados.

Clique aqui.

Take care

Video Aula - Utilizando Firebird no Visual Studio 2010

Salve, salve amigos

Take care

Video Aula - Themes And Skins

Salve, salve amigos

Take care

Resumo da Delphi Conference 2010 Brasil

 

Salve, salve amigos,

Andreano Lanusse, descreve um resumo da Delphi Conference Brasil 2010.

Ontem (26/Outubro) realizamos o Delphi Conference 2010 Brazil, o maior e principal evento para desenvolvedores Delphi do Brasil, foram 26 palestras onde os palestrantes abordaram os mais variados temas, como: Delphi XE, iPhone, Android, DataSnap, Cloud Computing, PHP, VCL, MVC, mapeamento objeto relacional, reconhecimento facial, NF-e e mini-cursos e muitos outros temas.

Foram aproximadamente 600 desenvolvedores Delphi no evento, onde tinhamos desenvolvedores em todos os níveis de conhecimento, uma ótima surpresa foi a grande quantidade de novos desenvolvedores Delphi que estavam ali para conhecer mais e acelerar seu conhecimento. O Brasil estava todo representando, desenvolvedores de todos os cantos do Brasil.

Tivemos o Keynote de abertura com o David I (VP de relacionamento com desenvolvedores) onde foi apresentando um preview do compilador 64 bits e de uma aplicação Delphi rodando em Mac, além disso David falou sobre o futuro do Delphi que sem dúvida é brilhante.

Esse ano demos um enfoque muito grande ao DataSnap, grande parte do conteúdo abordava o tema e as tecnologias envolvidas no desenvolvimento de aplicações multicamada, o feedback foi sensacional.

Durante o evento as mensagens no twitter enviadas por aqueles que ali estavam mostravam o sucesso, veja o que a comunidade dizia aqui.

Durante o encerramento vários prêmios foram sorteados: componentes da TMS Software, assinaturas da revista Blase Pascal, assinaturas da ActiveDelphi licença de RAD Studio XE, etc. Além disso tivemos a entrega do prêmio “Delphi Brazil Community Award”, este prêmio é um reconhecimento ao trabalho feito na comunidade Delphi, geralmente homenageamos uma pessoa, mas este ano homenageamos o DUG-RS, grupo de usuários Delphi do Rio Grande do Sul, pois o grande trabalho feito durante o ano envolvia várias pessoas, o prêmio foi muito merecido, parabéns ao DUG-RS.

Nós da Embarcadero só temos a agradecer a todos aqueles que fizeram parte deste evento, a comunidades, aqueles que foram ao evento, nossos parceiros, aos palestrantes e todos aqueles que não puderam estar mas que de alguma forma nos ajudaram, MUITO OBRIGADO!!!!

Abaixo algumas fotos do evento, várias outras foram publicadas na comunidade Delphi Brasil do Facebook

 

Take Care

Dicas Delphi - Preencher com ZEROS à esquerda

Salve, salve amigos

// No Evento OnExit de um componente Edit1 por exemplo

procedure TForm1.Edit1Exit(Sender: TObject);

var x : Integer;

begin
   if (edit1.text<>' ') then
     begin x := strtoint(edit1.Text);
        edit1.Text:= Format('%6.6d',[x]);
        // Definiu o texto como tendo 6 caracteres inteiros, ou seja, 6 números.
        // Basta trocar este valor para mais ou menos de acordo com a sua necessidade.
     end;

//   Na propriedade MaxLength (no object inspector) do edit1,
//   defina também o valor com o mesmo número de caracteres usado na codificação acima.

Take care

Dicas Delphi - Retornar as Iniciais de uma String

Salve, salve amigos,

// função retorna as iniciais de uma String. Ex: 'Saída por Consumo' vai retornar SPC
 

Function retornaIniciais(x: String): String;
var
   i:Integer;
   aux:String;
   iniciais:String;
begin
        iniciais:='';
        aux:=Trim(x);
        if aux<>'' then
        begin
           iniciais:=MidStr(aux,1,1);
           i:=AnsiPos(' ',aux);
            while i>0 do
              begin
                iniciais:=iniciais+MidStr(aux,i+1,1);
                aux:=midstr(aux,1,i-1)+MidStr(aux,i+1,length(aux));
                i:=AnsiPos(' ',aux);
            end;//
            while i>0 then
        end;
        if aux<>'' then
        Result:=UpperCase(iniciais);
end;

Take care