9/22/2007

[C#] TextBox só de Inteiros

Duas forma simples de deixar o TextBox apenas aceitando valores inteiros. Segue o código abaixo:

public void validarCaracInt(KeyEventArgs e)
{
if (!Char.IsNumber((char)e.KeyValue) | e.Shift)
{
if (e.KeyCode == Keys.Back || e.KeyCode == Keys.Delete || e.KeyCode == Keys.Left || e.KeyCode == Keys.Right)
e.SuppressKeyPress = false;
else
e.SuppressKeyPress = true;
}
else if (e.KeyCode == Keys.OemPeriod || e.KeyCode == Keys.Oemcomma || e.KeyCode == Keys.OemMinus) //(.), (,) (-) são considerados numéricos
{
e.SuppressKeyPress = true;
}
}

public void validarCaracIntRegex(KeyEventArgs e)
{
if (Regex.IsMatch(((char)e.KeyValue).ToString(), "^[0-9]$"))
e.SuppressKeyPress = false;
else
e.SuppressKeyPress = true;

if (e.Shift)
e.SuppressKeyPress = true;

if (e.KeyCode == Keys.Back || e.KeyCode == Keys.Delete || e.KeyCode == Keys.Right || e.KeyCode == Keys.Left)
e.SuppressKeyPress = false;
}


E no evento Key Press do TextBox:

private void textBox1_KeyDown(object sender, KeyEventArgs e)
{
//validarCaracInt(e); // <--- Utilize este
validarCaracIntRegex(e); // <--- ou este. Fica a sua escolha
}

R$ 29,99

Já há algum tempo venho refletindo sobre o comércio brasileiro e como ele se comporta para ganhar a preferência nacional. A fórmula é bem simples, mas funciona como nunca em uma sociedade como a nossa.

A tática consiste sempre em levar vantagem ao comprador. Como todos sabem o brasileiro sempre quer levar vantagem em tudo, mesmo quando sabe que está sendo enganado. Comprar um produto com promoção de 30, 40, 50% sempre atrai uma parcela grande da população. Comprar em até 30, 4o, 50 vezes faz você acreditar que você está pagando aos poucos ao vendedor e por isso deixando-o em suas mãos.

Comprar para pagar só em janeiro também é uma tática de levar vantágem em relaçãos aos "otários" que não pegaram essa tal promoção e vão ficar sem grana por serem mais bobos que você. Comprar uma câmera que é a metade do preço que as concorrentes só pra levar vantágem sobre as outras empresas.

Será que comprando por R$ 19,99 eu estarei levando vantágem de alguma forma ? Será que todos pensam assim para o comércio se comportar desta forma ou estou pirando ?

"Vamos comprar que são os últimos dias" ou "é só até amanhã" são fases que caem em cheio no inconciente corrupto coletivo nacional. São por estas e outras que todos nós sabemos que eu me pergunto:

Por que nós não nos contentamos em pagar o preço que o nosso fornecedor deseja pelo seu trabalho e capacidade de venda ? Por que ele tem que sempre achar que agente quer levar vantagem ?

Por que eu somente me motivaria a comprar se fosse para levar vantagem sobre meus amigos e meus colegas. Estas perguntas estão sem respostas no meu inconsciente. Quem puder me ajudar por favor me escrevam.

Estou farto desta selva que é o Brasil e eu acho que não vou mais escrever Brasil com B maiúsculo. Que pena do meu brasil.

E a propósito, vai querer uma caneta por R$ 29,99 ?

Calheirisse

Calheirisse

Segue abaixo desabafo de mais um brasileiro descontente com a política brasileira nos "Anos de Lula"

COMENTÁRIO DE ARNALDO JABOR

DIA 13 DE SETEMBRO DE 2007

“Depois do suicídio do Senado ontem, hoje só nos restam maldições bíblicas. Assim, ó:

Malditos sejais, ó mentirosos, negadores, defraldadores, intrujões, embusteiros e vigaristas.
Que a peste negra vos cubra de feridas pútridas.
Que vossas línguas mentirosas sequem.
Que vossas patranhas se transformem em cobras, que se enrosquem em vossos pescoços, que entrem por vossos rabos e lá depositem venenosos ovos que vos depauperem em diarréias torrenciais.
Que vossas bocas se atrofiem em trapos pustulentos, que vos impedirão de beijar vossas amantes nos prostíbulos mentais onde viveis.
Malditos sejais ladrões, gatunos, raptoneiros dos dinheiros públicos dos quais agadanhais 20% de todos os orçamentos, deixando viadutos no ar, pontes no nada e crianças mortas de fome, mortas de tudo, enquanto trombeteais inocência e honradez nas tribunas.
Qual a maldição das pragas do Egito vos impeça de comer os frutos de vossas fazendas escravistas, a carne de vossas boiadas imaginárias.
Que não possais ter o pão de vossos fornos nem o milho de vossos campos.
Malditas sejam as caras de pau dos ladravazes com seus sorrisos asquerosos, de imunda honradez ostentada, tranqüilo cinismo baseado na legislação que vos protege há quatro séculos.
Malditos sejam os 40 mil canalhas infiltrados na máquina pública, emperrando-a e sugando as migalhas do Estado.
Tomara que sejais devorados pelos carunchos que rastejam nos arquivos empoeirados da burocracia que impede o país de andar para a frente.
Que a poeira dos arquivos-mortos vos sufoquem e envenenem como trigo roxo aos ratos.
Se esses canalhas prevalecerem sempre, voltará o dragão do atraso com sete cabeças e dez chifres e sete coroas em cada cabeça.
E a prostituta da miséria brasileira virá montada nele, berrando as blasfêmias todas, vestida de vermelho, segurando uma taça cheia de abominações e de suas fornicações.
E ela estará bêbada com o sangue dos pobres e em sua testa estará escrito: Mãe de Todas as Meretrizes, Mãe de Todos os Ladrões que paralisam o nosso País.
Portanto, só nos resta isso. Maldizer, como na Bíblia.
Que a peste negra vos devore a alma, políticos canalhas.
Que vossos cabelos com brilhantina vos cubram de uma gosma repulsiva.
Que vossas gravatas bregas vos enforquem.
E que vossos bigodes apodreçam no ar de Brasília.

9/15/2007

Elétrica



Resolvi hoje contar como está sendo minha experiência com elétrica nesta nova empreitada. A Celpe hoje é minha casa e a luta ainda é maior apesar da alegria de estar nesta grande empresa.

Primeiramente gostaria de falar um pouco da Imagem, um desejo distante para este amante do GIS e da TI. Estou muito feliz não por fazer parte apenas da Imagem e ter vivido este momento inesperadamente este ano, mas por fazer parte de um grupo de grandes intelectuais e mais importante de pessoas comprometidas com o trabalho e com a qualidade.

Fui lá na Imagem e conheci sua estrutura. Percebemos o quão é importante nosso projeto nos planos da Imagem no Brasil. Esta esperiência foi importante para sabermos que muitos estão de olho em nós e torcendo pelo nosso sucesso.

Mais adiante conhecemos a bela ciência que é a elétrica e todas as suas nuâncias para nos atender da melhor forma. O grau de complexidade da informação que chega na Celpe é invisível aos olhos dos contribuintes. Nós apenas imaginavamos a complexidade desta empresa mas nada se compara ao dia dia dela. Fazer o mundo brilhar a noite é um esforço de muitas pessoas e muitas cabeças.

Hoje quando sobrevoar à noite nosso país e mundo irei me emocionar muito mais ao ver as luzes pequenas desaparecendo no horizonte.

Não cabe neste momento falar das pessoas com quem estou tendo contato. Todas são de vital importância para mim. O carinho de todos tem me comovido. Gostaira apenas de falar do FIGURA que é o Matheus Zloccowicc uma das pessoas que faz da Imagem uma empresa muito bem servida de pessoal. Lembro também a Jorrell pela confiança. Tento diariamente mostrar minha gratidão por terem me servido esta oportunidade. Ana, Igor, João, Regina, José Maria e Nivaldo são pessoas especiais em minha vida.

Agora sobre elétrica e a Celpe:

A elétrica está me apaixonando também (Disjuntores, Alimentadores, Banco de Capacitores, Estais, Contrapostes, Aterramentos, Rede de Baixa, Rede de Alta, Chaveamento ...) a minha vida este ano gira em torno destes elementos e outros mais. O trabalho feito a 6 anos pela equipe da Celpe na criação de uma rede georreferenciada tornam meu respeito pela empresa maior do que antes.

Vou vivendo a vida com a Geometric Network e não mais sem ela.


Agora para os alunos de trigonometria no colégio e de grafos na faculdade não desligem a tomada pois um dia vocês poderão viver esta estória que estou vivendo e aquelas aulas serão uma feliz lembrança.

Boa sorte a todos. Boa sorte a mim. Feliz 2008 porque 2007 já é feliz.

Zeca.

Criar Bookmarks [ArcEngine]

Olá,

Gostaria de repassar o conhecimento de como criar Bookmarks em um menu em uma aplicação ArcEngine.

Segue primeiramente o código para adicionar itens no menu dinamicamente. Cria-se algumas variáveis membro na sua classe que contenha o menu.

IList tsItem2 = new List();
DlgFavoritos dlgFavoritos;
int index = 0;

Depois criamos o menu com um ítem Adicionar Favoritos...



Após isso no evento click() do menu adicione o seguinte código

private void adicionarFavoritoToolStripMenuItem_Click(object sender, EventArgs e)
{
string nomeFavorito;

try
{
if (dlgFavoritos == null)
{
dlgFavoritos = new DlgFavoritos();
dlgFavoritos.ShowDialog();
}
else
{
dlgFavoritos.ShowDialog();
}
}
finally
{
nomeFavorito = dlgFavoritos.txtBoxFavorito.Text;
if (( dlgFavoritos.BookmarkSolicitado ) && ( !existeNoMenu(nomeFavorito, menuStripPrincipal) ))
{
tsItem2.Add(new ToolStripMenuItem());
tsItem2[index].Name = nomeFavorito;
tsItem2[index].Text = nomeFavorito;
( (ToolStripMenuItem)menuStripPrincipal.Items[menuStripPrincipal.Items.Count - 2] ).DropDownItems.AddRange(new ToolStripItem[] { tsItem2[index] });
tsItem2[index].Click += new System.EventHandler(this.ZoomTo);
AddSpatialBookMark(axMapControlPrincipal.ActiveView, tsItem2[index].Name);
index++;
dlgFavoritos.BookmarkSolicitado = false;
MessageBox.Show("Favorito: " + nomeFavorito + " criado com sucesso.", "Informação", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else if (existeNoMenu(nomeFavorito,menuStripPrincipal) )
{
MessageBox.Show("Esta entrada no menu já existe favor tentar outro nome", "Alerta", MessageBoxButtons.OK, MessageBoxIcon.Warning);
}
}
}



este código adicionará item a item no menu associando o mesmo evento para todos os ítens.

Agora é só criar o método que adiciona o bookmark ao seu mapa e boa sorte.

Segue o método que faz a criação de bookmaarks

private void ZoomTo(object sender, EventArgs e)
{
irParaBookmark(axMapControl1.ActiveView, ( (ToolStripItem)sender ).Name);
}

public static void irParaBookmark(IActiveView activeView, String nomeBookMark)
{
for (int i = 0; i <>
{
if (aoiBookmark[i].Name == nomeBookMark)
{
aoiBookmark[i].ZoomTo(activeView.FocusMap);
activeView.Refresh();
}
}
}

#region variaveis bookmark
public static IList aoiBookmark = new List();
public static IMapBookmarks mapBookmarks;
public static int index = 0;
#endregion

public static void AddSpatialBookMark(IActiveView activeView, String bookmarkName)
{
if (activeView == null || bookmarkName == null)
{
return;
}
// Criar um novo bookmark e setar sua localização na extensão corrente do mapa atual
aoiBookmark.Add(new AOIBookmarkClass());

// Setar Bookmark para a extensão correte
aoiBookmark[index].Location = activeView.Extent;
aoiBookmark[index].Name = bookmarkName;

// Adiciona o bookmark à coleção de bookmark do mapa
// Para o ArcGIS Desktop isto irá adicionar o bookmark ao menu Bookmarks da visão
mapBookmarks = (IMapBookmarks)activeView; // Dynamic Cast
mapBookmarks.AddBookmark(aoiBookmark[index]);
index++;

}

Espero que lhes sejam útil pois é uma funcionalidade que melhora a produtividade de quem passa o dia trabalhando com mapas.

A Esri já possui sua própria ferramenta mas preferí customizá-la.


Ezequias.

Família



Minha família,

Estou cada dia mais feliz por ter uma família tão vibrante e linda como a minha. Infelizmente existem pessoas que não querem ver esta união mas
nós não ligamos. E como diz o meu cunhado Thiago:

Tá com raiva ?
De mim ?
Entra na fila.

Obrigado a todos que rezam pela nossa felicidade.
Zeca

6/20/2007

De volta ao GIS



Bem,

Estou de volta ao GIS. É impressionante como minha vida sempre segue por este rumo.

Parece-me que meu tio Arqueólogo tem dados suas forças lá perto de Deus. Bem cá estou novamente tentando me referenciar espacialmente neste mundo.

Estou muito feliz de poder contar realmente com amigos em todos os locais por onde passei sempre me surpreendendo com a colaboração e a simpatia de todos. Obrigado pela confiança de todos em meu trabalho. Espero atender a todas as espectativas.

No início do ano recebi uma proposta bem interessante da Imagem - Soluções em Inteligência Geográfica www.img.com.br e fiquei muito feliz por ser lembrado neste momento que a ESRI está de volta a minha terrinha.

Não conheço muito a história do GIS no Recife, mas pelos mestres de 1980 com que conversei tudo começou por este período por aqui e tudo foi muito rico e recompensador. Depois de algum tempo com o fim do projeto Unibase, tudo se acalmou e especialistas em tecnologias ficaram no comando (antes os profissionais de cartografia estavam na crista da onda).

Pelo que conversei também com a Imagem estes profissionais estão se afastando do negócio GIS que movimenta o mercado. Muitas novas tecnologias estão incorporadas ao GIS e estes profissionais não se adequam a estas novas possibilidades.

Bem, por fim concluo que está sendo uma experiência recompensadora trabalhar no setor de utilities aqui mesmo em minha cidade. Agradeço a toda a equipe e especialmente a Jorell, nosso gerente, pela confiança e empenho na solução de nossos problemas.

Por fim gostaria de agradecer a Neoenergia pela coragem de reabir este caminho e confiar no profissionalismo da Imagem. Esta coragem lhes será recompensada. Feliz 2007.

Ezequias

ps: Fotos do treinamento em São José dos Campos

4/20/2007

Delphi deadline

My Delphi deadline 2007-04-17

Goodbye Delphi.

3/23/2007

Duas lixeiras no gnome

Procedimento para remover uma lixeira que possa aparecer a mais na tela do gnome (distribuições mais novas) no Desktop e na barra inferior.

Segue abaixo como resolver o problema:

Entre no gconf-editor através do alt+F2 e lá na árvore de diretórios da
esquerda siga este caminho:

apps>nautilus>desktop

Desmarque o item trash_icon_visible e pronto. Nem sei se precisa deslogar do
gnome e relogar... veja aí.

Abraço
Ezequias

3/16/2007

Delphi: Testa se Impressora Ativa

Testando se a impressora matricial está ativa.

Impressão direto na porta de impressora.

Var TesteImpressora:TextFile;
Begin
try
// Teste da Impressora
AssignFile(TesteImpressora, 'LPT1:');
Rewrite(TesteImpressora);
Write(TesteImpressora,' '); // Mandando alguma coisa para a impressora
CloseFile(TesteImpressora);
.
.
.
//Continuando o programa normalmente.

except
CloseFile(TesteImpressora);
MessageDlg('Impressora inativa', mtError,[mbOK],1);
end
End;

2/24/2007

Chegando Lá


Acredito que estou quase chegando lá. Graças a política inteligente do governo federal de reduzir o imposto sobre notebooks e computadores de até R$ 2.500 a zero acredito que meu sonho está próximo de se realizar. Ufa finalmente.

Agora é só cruzar os dedos e pedir a Deus que tudo continue dando certo.

Por enquanto eu vou ficando com o compac Armada M300 da minha empresa.

Boa sorte a todos com seus sonhos tecnológicos. Só um comentário. Eu acho que depois da aquisição eu vou trabalhar mais (em casa). Fazer o que não é ?

Ezequias.

2/20/2007

Carnaval 2007


Bem gente,

Já foi a época de 4 dias de carnaval, muita suadeira e muito mais bebida. Hoje o carnaval tem outro sentido para mim.

Ao mesmo tempo que relembro o momento que reencontrei minha esposa para não mais largá-la, me faz gerar novas memórias com minha filhinha Rita. Estou muito feliz por trazê-la para seu segundo carnaval (mas o primeiro que ela entendeu e dançou no passo do maracatú).


Ver as novas experiências dos nossos filhos são momentos que não se descrevem, apenas se vêem e sentem. Se não fossemos movidos pelo medo hoje em dia, estaríamos muito mais felizes, mas ainda podemos brincar um pouco felizes.

Por pura sorte (eu considero assim) não sofremos problemas físicos ou materiais. Obrigado ao Papai Deus e a Santa Rita de Cássia. Nada nos acontecerá.

Viva o carnaval. Viva a alegria.

Deixo algumas fotos de Rita e nossa família. [Fotos]

Um abração a todos.