[delphi-br] Firebird no cliente ja com senha de outro programa

2008-05-08 Por tôpico Ricardo Bianchin
Quando uso o firebird troco a senha do sysdba para uma senha minha

num cliente ele ta usando um programa de terceiros q tb faz o mesmo

preciso desinstalar o programa dele pra usar o meu e desinstalar o meu
pra usar o dele

Os amigos tb passam por isto?
Tem alguma alternativa?





Re: RES: [delphi-br] Firebird no cliente ja com senha de outro programa

2008-05-08 Por tôpico Ricardo Bianchin
Oi, pessoal,
O programa que ja tem na máquina do cliente foi adquirido de uma
empresa e é passada para o firebird via programação
assim como no meu sistema

o cliente nao mantem mais contato com a empresa q desenvolveu aquele
sistema

o meu cliente nao sabe a senha do sysdba que a outra empresa colocou. 

entao eu tenho que desinstalar o firebird e reinstalar para colocar a
minha senha do sysdba para o meu sistema funcionar

a unica maneira q vi até agora é um dual boot! em cada boot um dos
sistemas!!! mas isto é impraticável!



--- Em delphi-br@yahoogrupos.com.br, Davi Eduardo Borges Wall
[EMAIL PROTECTED] escreveu

 A segurança do FireBird é bloquear o acesso ao arquivo FDB.
 
  
 
 De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em nome de Berdam
 Enviada em: quinta-feira, 8 de maio de 2008 09:23
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Firebird no cliente ja com senha de outro
programa
 
  
 
 põe a mesma senha do cliente do cara, mas ai abre uma bracha de
segurança
 
 Ricardo Bianchin [EMAIL PROTECTED]
mailto:ricardodeveloper%40yahoo.com.br  escreveu: Quando uso o
firebird troco a senha do sysdba para uma senha minha
 
 num cliente ele ta usando um programa de terceiros q tb faz o mesmo
 
 preciso desinstalar o programa dele pra usar o meu e desinstalar o meu
 pra usar o dele
 
 Os amigos tb passam por isto?
 Tem alguma alternativa?
 
 
 
 
 
 --
 Uberdam Cavaletti
 Formado em Tecnologia da Informação - Unoesc - Xxe
 Pós-graduado em desenvolvimento Java - Unoesc - Xxe
 
 -
 http://www.curricular.com.br/berdam
 
 Visite
 http://passandoveneno.blogspot.com
 --
 
 -
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
  
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] Re: Firebird no cliente ja com senha de outro programa

2008-05-08 Por tôpico Ricardo Bianchin
Bem, como eu sempre usei o sysdba somente fui verificar como se cria
um usuario

pelo q vi eu uso o gsec

mas como executo o gsec sem saber a senha do sysdba?

ou ha outro caminho pra criar um usuario que ainda nao vi?



--- Em delphi-br@yahoogrupos.com.br, Joao Morais [EMAIL PROTECTED] escreveu

 Ricardo Bianchin wrote:
  Quando uso o firebird troco a senha do sysdba para uma senha minha
  
  num cliente ele ta usando um programa de terceiros q tb faz o mesmo
  
  preciso desinstalar o programa dele pra usar o meu e desinstalar o meu
  pra usar o dele
  
  Os amigos tb passam por isto?
  Tem alguma alternativa?
 
 Sim. Não mexer no sysdba e criar um usuário para o seu banco.
 
 --
 Joao Morais





[delphi-br] Sublinhado do botao roubando foco do DBGrid

2008-04-30 Por tôpico Ricardo Bianchin
Alo a todos!

delphi 7, observei tanto no windows 2000 quanto no xp

Tenho num form um dbgrid e um bitbtn

No bitbtn tem uma action. na Caption da Action tem Executar ou
seja, o E fica sublinhado no botao.
Que eu sabia, só com Alt+E este botao seria executado.

Porém, com o foco no dbgrid, quando estou digitando, se calhar de eu
pressionar a letra E ele executa o botao!!!

pensei até q o teclado tivesse com alt preso, mas em qualquer
computador que tentei tá acontecendo isto

conferi se eu tava com alguma programaçao em algum keypress, keyup,
keydown e nao tenho nada programado

sei q a propriedade KeyPreview do form nao tem a ver com isto, mas fiz
um teste. mudá-la nao ajudou

dai eu fiz um teste: na action eu coloquei:

if dbgrid1.focused then
  exit;

o problema é q o dbgrid nao recebe a teclada. o E nao aparece!

a propriedade shortcut da action tá em branco

fiz uma solução porca no momento: tirei o  da caption da action! dai
funciona normal, o E aparece na dbgrid

alguem já observou isto? como driblar este problema?

após 18 anos nestas empresa vital eu nunca havia notado isto!!!




[delphi-br] Re: DBGrid.OnDrawColumnCell: como desenhar linha ativa

2008-04-17 Por tôpico Ricardo Bianchin
Hoje de manha eu tive uma idéia:
Criar um componente meu, filho de TDBGrid e tornar public a property Row;

mas acabei vendo no texto do Douglas, um link de um link de um link
pra cá:
http://delphi.about.com/od/usedbvcl/l/aa011004a.htm

resumo da opera (que achei feio pra caramba!)
vc cria apenas 
type
  TMinhaDBGrid=class(TDBGrid);

daí tudo que estiver protected, assim eu nao consigo:
DBGrid1.Row
TDBGrid(DBGrid1).Row

mas assim eu consigo:
TDMinhaBGrid(DBGrid1).Row

poxa! se ainda ta protected, eu nao poderia ascessar!!!
nao sou guru em OOP mas achei muito deselegante!

bem, pelo menos resolve o que eu quero...
no evento OnDrawColumnCell:

if DataSet.RecNo=TMinhaDBGrid(DBGrid1).Row then
begin
  DBGrid1.Canvas.Brush.Color := clSkyBlue;
end;
DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);

Um abraço ao Douglas e aos demais!



[delphi-br] Re: DBGrid.OnDrawColumnCell: como desenhar linha ativa

2008-04-17 Por tôpico Ricardo Bianchin
eu resolvo os problemas dos clientes somente com OOP desde o delphi 4

mas ainda tenho tanto o q aprender! nao sei se ser um eterno
principiante é emplogante ou desanimador! 

quando eu crio uma classe filha de TList e ela vai ter membros como
filhos de TObject eu crio a lista e seus metodos em um .pas e o item
em outro .pas

acabo criando arquivo individual pra tudo

nunca faço como o pessoal da borland que colocou um monte de coisas na
classes.pas, por exemplo

sempre achei mais facil a manutencao assim

quando aprendi OOP no help do delphi 4, levei quase um ano futucando,
simulando, errando... e li muito os helps das versoes seguintes. mas
até o delphi 7 nunca vi este conceito lá. será que tem isto no help?

agora tenho uma mudanca na definicao da seção private, pois ela pode
ser acessada por outra classe contanto que ambas estejam na mesma unit!

com este conceito de friend classes, que lembra vagamente as homonimas
de c++ tenho um motivo pra colocar classes em uma mesma unit...

é outra forma de conceber a solução

ainda vou amadurecer a ideia, mas uma classe item vai encontrar mais
facil coisas da classe lista se ambas estiverem na mesma unit. uma
classe toolbar e as classes toolbutton tb poderiam ficar juntas...

mas no fundo no fundo vejo isto como errado! propriedades devem ser a
via de acesso preferida a coisas privates de uma classe. bem, como eu
disse, ainda tenho q amadurecer a ideia...



[delphi-br] DBGrid.OnDrawColumnCell: como desenhar linha ativa

2008-04-16 Por tôpico Ricardo Bianchin
Bom dia.

Usando Delphi 7.
Num DBGrid coloquei DefaultDrawing=False

Desejo desenhar a celula ativa (que estiver no registro atual) em azul
e as celulas vizinhas desta celula, com uma cor de fundo suave, pro
usuario saber onde ele está

o usuario não achou suficiente a propriedade options com dgIndicator
pois nao da o retorno visual suficiente. 

no evento OnDrawColumnCell tudo funciona bem
ele me dá a informacao da Column que vou desenhar
Com ela eu descubro o Column.Field. 
Mas nao achei ainda uma via de saber se a celula que estou desenhando
representa o registro atual. 

nos exemplos q ja vi usam o conteudo do campo atual pra saber a cor a
usar. mas se calhar de a coluna nao ser chave unica eu nao tenho como
saber em q registro estou

No StringGrid eu tenho a propriedade Row, no dbgrid nao tem

Liguei em Options o dgRowSelect que resolveria meu probl, mas não
gostei pois, quando ligada, se tenho q rolar a scrollbar horizontal do
dbgrid bem pra direita pra acessar uma determinada coluna, ao clicar
nela, ele volta a LeftCol lá pra zero!
 
alguem tem uma idéia? parece q tem algo bem simples que me escapou!

Obrigado
Ricardo Bianchin



[delphi-br] Re: DBGrid.OnDrawColumnCell: como desenhar linha ativa

2008-04-16 Por tôpico Ricardo Bianchin
Obrigado Douglas, gostei do texto.

Mas veja esta situacao:

tenho um dataset com 10 registros e 4 colunas

o indicator está no terceiro registro e tenho q desenhar o datacol=3.

minha duvida é como saber se a celula q esta sendo desenhada está num
registro qualquer ou no terceiro registro.

outra coisa q tentei hoje e falhou: o state da celula vem só se for a
celula onde está o cursor. nas visinhas da mesma linha o state vem normal.






[delphi-br] Re: Tratando erros de um ClientDataSet

2008-03-30 Por tôpico Ricardo Bianchin
vou verificar

Me ocorreu hoje q vou colocar os next e prior dentro de blocos try
except pra silenciar os erros


--- Em delphi-br@yahoogrupos.com.br, Bruno Lichot [EMAIL PROTECTED]
escreveu

 Tem uma rotina base para tratamentos de erros no primeiro exemplo da
minha lista (http://cc.codegear.com/author/795118) no DM da aplicação
cliente win32, ela serve como base para tratamento de erros.
 
  
 
 A melhor forma seria utilizar um case pegando com o numero do erro. 
 
  
 
 Em uma edição recente da Active Delphi publiquei uma matéria
explicando bem passo a passo como fazer isso.
 
  
 
 Abs
 
 BL
 
  
 
 From: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] On Behalf Of Ricardo Bianchin
 Sent: sábado, 29 de março de 2008 22:46
 To: delphi-br@yahoogrupos.com.br
 Subject: [delphi-br] Tratando erros de um ClientDataSet
 
  
 
 Srs,
 Estou usando Firebird 1.54 e delphi 7
 Coloquei num projeto:
 SQLConnection
 SQLQuery
 DataSetProvider
 ClientDataSet
 DataSource
 DataControls
 
 Quando digito dados nos datacontrols em desacordo com as regras do
 negocio do BD, como por exemplo deixar um NOT NULL em branco e tentar
 fazer um Next, aparece uma mensagem de erro em ingles e depois chama o
 respectivo evento OnError do ClientDataset.
 
 Duas perguntas:
 1)Tem como eu inibir o disparar da exception para tratar nos eventos
 OnError do ClientDataSet?
 2)No evento BeforeScroll eu tenho como cancelar o Prior/Next que o
chamou?
 
  
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] Re: Tratando erros de um ClientDataSet

2008-03-30 Por tôpico Ricardo Bianchin
Bruno, 
vc nao está na lista de colunistas no site da Active Delphi.
tens algum link ou titulo da materia pra eu caçar?

--- Em delphi-br@yahoogrupos.com.br, Bruno Lichot [EMAIL PROTECTED]
escreveu

 Tem uma rotina base para tratamentos de erros no primeiro exemplo da
minha lista (http://cc.codegear.com/author/795118) no DM da aplicação
cliente win32, ela serve como base para tratamento de erros.
 
  
 
 A melhor forma seria utilizar um case pegando com o numero do erro. 
 
  
 
 Em uma edição recente da Active Delphi publiquei uma matéria
explicando bem passo a passo como fazer isso.
 
  
 
 Abs
 
 BL
 
  
 
 From: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] On Behalf Of Ricardo Bianchin
 Sent: sábado, 29 de março de 2008 22:46
 To: delphi-br@yahoogrupos.com.br
 Subject: [delphi-br] Tratando erros de um ClientDataSet
 
  
 
 Srs,
 Estou usando Firebird 1.54 e delphi 7
 Coloquei num projeto:
 SQLConnection
 SQLQuery
 DataSetProvider
 ClientDataSet
 DataSource
 DataControls
 
 Quando digito dados nos datacontrols em desacordo com as regras do
 negocio do BD, como por exemplo deixar um NOT NULL em branco e tentar
 fazer um Next, aparece uma mensagem de erro em ingles e depois chama o
 respectivo evento OnError do ClientDataset.
 
 Duas perguntas:
 1)Tem como eu inibir o disparar da exception para tratar nos eventos
 OnError do ClientDataSet?
 2)No evento BeforeScroll eu tenho como cancelar o Prior/Next que o
chamou?
 
  
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] Tratando erros de um ClientDataSet

2008-03-29 Por tôpico Ricardo Bianchin
Srs,
Estou usando Firebird 1.54 e delphi 7
Coloquei num projeto:
SQLConnection
SQLQuery
DataSetProvider
ClientDataSet
DataSource
DataControls

Quando digito dados nos datacontrols em desacordo com as regras do
negocio do BD, como por exemplo deixar um NOT NULL em branco e tentar
fazer um Next, aparece uma mensagem de erro em ingles e depois chama o
respectivo evento OnError do ClientDataset.

Duas perguntas:
1)Tem como eu inibir o disparar da exception para tratar nos eventos
OnError do ClientDataSet?
2)No evento BeforeScroll eu tenho como cancelar o Prior/Next que o chamou?





[delphi-br] Erro midas.dll mas ela nao faltando

2007-11-13 Por tôpico Ricardo Bianchin
Senhores,

eu mesmo fiz a o meu aplicativo de instalacao

trabalho com D7 e firebird 1.54

depois de instalar o firebird, meu sistema copia os dll e bpl do
delphi necessarios pro sistema funcionar, e nunca tive problemas

mas em uma maquina com WXP ta dando erro MIDAS.DLL
sempre q vejo um erro assim é pq ta faltando esta dll

só q ela com certeza esta no windows\system32

tentei até coloca-la na mesma pasta do .exe mas o erro persiste

alguem ja viu algo assim?

Ricardo Bianchin

ps.:
fugindo do assunto,
aproveito pra agradecer apoio de todos naquela pergunta se tem como
fazer join em tabelas de BDs distintos
resolvi usando os trigers!



[delphi-br] Re: Resolvido Erro midas.dll mas ela nao faltando

2007-11-13 Por tôpico Ricardo Bianchin
1) quanto aos arquivos do firebird, eu ainda nao sei,
o q faco por enquanto é q meu instalador abre o instalador do firebird
Sei q é uma solucao idiota mas será aprimorada

em breve devo aprender a fazer este scrip de instalacao. ainda nao
pesquisei isto, mas quando aprender posto aqui

2) realmente no reg estava uma pasta nada a ver
havia umas 10 ocorrencias e troquei para
c:\windows\system32\midas.dll
q é onde coloquei o arquivo.dll
o erro era:

Error loading MIDAS.DLL

resolveu! obrigado!


--- Em delphi-br@yahoogrupos.com.br, Nivaldo Stainle [EMAIL PROTECTED]
escreveu

 já tive problemas assim, em outras máquinas funciona e em outras não;
   resolvi assim:

   REGSVR32 c:\windows\system\midas.DLL

   Stainle
 
 Ricardo Bianchin [EMAIL PROTECTED] escreveu:
   Senhores,
 
 eu mesmo fiz a o meu aplicativo de instalacao
 
 trabalho com D7 e firebird 1.54
 
 depois de instalar o firebird, meu sistema copia os dll e bpl do
 delphi necessarios pro sistema funcionar, e nunca tive problemas
 
 mas em uma maquina com WXP ta dando erro MIDAS.DLL
 sempre q vejo um erro assim é pq ta faltando esta dll
 
 só q ela com certeza esta no windows\system32
 
 tentei até coloca-la na mesma pasta do .exe mas o erro persiste
 
 alguem ja viu algo assim?
 
 Ricardo Bianchin
 
 ps.:
 fugindo do assunto,
 aproveito pra agradecer apoio de todos naquela pergunta se tem como
 fazer join em tabelas de BDs distintos
 resolvi usando os trigers!
 
 
 
  
 

 -
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 
 
 [As partes desta mensagem que não continham texto foram removidas]





Re: [delphi-br] Firebird-Join entre BDs diferentes?

2007-10-23 Por tôpico Ricardo Bianchin
Robson,
como demorou a vir uma resposta eu tb postei esta pergunta na lista
firebird-br

segundo o pessoal de lá ainda nao dá
e espera-se q passe a fazer na versao 3.0

de qquer forma, obrigado pela atencao!

é q num banco tenho uma lista com datahora da ultima alteracao em cada
registro
e no segundo banco tenho uma repeticao desta tabela e quero atualizar
somente os registros atrasados

entao eu trago do primeiro banco a tabela e percorro ela num loop pra saber
qual reg devo atualizar na segunda tabela

se alguem tiver uma ideia melhor, agradeço!


Em 23/10/07, Robson [EMAIL PROTECTED] escreveu:

   Ricardo,
 eu trabalho com dois gdb's mas um select com tabelas dos dois bancos naum
 tentei ainda, vou fazer um teste hj a noite e mando a resposta, ok!


 Kaputz, Robson
 Skype: kaputz_gri

 Não pude escolher muitas coisas que nasceram comigo, mas posso escolher
 meu amigo..E nessa busca empenho a minha própria alma, pois com uma
 Amizade Verdadeira, a vida se torna mais simples, mais rica e mais bela...
 Charlie Chaplin .
 Keep the Dream Alive

 - Mensagem original 
 De: Ricardo Bianchin [EMAIL PROTECTED]ricardodeveloper%40yahoo.com.br
 
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Enviadas: Segunda-feira, 22 de Outubro de 2007 14:46:26
 Assunto: [delphi-br] Firebird-Join entre BDs diferentes?

 é possivel eu fazer join entre duas tabelas q estejam em diferentes
 arquivos de dados do Firebird?

 se sim, como é a sintaxe?

 Obrigado!

 Ricardo Bianchin

 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
 armazenamento!
 http://br.mail.yahoo.com/

 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Firebird-Join entre BDs diferentes?

2007-10-22 Por tôpico Ricardo Bianchin
é possivel eu fazer join entre duas tabelas q estejam em diferentes
arquivos de dados do Firebird?

se sim, como é a sintaxe?

Obrigado!

Ricardo Bianchin



Re: [delphi-br] [OFF] Por que TEdit para alterar campos?

2007-10-20 Por tôpico Ricardo Bianchin
é, meu objetivo nao é buferizar ou nao dados num dataset

o meu ponto é q nao posso usar dbgrid se o dataset vier do firebird pq ele é
unidirecional

anotei as sugestoes das outras mensagens e vou colcocar em pratica logo pra
ver se paro de digitar tantas linhas de codigo pra reinventar a roda


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] [OFF] Por que TEdit para alterar campos?

2007-10-19 Por tôpico Ricardo Bianchin
eu uso o D7 e nao achei o TDataProvider

fui no google e ta me dando indicios q so tem no D200x

sabem dizer se ele tem só nas versoes novas do delphi?
ou se é componente de terceiros?


Em 19/10/07, Andre Luis Silveria [EMAIL PROTECTED] escreveu:

   usamos com Firebir o trio TSQLQuery + TDataProvider + TClientDataSet e é
 só alegria ...

 Como já disseram aqui, tudo serve na programação basta saber como e onde
 aplicar.

 - Mensagem original 
 De: Ricardo Bianchin [EMAIL PROTECTED]ricardodeveloper%40yahoo.com.br
 
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Enviadas: Sexta-feira, 19 de Outubro de 2007 15:50:31
 Assunto: Re: [delphi-br] [OFF] Por que TEdit para alterar campos?

 Srs,

 no tempo do delphi 6 eu usava access

 sempre usei datawares

 ha 1 ano tive q migrar pro firebird

 quando fui usar os datawares me deparei/aprendi na marra q só podia fazer

 next e first num dataset, q nao poderia mais usar o DBGrid e etc

 na epoca tive q largar os datawares e usar o tedit, stringgrid.

 tentei usar o SimpleDataSet mas quando um dado quebrara uma regra de
 negocio

 no bd ele apenas nao gravava e nao se sabia pq nao gravou

 desde aquela epoca minha vida tem sido um inferno por nao poder usar

 datawares no firebird pq ele é um bd unidirecional

 realmente tenho q usar TEdits neste caso ou os amigos sabem de algo q

 buferise os dados num TDataset?

 [As partes desta mensagem que não continham texto foram removidas]

 !--

 #ygrp-mkp{
 border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px
 14px;}
 #ygrp-mkp hr{
 border:1px solid #d8d8d8;}
 #ygrp-mkp #hd{
 color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px
 0px;}
 #ygrp-mkp #ads{
 margin-bottom:10px;}
 #ygrp-mkp .ad{
 padding:0 0;}
 #ygrp-mkp .ad a{
 color:#ff;text-decoration:none;}
 --

 !--

 #ygrp-sponsor #ygrp-lc{
 font-family:Arial;}
 #ygrp-sponsor #ygrp-lc #hd{
 margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
 #ygrp-sponsor #ygrp-lc .ad{
 margin-bottom:10px;padding:0 0;}
 --

 !--

 #ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean,
 sans-serif;}
 #ygrp-mlmsg table {font-size:inherit;font:100%;}
 #ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
 sans-serif;}
 #ygrp-mlmsg pre, code {font:115% monospace;}
 #ygrp-mlmsg * {line-height:1.22em;}
 #ygrp-text{
 font-family:Georgia;
 }
 #ygrp-text p{
 margin:0 0 1em 0;}
 #ygrp-tpmsgs{
 font-family:Arial;
 clear:both;}
 #ygrp-vitnav{
 padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
 #ygrp-vitnav a{
 padding:0 1px;}
 #ygrp-actbar{
 clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
 #ygrp-actbar .left{
 float:left;white-space:nowrap;}
 .bld{font-weight:bold;}
 #ygrp-grft{
 font-family:Verdana;font-size:77%;padding:15px 0;}
 #ygrp-ft{
 font-family:verdana;font-size:77%;border-top:1px solid #666;
 padding:5px 0;
 }
 #ygrp-mlmsg #logo{
 padding-bottom:10px;}

 #ygrp-vital{
 background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
 #ygrp-vital #vithd{

 font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
 #ygrp-vital ul{
 padding:0;margin:2px 0;}
 #ygrp-vital ul li{
 list-style-type:none;clear:both;border:1px solid #e0ecee;
 }
 #ygrp-vital ul li .ct{

 font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
 #ygrp-vital ul li .cat{
 font-weight:bold;}
 #ygrp-vital a{
 text-decoration:none;}

 #ygrp-vital a:hover{
 text-decoration:underline;}

 #ygrp-sponsor #hd{
 color:#999;font-size:77%;}
 #ygrp-sponsor #ov{
 padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
 #ygrp-sponsor #ov ul{
 padding:0 0 0 8px;margin:0;}
 #ygrp-sponsor #ov li{
 list-style-type:square;padding:6px 0;font-size:77%;}
 #ygrp-sponsor #ov li a{
 text-decoration:none;font-size:130%;}
 #ygrp-sponsor #nc{
 background-color:#eee;margin-bottom:20px;padding:0 8px;}
 #ygrp-sponsor .ad{
 padding:8px 0;}
 #ygrp-sponsor .ad #hd1{

 font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
 #ygrp-sponsor .ad a{
 text-decoration:none;}
 #ygrp-sponsor .ad a:hover{
 text-decoration:underline;}
 #ygrp-sponsor .ad p{
 margin:0;}
 o{font-size:0;}
 .MsoNormal{
 margin:0 0 0 0;}
 #ygrp-text tt{
 font-size:120%;}
 blockquote{margin:0 0 0 4px;}
 .replbq{margin:4;}
 --

 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
 armazenamento!
 http://br.mail.yahoo.com/

 [As partes desta mensagem que não continham texto foram removidas]

  




-- 
Atenciosamente,
Ricardo Bianchin

Educating is having hope in the future!

Batman cured us of the fear of the dark.
Superman taught us to look to the light.

O que impressiona não é o grito dos maus;
é o silêncio dos bons.(M.L.King)



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] [OFF] Por que TEdit para alterar campos?

2007-10-19 Por tôpico Ricardo Bianchin
Srs,
no tempo do delphi 6 eu usava access
sempre usei datawares

ha 1 ano tive q migrar pro firebird

quando fui usar os datawares me deparei/aprendi na marra q só podia fazer
next e first num dataset, q nao poderia mais usar o DBGrid e etc

na epoca tive q largar os datawares e usar o tedit, stringgrid.
tentei usar o SimpleDataSet mas quando um dado quebrara uma regra de negocio
no bd ele apenas nao gravava e nao se sabia pq nao gravou

desde aquela epoca minha vida tem sido um inferno por nao poder usar
datawares no firebird pq ele é um bd unidirecional

realmente tenho q usar TEdits neste caso ou os amigos sabem de algo q
buferise os dados num TDataset?


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: Abstract Error

2007-10-17 Por tôpico Ricardo Bianchin
me aconteceu quando eu instalei um componente meu q tava com bug

eu desinstalei o componente, reinstalei o delphi e resolveu



[delphi-br] Re: String grid com uma celula dividida em 02.

2007-10-17 Por tôpico Ricardo Bianchin
pra q um texto ocupe mais de uma linha na mesma celula eu aumento a
altura da celula com a rowheights e uso o evento ondrawcell pra
desenhar o texto usando um canvas.textout pra cada linha de texto

a propriedade defaultdrawing deve estar false



[delphi-br] D7, height total de um popup menu antes de exibi-lo

2007-07-27 Por tôpico Ricardo Bianchin
olá,

quero descobrir o height total de um popup menu para poder chamar a
PopupMenu1.Popup(x,y)
quero calcular o valor de y antes de chamar o comando acima

sei q tem o evento OnMeasureItem, mas daí o menu já está sendo desenhado

o q influencia na altura de um tmenuitem (eu acho) é a fonte dos menus
indicada no painel de controle
tem como saber a fonte q está indicada lá para os menus?
tentei com a GetSystemMetrics e com a GetParameterInfo e nao consegui

alguem tem uma luz?

obrigado

Ricardo Bianchin



[delphi-br] Re: Banco apropriado

2007-01-27 Por tôpico Ricardo Bianchin
Pois eh, vai da historia pessoal do programador, com o q ele ja 
conviveu

eu ia responder q eu experimentaria o firebird pra ver como se 
comporta pois ateh agora nao me decepcionou

mas a minha maior tabela tem so 100.000 registros nao tudo aquilo

e tb nao experimentei com 500 conexoes simultaneas!

Ja q vc citou o MySQL desconfio q estes dois free se equiparem

e a versao free do oracle?
to por fora. vale conferir?



[delphi-br] erro na RTL70.BPL

2007-01-25 Por tôpico Ricardo Bianchin
pessoal,

w2000 e delphi7

uso o delphi normalmente, até escolher Run(F9)
dai quando eu fecho o executavel e tento trabalhar, em alguns
instantes dá o erro
acess violation na rtl70.bpl

isto so acontece em um projeto q uso muitos frames

ja desinstalei e reinstalei o delphi, ja deletei o arquivo dpr e
recriei o projeto reinserindo as units e continua o erro

pra prosseguir este trabalho tenho q 
executar o programa
sair do delphi
reentrar e consertar
sair do delphi
reentrar e executar
senao dá este erro e tranca tudo

alguem ja passou por isto?

obrigado



[delphi-br] Mudar diretorio Projects do delphi

2006-12-16 Por tôpico Ricardo Bianchin
Pessoal,

toda a vez q vou salvar um novo projeto o delphi sugere o diretorio
Projects
abaixo do diretorio do delphi em arquivo de programas

tem como eu mudar este default para ele ja abrir num diretorio meu?

T+, obrigado



[delphi-br] Re: Saber qual botão do formulário foi clicado

2006-12-16 Por tôpico Ricardo Bianchin
vc ja notou q num evento onclick se ve:

procedure TForm1.Button1Click(Sender: TObject);

O sender eh uma variavel q contem o q foi clicado, quer seja label,
botao...

vc deve testar com o is  pra saber o tipo do q foi clicado pra poder
converte-lo do tipo tobject para o q vc clicou

if sender is tbutton then
  showmessage( TButton(Sender).Name + ' foi clicado.');

ou vc pode testar se foi o button1 ou o button2 ou um label... q foi
clicado:

if sender is tbutton then
begin
  if sender = button1 then
coisa
end
else if sender is tlabel then
begin
  if sender - label1 then
outracoisa
end

dai vc pode criar só um evento onclic pra todo mundo



--- Em delphi-br@yahoogrupos.com.br, Cleiton [EMAIL PROTECTED] escreveu

 Oi pessoal
 
 Tem alguma forma de saber qual botão do formulário foi clicado? Se
tiver, como proceder?
 -- 
 Esta mensagem foi verificada pelo sistema de antivírus e
  acredita-se estar livre de perigo.
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





Re: [delphi-br] TMS -Async 32

2006-10-19 Por tôpico Ricardo Bianchin
nao entendi a sua pergunta

uso d7 tanto em 2000 qnto xp
e apenas o instalei

Em 19/10/06, Tatu-yahoogrupos[EMAIL PROTECTED] escreveu:
 alguem está utilizando em delphi 7 com win xp ?...nao consigo fazer ele
 funcionar...em win 2000 lembro ter conseguido.




 [As partes desta mensagem que não continham texto foram removidas]



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Links do Yahoo! Grupos






-- 
Atenciosamente,
Ricardo Bianchin

Educating is having hope in the future!


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 



Re: [delphi-br] Erro ao fechar o aplicativo

2006-09-26 Por tôpico Ricardo Bianchin
O João ta certo

imaggine q vc tem form1 e form2

no evento on close ou ondestroy de um vc ta citando o outro
como a aplic ta encerando o segundo ja foi destruido e o primeiro
tenta usa-lo, dai gera o erro


 Em 26/09/06, Joao Morais[EMAIL PROTECTED] escreveu:
  galvao_em wrote:
 
   olá, ao encerrar meu programa está dando o seguinte erro:
  
   A instrução no 0x21673d7a fez referencia à memória no 0x00e1d9a0. A
   memória não pôde ser written.
  
   após eu apertar OK vem a seguinte mensagem: Runtime error 216 at 21673D7A
  
   Já tentei rodar utilizando o F7 e o F8 mas não encontrei a causa do
   erro. Alguém tem alguma idéia de que pode ser?
 
  O seu programa está tentando acessar (no seu caso, escrever) em uma área
  de memória que já foi liberada, tal como uma tabela ou Query do data module.
 
  Se os seus forms são criados automaticamente, então mande criar primeiro
  aqueles que são utilizados por outros - como os data modules.
 
  Dizem que a madCollection ajuda a catar esse tipo de problema, nunca a
  utilizei pra poder te confirmar. Arrisca lá.
 
  --
  João Morais
 
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
  Links do Yahoo! Grupos
 
 
 
 
 
 


 --
 Atenciosamente,
 Ricardo Bianchin

 Educating is having hope in the future!



-- 
Atenciosamente,
Ricardo Bianchin

Educating is having hope in the future!


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: RES: RES: [delphi-br] delphi vs java

2006-09-14 Por tôpico Ricardo Bianchin
da pra criar um programa sem saber oop, mas ele nao vai ser de facil
manutencao e crescimento

criar um aplicativo como se fosse vb6 é o mesmo que criar uma
apresentação no power point

como o termo oop tava na moda a microsoft inventou o termo orientado a
eventos pra ter alguma orientação no seu produto.

repetindo da pra criar sem oop sim, trabalhar não


Em 14/09/06, Campus[EMAIL PROTECTED] escreveu:
 Mas essa infelismente é a relidade, Welson.

 A gente ve a todo momento o pessoal perguntando como se faz para alterar uma
 tabela num SGDB. Os caras se metem a fazer sistemas sem nem ao mesmo dominar
 o conhecimento do banco de dados que vão usar.

 Tem gente que não sabe nem fazer cálculos com datas, se for com horas então
 nem se fala, daí a montar classes, ou mesmo um registro para manipular dados
 a coisa vai longe.

 Eu particularmente conheço muitos programadores em Delphi, mas muito poucos
 mesmo que conhecem os tipos de dados e estruturas disponíveis. Manipulação
 de eventos, criação de componentes e DLLs são coisa de outro mundo.

 Como o Walter disse, para fazer um cadastro de produtos em Delphi é muito
 fácil, basta criar o banco, colocar os componentes de acesso, alguns DBWare,
 mais alguns botões e pronto. Mas bota numa peneira, quantos fazem idéia de
 como se calcula o custo médio ou o que é o peps.

 Como disse, essa é a realidade, cabe a cada um fazer a diferença, se
 aprofundar mais e conhecer a ferramenta que usa, para assim poder separar os
 homens dos meninos

 .

 - Original Message -
 From: Welson Avelar [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Thursday, September 14, 2006 5:10 PM
 Subject: Re: RES: RES: [delphi-br] delphi vs java


  --- Campus escreveu:
   (...)
   Sobre OOP, acho que não se faz nescessário saber a fundo sobre classes,
   Herança, Polimorfismo, para se usar um botão, da mesma forma que não é
   nescessário fazer um curso de mecânica para se dirigir um carro.
  [--x--]
 
  [Welson] Mas aí você corrobora a mediocridade existente no mundo do
  desenvolvimento. Pregar botão ?! Isso qualquer um faz. Mas se quiser um
 sistema
  que vai além de botões e edits, então tem mesmo que conhecer OO.
  Realmente, pra dirigir um carro não é necessário um curso de mecânica, mas
 até
  mesmo pra identificar um possível problema em certas partes e pra não ser
  enganado por entendidos de mecânica (que é o que mais tem por aí), é bom

  saber um pouco sim.
 
  []s.
 
  =
  O que me preocupa não é o grito dos maus. É o silêncio dos bons.
  Martin Luther King.
  =
  Welson de Avelar Soares Filho
  Analista/Programador Delphi
  Gemini Sistemas
  www.geminisistemas.com.br
  Juiz de Fora - Minas Gerais
  =
 
 
 
  ___
  O Yahoo! está de cara nova. Venha conferir!
  http://br.yahoo.com
 
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
  Links do Yahoo! Grupos
 
 
 
 
 
 
 



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos











-- 
Atenciosamente,
Ricardo Bianchin

Educating is having hope in the future!


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html