Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

2007-02-09 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Só pra não deixar o Rafael sem resposta, é, a resposta do Eric seria a mesma 
que a minha! rs... Põe uma propriedade no seu edit e, caso seja True para 
default (e não para o novo padrão), dá um inherited seguido de um exit na 
procedure :)

Abraços...
Henrique

  - Original Message - 
  From: Eric D. 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 5:36 PM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes


  Não seria somente criar uma propriedade do tipo UseDefaultLayout como 
boolean, e dentro da procedure que faz o repaint, vc verificaria esta 
propriedade... caso fosse false, então utilizaria apenas um inherited 
WMNCPaint Message); Exit; o que não iria alterar nada dentro do layout, caso 
contrário, vc faria as modificações

  Seria uma maneira simples de resolver... mas tem que testar pra ver se 
funciona x)

  []'s

  Eric D. - Desenvolvimento e Soluções de Tecnologia 
  [EMAIL PROTECTED] 
  Talk is cheap, show me the code... 
  - Original Message - 
  From: Rafael Marques 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 12:58 PM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  só + uma perguntinha tb!!

  eu fiz aqui e fico bem legal, inclusive coloquei a propriedade pro 
programador escolher a cor da borda!!

  mas como faço pra ativar ou desativar esse visual!??! (poderia ser atraves d 
uma propriedade do tipo sim/nao)

  eu tentei aqui e num consegui. Uma vez colocada procedure como vc me 
descreveu, o edit fica com visual excelente e do jeito q eu gostaria realmente, 
mas quero tentar colocar algo pra se o programador quiser q ele volte ao estilo 
normal ele consiga , e eu num achei nada q desative, q faça o compilador nao 
entrar na rotina descrita!!

  valeu

  Rafael

  - Original Message - 
  From: Henrique Netzka (Vetor Sistemas) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 11:45 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Caros Ricardos (ehehhehe),

  Já que o Berti lembrou a questão do xunxo, resolvi tentar fazer de um jeito 
não-xunxo! hehehe... Mas até que ficou simpes... Aliás, falar em xunxo, vocês 
já ouviram falar em POG? Dá pra dar umas boas risadas lendo sobre isso 
ehhehe... Enfim, veja:

  - Você herda o componente TEdit para o TColoredBorderEdit (hehehe)
  - No protected, você declara:

  procedure WMNCPaint(var Message: TWMNCPaint); message WM_NCPAINT;

  - E a implementação desta ficará assim:

  procedure TColoredBorderEdit.WMNCPaint(var Message: TWMNCPaint);
  var
  DC: HDC;
  Rect: TRect;
  Canvas: TCanvas;
  begin
  DC := GetWindowDC(Handle);
  try
  Windows.GetClientRect(Handle, Rect);

  // Limpa o fundo edit, pintando tudo da cor definida em Color (original) :)
  InflateRect(Rect, 4, 4);
  Brush.Color := Color;
  Windows.FillRect(DC, Rect, Brush.Handle);

  // Desenha a borda!
  Canvas := TCanvas.Create;
  try
  Canvas.Handle := DC;
  Canvas.Pen.Style := psSolid;
  Canvas.Pen.Color := clRed; // Cor da borda!

  Canvas.Brush.Style := bsClear;
  Canvas.Rectangle(0, 0, Width, Height);
  finally
  Canvas.Free;
  end;
  finally
  ReleaseDC(Handle, DC);
  end;
  end;

  - E pronto! Pra melhorar, em vez de deixar o clRed fixo ali, você pode criar 
uma propriedade no componente que diga qual será a cor da borda! E mais legal 
ainda, você pode sobrescrever os eventos DoEnter e DoExit para que, quando ele 
entre, você sete a borda de uma cor, e quando saia, sete a borda de outra cor!

  Abraços
  Henrique

  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 10:41 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Bom dia xará!

  Olha... a unica maneira de se criar esses TShapes dinamicamente seria como vc 
fez mesmo. Não existe outra alternativa. 

  Mas eu estava tentando achar no meio da JEDI VCL algum componente que tivesse 
essa propriedade que vc precisa, o que evitaria a criação de um TShape 
dinamicamente. Mas por enquanto não achei nada.

  Até o momento é asua dica que está valendo!

  Sds,
  Ricardo.

  Ricardo Berti [EMAIL PROTECTED] escreveu: Legal Ricardo (xará) : p ,

  foi bem essa mesmo a idéia, só que no meu caso ele coloca sozinho o TShape 
nos TEdit que estiverem na tela sem que haja TShape no form em tempo de 
projeto, se q for só um Edit no Form, vale mais já colocar o Shape em Tempo de 
Projeto mesmo ; ) Economiza memória!!!

  PS: Conheces alguma outra forma de criar dinamicamente os Shapes? Ou o xunxo 
(vi esse termo a uns dias aí na lista, rssrsrsr) que eu fiz é suficiente??

  Abraços e Bom Código!

  Ricardo Berti

  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 07, 2007 3:52 PM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Puts xará, fiz um

Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

2007-02-09 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Berti (já que Ricardo não é suficiente),

Em Component - New component você cria a classe; se baseie na TEdit e crie a 
TSeuEdit... No código, inclua as procedures conforme a dica! Depois, vá em 
Component - Install Component e dê um ok. Qd ele perguntar sobre recompilar 
o dclusr, clique sim; qd ele perguntar sobre salvar o dclusr, clique em sim! E 
pronto :)

Qualquer coisa, acho que nisso o Google te ajuda ;)

Abraços
Henrique

  - Original Message - 
  From: Ricardo Berti 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 2:35 PM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes


  Alguém pode me passar informações de como criar componetes descendentes de 
outros? Como o edit do exemplo??? Não tenho a menor ideia de criação de 
comnponete!!

  Abraços

  Berti... Ricardo Berti
  - Original Message - 
  From: Henrique Netzka (Vetor Sistemas) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 11:45 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Caros Ricardos (ehehhehe),

  Já que o Berti lembrou a questão do xunxo, resolvi tentar fazer de um jeito 
não-xunxo! hehehe... Mas até que ficou simpes... Aliás, falar em xunxo, vocês 
já ouviram falar em POG? Dá pra dar umas boas risadas lendo sobre isso 
ehhehe... Enfim, veja:

  - Você herda o componente TEdit para o TColoredBorderEdit (hehehe)
  - No protected, você declara:

  procedure WMNCPaint(var Message: TWMNCPaint); message WM_NCPAINT;

  - E a implementação desta ficará assim:

  procedure TColoredBorderEdit.WMNCPaint(var Message: TWMNCPaint);
  var
  DC: HDC;
  Rect: TRect;
  Canvas: TCanvas;
  begin
  DC := GetWindowDC(Handle);
  try
  Windows.GetClientRect(Handle, Rect);

  // Limpa o fundo edit, pintando tudo da cor definida em Color (original) :)
  InflateRect(Rect, 4, 4);
  Brush.Color := Color;
  Windows.FillRect(DC, Rect, Brush.Handle);

  // Desenha a borda!
  Canvas := TCanvas.Create;
  try
  Canvas.Handle := DC;
  Canvas.Pen.Style := psSolid;
  Canvas.Pen.Color := clRed; // Cor da borda!

  Canvas.Brush.Style := bsClear;
  Canvas.Rectangle(0, 0, Width, Height);
  finally
  Canvas.Free;
  end;
  finally
  ReleaseDC(Handle, DC);
  end;
  end;

  - E pronto! Pra melhorar, em vez de deixar o clRed fixo ali, você pode criar 
uma propriedade no componente que diga qual será a cor da borda! E mais legal 
ainda, você pode sobrescrever os eventos DoEnter e DoExit para que, quando ele 
entre, você sete a borda de uma cor, e quando saia, sete a borda de outra cor!

  Abraços
  Henrique

  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 10:41 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Bom dia xará!

  Olha... a unica maneira de se criar esses TShapes dinamicamente seria como vc 
fez mesmo. Não existe outra alternativa. 

  Mas eu estava tentando achar no meio da JEDI VCL algum componente que tivesse 
essa propriedade que vc precisa, o que evitaria a criação de um TShape 
dinamicamente. Mas por enquanto não achei nada.

  Até o momento é asua dica que está valendo!

  Sds,
  Ricardo.

  Ricardo Berti [EMAIL PROTECTED] escreveu: Legal Ricardo (xará) : p ,

  foi bem essa mesmo a idéia, só que no meu caso ele coloca sozinho o TShape 
nos TEdit que estiverem na tela sem que haja TShape no form em tempo de 
projeto, se q for só um Edit no Form, vale mais já colocar o Shape em Tempo de 
Projeto mesmo ; ) Economiza memória!!!

  PS: Conheces alguma outra forma de criar dinamicamente os Shapes? Ou o xunxo 
(vi esse termo a uns dias aí na lista, rssrsrsr) que eu fiz é suficiente??

  Abraços e Bom Código!

  Ricardo Berti

  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 07, 2007 3:52 PM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Puts xará, fiz um estudo de caso identico ao seu e fiquei com vergonha de 
publicar, mas no meu caso usei Left e Top -2 e Height e Width + 4.

  Segue abaixo o código:

  procedure TForm1.FormCreate(Sender: TObject);
  begin
  Shape1.Top := Edit1.Top -2;
  Shape1.Left := Edit1.Left -2;
  Shape1.Width := Edit1.Width + 4;
  Shape1.Height := Edit1.Height + 4;
  Edit1.Clear;
  Memo1.Clear;
  end;

  OBS: mudei o CTL3D e o BorderStyle em tempo de projeto, mas a lógica é a 
mesma.

  Ricardo Berti [EMAIL PROTECTED] escreveu: Aew Galera, fiz um pequeno 
estudo de caso, hehehe, e vejam o que consegui.
  Sou péssimo no que diz respeito a criação dinâmica de componentes, então, se 
tiver um jeito melhor, por favor, postem, assim eu aprendo tbm!!!

  Encham o seu form de edits e coloca isso no OnActivate.

  procedure TForm1.FormActivate(Sender: TObject);
  var
  I: Integer;
  Sp: TShape;
  begin
  for I := 0 to ComponentCount - 1 do
  begin
  if Components[I] is TEdit then
  with Components[I

Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

2007-02-09 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Beleza, Rafael, fico feliz que tenha ajudado!!

Abraços e boa sorte aí na sua nova palheta! Depois publica ela na internet :)
Henrique
  - Original Message - 
  From: Rafael Marques 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, February 09, 2007 9:14 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes


  consegui fazer aqui e funfo legal!!!

  agora to tentando adaptar esse esquema do visual em outros componentes 
(combobox, panel, etc..)

  valeu mesmo Henrique

  mto obrigado

  Rafael

  - Original Message - 
  From: Henrique Netzka (Vetor Sistemas) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, February 09, 2007 9:02 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Só pra não deixar o Rafael sem resposta, é, a resposta do Eric seria a mesma 
que a minha! rs... Põe uma propriedade no seu edit e, caso seja True para 
default (e não para o novo padrão), dá um inherited seguido de um exit na 
procedure :)

  Abraços...
  Henrique

  - Original Message - 
  From: Eric D. 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 5:36 PM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Não seria somente criar uma propriedade do tipo UseDefaultLayout como 
boolean, e dentro da procedure que faz o repaint, vc verificaria esta 
propriedade... caso fosse false, então utilizaria apenas um inherited 
WMNCPaint Message); Exit; o que não iria alterar nada dentro do layout, caso 
contrário, vc faria as modificações

  Seria uma maneira simples de resolver... mas tem que testar pra ver se 
funciona x)

  []'s

  Eric D. - Desenvolvimento e Soluções de Tecnologia 
  [EMAIL PROTECTED] 
  Talk is cheap, show me the code... 
  - Original Message - 
  From: Rafael Marques 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 12:58 PM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  só + uma perguntinha tb!!

  eu fiz aqui e fico bem legal, inclusive coloquei a propriedade pro 
programador escolher a cor da borda!!

  mas como faço pra ativar ou desativar esse visual!??! (poderia ser atraves d 
uma propriedade do tipo sim/nao)

  eu tentei aqui e num consegui. Uma vez colocada procedure como vc me 
descreveu, o edit fica com visual excelente e do jeito q eu gostaria realmente, 
mas quero tentar colocar algo pra se o programador quiser q ele volte ao estilo 
normal ele consiga , e eu num achei nada q desative, q faça o compilador nao 
entrar na rotina descrita!!

  valeu

  Rafael

  - Original Message - 
  From: Henrique Netzka (Vetor Sistemas) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 11:45 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Caros Ricardos (ehehhehe),

  Já que o Berti lembrou a questão do xunxo, resolvi tentar fazer de um jeito 
não-xunxo! hehehe... Mas até que ficou simpes... Aliás, falar em xunxo, vocês 
já ouviram falar em POG? Dá pra dar umas boas risadas lendo sobre isso 
ehhehe... Enfim, veja:

  - Você herda o componente TEdit para o TColoredBorderEdit (hehehe)
  - No protected, você declara:

  procedure WMNCPaint(var Message: TWMNCPaint); message WM_NCPAINT;

  - E a implementação desta ficará assim:

  procedure TColoredBorderEdit.WMNCPaint(var Message: TWMNCPaint);
  var
  DC: HDC;
  Rect: TRect;
  Canvas: TCanvas;
  begin
  DC := GetWindowDC(Handle);
  try
  Windows.GetClientRect(Handle, Rect);

  // Limpa o fundo edit, pintando tudo da cor definida em Color (original) :)
  InflateRect(Rect, 4, 4);
  Brush.Color := Color;
  Windows.FillRect(DC, Rect, Brush.Handle);

  // Desenha a borda!
  Canvas := TCanvas.Create;
  try
  Canvas.Handle := DC;
  Canvas.Pen.Style := psSolid;
  Canvas.Pen.Color := clRed; // Cor da borda!

  Canvas.Brush.Style := bsClear;
  Canvas.Rectangle(0, 0, Width, Height);
  finally
  Canvas.Free;
  end;
  finally
  ReleaseDC(Handle, DC);
  end;
  end;

  - E pronto! Pra melhorar, em vez de deixar o clRed fixo ali, você pode criar 
uma propriedade no componente que diga qual será a cor da borda! E mais legal 
ainda, você pode sobrescrever os eventos DoEnter e DoExit para que, quando ele 
entre, você sete a borda de uma cor, e quando saia, sete a borda de outra cor!

  Abraços
  Henrique

  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 08, 2007 10:41 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Bom dia xará!

  Olha... a unica maneira de se criar esses TShapes dinamicamente seria como vc 
fez mesmo. Não existe outra alternativa. 

  Mas eu estava tentando achar no meio da JEDI VCL algum componente que tivesse 
essa propriedade que vc precisa, o que evitaria a criação de um TShape 
dinamicamente. Mas por enquanto não achei nada.

  Até o momento é asua dica que está valendo!

  Sds,
  Ricardo.

  Ricardo

Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

2007-02-08 Por tôpico Henrique Netzka \(Vetor Sistemas\)

  - Original Message - 
  From: Rafael Marques 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 07, 2007 11:31 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  eu tentei pelo canvas mas tomei um pau danado e num consegui

  :(

  eheheehheheheeh

  procurei nuns sites e num achei!! talvez alguem tenha algum exemplo

  - Original Message - 
  From: Henrique Netzka (Vetor Sistemas) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 07, 2007 10:11 AM
  Subject: Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Canvas! hahahahaha

  não tenho uma solução melhor, desculpe rs. Só não sei se é tão 
simples, já que o Delphi provavelmente mande o Windows desenhar os controles ao 
invés de ele mesmo fazê-lo...

  abraços

  - Original Message - 
  From: Rafael Marques 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 07, 2007 8:38 AM
  Subject: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

  Bom Dia!!

  alguem sabe como alterar a cor da linha do contorno dos componentes qdo 
desabilitamos a propriedade CTRL3D???

  por exemplo os Edits. eles ficam sem o relevo e com o contorno em linha 
preta!! eu gostaria de , por exemplo, trocar a cor dessa linha pra azul ou 
vermelho

  mto obrigado!!

  Rafael

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

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

  --
  Esta mensagem foi verificada pelo E-mail Protegido Terra.
  Scan engine: McAfee VirusScan / Atualizado em 06/02/2007 / Versão: 5.1.00/4957
  Proteja o seu e-mail Terra: http://mail.terra.com.br/ 

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

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

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

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.yahoo.com/ 

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

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





  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.yahoo.com/ 

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



   

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



Re: [delphi-br] Desenvolvendo Mini-Chat dentro da aplicação.

2007-02-07 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Olá, Jorge...

O problema foi o nome da máquina? Porque se o resto você manja, tenho duas 
opções pra te sugerir...

A primeira é esquecer sockets e fazer via banco de dados, com um timer que 
cheque numa tabela por mensagens novas - e não lidas. O legal disso é que fica 
tudo arquivado sem grande esforço

A segunda é a seguinte... Caso você vá operar apenas numa rede interna, você 
pode trabalhar com mensagens de broadcast para descobrir quem é supervisor 
logado... Por exemplo, quando um operador se loga você envia um broadcast pra 
rede (UDP no X.X.X.255) perguntando por supervisores; no seu sistema, um 
listener UDP deve receber este broadcast, interpretá-lo como uma pergunta e 
responder para o solicitante dizendo ser um supervisor (caso ele seja, 
logicamente). A partir deste momento você sabe para quem você pode mandar as 
mensagens, pois você tem o nome do supervisor (a resposta lhe enviou isto) e 
tem o endereço IP da máquina (a resposta também lhe enviou). A partir daí, é só 
mandar, via UDP ou via TCP (UDP é legal porque não precisa de conexão, mas TCP 
é mais confiável), um pacote pra máquina com a mensagem de texto... Parece bem 
mais complexo ,mas é bem mais simples e funciona bem melhor (na minha opinião!)

Fiz um jogo de Tetris pra ser jogado em até 254 máquinas de uma mesma rede... 
Quando 2 máquinas da mesma rede iniciam o jogo, a tela dos outros jogadores 
aparece do lado da sua e você pode visualizar todos jogando... Consegui isso 
sem saber o IP de ninguém, só com broadcast... É claro, se isso fosse numa 
empresa grande, congestionaria tudo! :) Mas afinal, ninguém mandou jogar Tetris 
na empresa hehehehe

Abraços
Henrique Netzka
  - Original Message - 
  From: Jorge Ericsson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 06, 2007 6:38 PM
  Subject: [delphi-br] Desenvolvendo Mini-Chat dentro da aplicação.


  Olá pessoal,

  Gostaria de criar um mini-chat dentro de uma aplicação para CALL CENTER que
  estou desenvolvendo.
  Só que ela deve funcionar de maneira simples e mais simplificada da seguinte
  forma:

  Criei dois Array's com os Logins de todos os supervisores da aplicação e
  outro contendo o logins dos Operadores (para evitar uso de tabelas)
  Os operadores poderão enviar msgs apenas para os Supervisores que ele deseja
  e os Supervisor que receber a msgs terá de enviar apenas para o operador que
  iniciou o papo.

  Os outros operadores não poderão ver a msg de outro operador à algum
  supervisor.

  Sei que é muito complicado, mais antes gostaria de saber se tem alguém na
  lista que já desenvolveu algo ou pensa em desenvolver junto comigo para que
  possamos aprender todos.
  Creio que será útil para qq programa que trabalhe em rede com mais de um
  usuário.

  Já consegui simular minha idéia com o net send mais esbarrei no problema
  (nome da máquina na rede), por isso decide trabalhar com o longin de cada
  usuário que já logou no sistema.

  Alguém pode me ajudar nesse problema ?

  Grande abraço a todos,

  Jorge Ericsson
  Brasília-DF

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



   

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



Re: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes

2007-02-07 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Canvas! hahahahaha

não tenho uma solução melhor, desculpe rs. Só não sei se é tão 
simples, já que o Delphi provavelmente mande o Windows desenhar os controles ao 
invés de ele mesmo fazê-lo...

abraços

  - Original Message - 
  From: Rafael Marques 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 07, 2007 8:38 AM
  Subject: [delphi-br] Mudar Cor da Linha do Contorno dos Componentes


  Bom Dia!!

  alguem sabe como alterar a cor da linha do contorno dos componentes qdo 
desabilitamos a propriedade CTRL3D???

  por exemplo os Edits. eles ficam sem o relevo e com o contorno em linha 
preta!! eu gostaria de , por exemplo, trocar a cor dessa linha pra azul ou 
vermelho

  mto obrigado!!

  Rafael

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



   

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



Re: [delphi-br] Abrir form antes do principal

2007-02-05 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Você pode também programar no DPR do seu projeto!! Procure no Google por forms 
de login no Delphi, normalmente é pra isso que se usa essa programação :)

Abraços
Henrique
  - Original Message - 
  From: Claudiney Cogo - Listas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, February 05, 2007 9:51 AM
  Subject: Re: [delphi-br] Abrir form antes do principal


  Bom dia...

  pelo que entendi você quer abrir pra cadastrar a empresa caso ainda não tenha 
o registro no banco de dados, ok???

  Acredito que você possa fazer da seguinte maneira... no evento Activate do 
form principal você faz o teste se existe o registro da empresa e caso não 
exista você chama o form de cadastro da empresa de forma modal (showmodal) e 
faz o cadastro. Depois segue o sistema normalmente. Na próxima vez o cadastro 
já vai existir e ele passa direto por essa rotina.

  Abraço.

  Claudiney Cogo
  [EMAIL PROTECTED]
  N2 Sistemas e Soluções em Informática Ltda.
  Av. São Paulo, 172 - 15º Andar - Sala 1505
  CEP 87013-908 - Maringá - Pr
  Telefone: 44- 3222-6053

  - Original Message - 
  From: nillgolv 
  To: delphi-br 
  Sent: Sunday, February 04, 2007 3:26 PM
  Subject: [delphi-br] Abrir form antes do principal

  Pessoal,

  Venho pedir uma ajuda pois não consigo fazer, algo que ja vi em software.

  Quero que após ter isntalado o projeto, que ao executa-lo após a instalação, 
ele da show do form cadastro da empresa, sendo assim após já ter cadastrado ele 
não apresente mais o form ao abrir o projeto e se precisar de abrir depois que 
seja no menu.

  Acredito que deu para entender.

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

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



   

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



Re: [delphi-br] BPL

2007-02-01 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Adauri,

Você tem duas opções...

Uma delas é enviar, sempre, o frm_Basico nos seus pacotes. Para isso, um pacote 
NÃO PODE ter relação direta com o outro. Ou seja, no requires do seu pacote 
VENDAS, o pacote FINANCEIRA NÃO pode estar!

Outra opção é você criar um pacote Modelos ou algo assim, e dentro deste 
colocar seus modelos. Daí, nos outros pacotes, você coloca no requires este 
pacote (Modelos), e em nenhum deles você vai incluir diretamente o frm_Basico. 
Ao criar um novo form, o Delphi incluirá no seu pacote o frm_Basico. Porém, 
você o exclui do pacote pois ele só deverá estar contido no modelo!

Espero ter sido claro..

Abraços
Henrique
  - Original Message - 
  From: Adauri Antonio Camacho Junior 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 01, 2007 10:59 AM
  Subject: [delphi-br] BPL


  Bom dia a todos.

  Eu estou mandando varias perguntas sobre BPL e DLL, porque eu quero 
modularizar meu sistema e estou estudando a melhor forma. É o seguinte. eu 
tenho um FORM padrão, chamado de FRM_BASICO, todos os FORMs do meu sistema 
herdam dele. Criei uma package chamada FINANCEIRA, adicionei o FRM_BASICO 
dentro dela, criei meus forms tudo herdando do FRM_BASICO dentro do package, 
funcionou perfeitamente. Porem, fui criar a segunda package, chamada VENDAS, 
fui adicionar o FRM_BASICO e o Delphi deu um mensagem, que o FRM_BASICO já 
estava sendo usada na package FINANCEIRA. Como eu faria para usar o FRM_BASICO 
em varias packages ?

  Espero ter sido claro...

  Obrigado

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



   

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



Re: [delphi-br] Bloquear evento AfterScroll

2007-01-31 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Ah... então, xunxo pra resolver isso é o que não falta! Você pode desenhar um 
retângulo cinza (da cor do fundo) em cima do Scroll, ele não vai aparecer :)

Mas se você quer fazer um treco xique, copie e cole o fonte do componente 
TDBGrid e remova o Scroll dele :D

Ou faz o que nosso amigo falou, no BeforeScroll checa se o mouse está dentro do 
grid! rs

  - Original Message - 
  From: Alisson Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 30, 2007 5:36 PM
  Subject: Re: [delphi-br] Bloquear evento AfterScroll


  Eu não me expressei bem. Na verdade o que eu quero é que o dataset não mude 
de registro ao clicar na barra de rolagem, se clicar em uma linha não poderá 
ser bloqueado a mudança de registro. Se eu colocar o Abort no BeforeScroll vai 
travar tudo.

  no BeforeScroll, use Abort;

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



   

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



Re: [delphi-br] Chamar form pelo nome. Help-me!

2007-01-30 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Fala Thiago!

Dê uma olhada no histórico da lista, rolou uma discussão sobre isso há pouco 
mais de 1 semana...

Abraço..
  - Original Message - 
  From: thi_nazireu 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, January 29, 2007 12:51 PM
  Subject: [delphi-br] Chamar form pelo nome. Help-me!


  Galera, boa tarde!

  to com um problema aqui.

  Vcs sabem como acessar um form pelo nome?

  situação:

  Quero acessar determinados forms por parâmentro, para isso terei uma
  lista onde é difinido o nome do form a ser acessado, referenciado pelo
  seu parametro.

  ex: 
  parametro: FORMULARIO-1 = form1

  assim o parametro que irei passar eh FORMULARIO-1 e entao sera chamado
  o form1 atraves de uma funcao generica:

  Application.CreatForm('T'+nomeform, nomeform);
  Application.ShowModal.

  onde nomeform é uma variável do tipo string 
  tem como converter essa string em TClass e TForm.. ou mesmo acessar
  dessa maneira??

  é possível fazer algo assim?

  Aguardo sugestões.

  Obrigado a todos.

  Thiago Filiano
  11-8288-4402



   

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



Re: [delphi-br] Servico em deplhi com janelas

2007-01-30 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Gabriel O que você pode fazer é o que muitos serviços (como o SQL Server) 
fazem! Cria uma aplicação externa que monitore seu serviço e fique no systray...
  - Original Message - 
  From: Gabriel Filho 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 30, 2007 9:21 AM
  Subject: Re: [delphi-br] Servico em deplhi com janelas


  Ok, pessoal, muito obrigado pelas dicas, e tenho ciência de que um
  servico não possa ter mesmo a
  interacao com um usuário, porem no caso desse serviço, quando alguem loga na
  maquina, de tempos em
  tempos eu queria mostrar um form que se fecha automáticamente após, apenas
  informando o estado do
  servico em questão(pra ficar legal usando o efeito de esmaecimento chic no
  urtimo!!).
  Atualmente, meu servico informa esse estatos atravez de um log.txt,
  porém no log tem outra informações
  juntas e se tiver como por esta facilidade ficaria muito legal, ate mesmo
  para fazer monitoramento de mensagens
  postadas em uma base de dados, etc...
  As possíbilidade são inúmeras.

  2007/1/29, José Mário Silva Guedes [EMAIL PROTECTED]:
  
   Concordo em partes com o Thiago, porem pondero que um Serviço nao roda
   apenas enquanto o computador esta na tela de login e sim que JA roda mesmo
   antes da tela de login.
  
   Porem concordo que nao deve ser a primeira opcao.
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

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



   

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



Re: [delphi-br] Bloquear evento AfterScroll

2007-01-30 Por tôpico Henrique Netzka \(Vetor Sistemas\)
no BeforeScroll, use Abort;

:)

  - Original Message - 
  From: Alisson Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 30, 2007 9:16 AM
  Subject: [delphi-br] Bloquear evento AfterScroll


  Pessoal,

  Eu gostaria de deixar não mudar o foco quando se clica na barra de rolagem do 
DbGrid, mas é chamado o evento AfterScroll do ClientDataset, e assim o foco 
muda para o registro atual. Tem como bloquear isso?

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



   

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



Re: [delphi-br] Desmembrar string

2007-01-28 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Tem também o TStringList com DelimitedText...

  - Original Message - 
  From: Eduardo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 24, 2007 8:02 PM
  Subject: Re: [delphi-br] Desmembrar string


  Ta na mão.

  function SeparaTexto(pTexto : String; pSeparador : Char) : TStringList;
  var
  i : Integer;
  s : String;
  begin
  s := '';
  for i := 1 to Length(pTexto) do
  begin
  if pTexto[i]  pSeparador then
  s := s + pTexto[i]
  else
  begin
  Result.Add(Trim(s));
  s := '';
  end;
  end;
  end;

  Eduardo

  Lucas escreveu:
  
   Preciso desmembrar o caminho de pastas de arquivos, exemplo:
   tenho uma string com \pasta1\arquivos\dados
   preciso separar isto em 3 strings:
   pasta1
   arquivos
   dados
  
   lembrando que não da pra usar o copy porque os nomes das pastas podem
   ser de varios tamanhos. Alguém tem uma dica?
   Desde ja agradeço.
  
   Lucas.
  
   





  ___ 
  Yahoo! Mail - Sempre a melhor opção para você! 
  Experimente já e veja as novidades. 
  http://br.yahoo.com/mailbeta/tudonovo/ 


   

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



Re: [delphi-br] Form pelo nome

2007-01-24 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Opa, ok, vamos lá então...

Busca: 
http://www.google.com.br/search?hl=pt-BRq=findclass+delphi+registerclassmeta=
Resultado mais decente entre os primeiros 3 resultados: 
http://delphi.about.com/library/weekly/aa080905a.htm
Função que você vai precisar:  

procedure CreateFormFromName(
  const FormName : string);
var
  fc : TFormClass;
  f : TForm;
begin
  fc := TFormClass(FindClass(FormName));
  f := fc.Create(Application);
  f.Show;
end; (* CreateFormFromName *)

Em resumo... Você usa a função acima pra criar o form; as classes devem ser 
registradas com o RegisterClass (cfe vc vai ler no artigo), porém elas não 
precisam ser registradas todas no MainForm... É mais legal registrá-las no 
escopo initialization de cada unit, pq daí vc não precisa colocar as units no 
USES do seu MainForm (elas podem estar literalmente desconectadas).

Para tanto, na unit de CADA FORM, você coloca (no fim, antes do end.): 

initialization
  RegisterClass(TMeuForm);

finalization
  UnregisterClass(TMeuForm);

end.

Daí, na hora de criar, vc cria CreateFormFromName('TMeuForm'); e pronto

A função pode ser melhorada... vc pode conferir, por exemplo, se o form é 
fsMDIChild ou fsNormal, e se for fsNormal vc põe ShowModal, esse tipo de 
coisa...

Espero ter ajudado agora!!

Abraços,
Henrique





  - Original Message - 
  From: Adauri Antonio Camacho Junior 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 24, 2007 9:40 AM
  Subject: Re: [delphi-br] Form pelo nome


  É isso mesmo que eu quero, porem nao achei nada no google, pode me passa um 
exemplo.

  Obrigado

  Adauri Jr.

  - Original Message - 
  From: Henrique Netzka (Vetor Sistemas) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 23, 2007 8:35 AM
  Subject: Re: [delphi-br] Form pelo nome

  Opa!

  Se eu entendi direito... o que você está procurando é a criação de um form 
pela CLASSE. Neste caso, procure por criar form pela classe delphi no google 
que você encontra :)

  Keywords: RegisterClass, UnregisterClass, initialization, finalization, 
TFormClass, FindClass

  Abraços
  Henrique

  - Original Message - 
  From: Adauri Antonio Camacho Junior 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 23, 2007 8:14 AM
  Subject: [delphi-br] Form pelo nome

  Bom dia a todos, eu gostaria de chamar o form pelo nome, por exemplo, 
  gravo em um campo que o cadastro de cliente é o form FRM_CLIENTE, 
  quando chamasse o cadastro de cliente eu passaria o nome do form, eu 
  faria o create e o showmodal pelo nome do form. Alguem sabe como fazer 
  isso ?

  Obrigado

  Jr.

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

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



   

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



Re: [delphi-br] Funçao que tranforme Binario em INTE IRO

2007-01-24 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Mandando outra sugestão (haha, já que virou festa...)

function BinToDec(ABin: String): Integer;
var
  iAux: Integer;
begin
  iAux := 0;
  Result := 0;
  while (Length(ABin)  0) do
  begin
Inc(Result, StrToInt(AnsiLastChar(ABin)) shl iAux);
Inc(iAux);
Delete(ABin, Length(ABin), 1);
  end;
end;

Henrique



  - Original Message - 
  From: Rubem Nascimento da Rocha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 24, 2007 7:59 AM
  Subject: Re: [delphi-br] Funçao que tranforme Binario em INTEIRO


  Olhe as funções que eu postei na lista. Elas estão mais simples. Sds.

  From: Joao Morais [EMAIL PROTECTED]
  Reply-To: delphi-br@yahoogrupos.com.br
  To: delphi-br@yahoogrupos.com.br
  Subject: Re: [delphi-br] Funçao que tranforme Binario em INTEIRO
  Date: Tue, 23 Jan 2007 12:47:29 -0200
  
  Julio Cesar Quierati wrote:
Olá, pessoal.
   
estou precisando de uma função para transformar binario em inteiro, 
  utilizei estas duas funções abaixo mas nao estao retornando os valores 
  corretos, alguem sabe de outra que funcione ou o que esta ocorrendo com 
  essas funções ?
  
  Feito no improviso, vê se funciona:
  
  function BinToInt(const ABinStr: string): Integer;
  var
   I: Integer;
  begin
   Result := 0;
   for I := 1 to Length(ABinStr) do
   begin
   Result := 2 * Result;
   if ABinStr[I] = '1' then
   Inc(Result)
   else if ABinStr[I]  '0' then
   raise Exception.Create('não é binário');
   end;
  end;
  
  --
  João Morais
  
  
Function BinToInt(valor: string):longint;
var i, tamanho, np : Integer;
Begin
Result :=0;
tamanho := Length(valor);
For i:=0 to Tamanho-1 do
Begin
NP := strtoint(valor[tamanho-1]);
Result := Result + NP *Trunc(Power(2,i));
end;
end;
   
Function bintoint( valor:string): integer;
var i, tamanho : integer;
begin
result :=0;
tamanho:= length(valor);
for i:= tamanho downto 0 do
begin
if copy(valor,i,1)='1' then
begin
result := result +(1 shl i);
end;
end;
end;
  

  __
  MSN Messenger: converse com os seus amigos online. 
  http://messenger.msn.com.br



   

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



Re: [delphi-br] Form pelo nome

2007-01-23 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Opa!

Se eu entendi direito... o que você está procurando é a criação de um form pela 
CLASSE. Neste caso, procure por criar form pela classe delphi no google que 
você encontra :)

Keywords: RegisterClass, UnregisterClass, initialization, finalization, 
TFormClass, FindClass

Abraços
Henrique

  - Original Message - 
  From: Adauri Antonio Camacho Junior 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 23, 2007 8:14 AM
  Subject: [delphi-br] Form pelo nome


  Bom dia a todos, eu gostaria de chamar o form pelo nome, por exemplo, 
  gravo em um campo que o cadastro de cliente é o form FRM_CLIENTE, 
  quando chamasse o cadastro de cliente eu passaria o nome do form, eu 
  faria o create e o showmodal pelo nome do form. Alguem sabe como fazer 
  isso ?

  Obrigado

  Jr.



   

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



Re: [delphi-br] Automação Comercial

2007-01-19 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Olá, Ricardo!

Creio que contra as regras não seja, mas veja... com certeza muita gente aqui 
trabalha nesta área (eu memso presto serviços pra uma empresa que faz sistemas 
deste tipo), mas se um sistema desse, que é alugado, for colocado numa lista 
de discussão... faria sentido pra você?! Não leva a mal, mas isso seria quase 
como perguntar numa lista de discussão de marketing se alguém ali conhecia uma 
boa forma para isotônicos, pois a sua empresa gostaria de começar a produzi-lo 
:)

Mas já que você já tem um cliente, explore isso!! De opinião pessoal é a melhor 
forma de aprender um negócio...

Abraços
Henrique

  - Original Message - 
  From: Ricardo Berti 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 18, 2007 4:36 PM
  Subject: [delphi-br] Automação Comercial


  Olá Pessoal,

  eu estou querendo montar um sistema comercial, só que não sei o que colocar 
por exemplo, no cadastro de produtos, clientes, fornecedores, etc... Peguei 
bastante coisa da internet, sistemas prontos, mas sempre um pede coisas e outro 
pede coisas bem diferentes... Alguém sabe o que pode ser melhor para fazer 
cadastros em um sistema genérico? Tipo Cliente, Fornecedor, Produto, Contas 
Pagar/Receber, e/ou o que vai nesses? Eu to fazendo um colega que tem uma 
lojinha, mas quero ampliar ele pra poder vendar pra mais pessoas, mas preciso 
de algo pra poder oferecer

  Se esse tipo de dúvida vai contra regras ou coisa do tipo, por favor, 
desconsiderar! Se não, eu ficarei muito grato mesmo pela ajuda de você

  Abraços!

  Ricardo Berti

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



   

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



Re: [delphi-br] Re: Automação Comercial

2007-01-19 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Murillo,

Talvez tenha me expressado mal... Você já chegou em algum cliente que sabia 
dizer exatamente o que ele precisava? Bem, eu ainda não consegui ter clientes 
assim! Em geral eles têm problemas, e nós apresentamos uma solução! Ou essa é a 
idéia pelo menos... rs

De uma forma ou de outra, isso não era nem o ponto da discussão! E a nova 
discussão é mais off que a anterior, por isso to parando por aqui, antes que 
vire mais uma discussão sobre religião onde todo mundo quer mostrar que a sua é 
a melhor, na ânsia de conquistar mais fiéis...

Abraços
Henrique

  - Original Message - 
  From: Murillo Proença 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 19, 2007 9:51 AM
  Subject: [delphi-br] Re: Automação Comercial


  Uma coisa muito importante e que muitas empresas não fazem é
  desenvolver um sistema em cima de um conceito e não das necessidades
  do cliente. Exemplo, quando for montar um sistema de produção, leia
  sobre MRP, quando for contábil, leia sobre plano de contas e assim por
  diante.
  A chance do seu sistema ser amplamente aceito por diversos clientes
  vai ser muito maior quando você partir dos conceitos do negócio. Aí se
  algum cliente surgir com algo que só ele controla, você faz uma
  customizaçao só pra ele e cobra por isso.

  Abraço

  Murillo Proença

  --- Em delphi-br@yahoogrupos.com.br, Henrique Netzka \(Vetor
  Sistemas\) [EMAIL PROTECTED] escreveu
  
   Olá, Ricardo!
   
   Creio que contra as regras não seja, mas veja... com certeza muita
  gente aqui trabalha nesta área (eu memso presto serviços pra uma
  empresa que faz sistemas deste tipo), mas se um sistema desse, que é
  alugado, for colocado numa lista de discussão... faria sentido pra
  você?! Não leva a mal, mas isso seria quase como perguntar numa lista
  de discussão de marketing se alguém ali conhecia uma boa forma para
  isotônicos, pois a sua empresa gostaria de começar a produzi-lo :)
   
   Mas já que você já tem um cliente, explore isso!! De opinião pessoal
  é a melhor forma de aprender um negócio...
   
   Abraços
   Henrique
   
   - Original Message - 
   From: Ricardo Berti 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Thursday, January 18, 2007 4:36 PM
   Subject: [delphi-br] Automação Comercial
   
   
   Olá Pessoal,
   
   eu estou querendo montar um sistema comercial, só que não sei o
  que colocar por exemplo, no cadastro de produtos, clientes,
  fornecedores, etc... Peguei bastante coisa da internet, sistemas
  prontos, mas sempre um pede coisas e outro pede coisas bem
  diferentes... Alguém sabe o que pode ser melhor para fazer cadastros
  em um sistema genérico? Tipo Cliente, Fornecedor, Produto, Contas
  Pagar/Receber, e/ou o que vai nesses? Eu to fazendo um colega que tem
  uma lojinha, mas quero ampliar ele pra poder vendar pra mais pessoas,
  mas preciso de algo pra poder oferecer
   
   Se esse tipo de dúvida vai contra regras ou coisa do tipo, por
  favor, desconsiderar! Se não, eu ficarei muito grato mesmo pela ajuda
  de você
   
   Abraços!
   
   Ricardo Berti
   
   [As partes desta mensagem que não continham texto foram removidas]
   
   
   
   
   
   [As partes desta mensagem que não continham texto foram removidas]
  



   

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



Re: [delphi-br] Imprimir na Impressora Térmica Argox

2007-01-19 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Argox? Etiqueta?

Se for, você pode gerar um PostScript com metadado e enviar para impressora com 
WriteLn!

Manja?!
Henrique

  - Original Message - 
  From: Levi Ribeiro de Freitas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 18, 2007 1:49 PM
  Subject: [delphi-br] Imprimir na Impressora Térmica Argox


  Pessoal,

  Alguém tem exemplo de como imprimir para Impressora Térmica Argox?

  Agradeço pelo ajuda,

  Levi

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



   

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



Re: [delphi-br] Contador Regressivo de Caracteres em um Memo

2007-01-19 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Ricardo,

No evento OnChange do Memo vc conta Memo.MaxLength - Length(Memo.Text)

Abraços
Henrique

- Original Message - 
  From: Ricardo Ravelli 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 19, 2007 11:16 AM
  Subject: [delphi-br] Contador Regressivo de Caracteres em um Memo


  Bom dia a todos.
  Tenho um Label no qual eu queria mostrar qtos caracteres ainda falta para o
  usuário digitar dentro de um memo.
  Alguém tem alguma função que faça isso.

  obrigado.
  Ricardo Ravelli.

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



   

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



Re: [delphi-br] PROBLEMA P DESTRUIR FORM

2007-01-18 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Bem, pode ser uma medida de segurança, mas não é por isso que está dando o 
access violation... Tem alguma outra linha causando este erro! Tente 
descobrir algo que seja feito DEPOIS da destruição do form...

O Action := caFree só seta o flag de ação para destruir o form quando ele 
for fechado; não quer dizer que aquilo ali destrua o form... Tem algo a mais, 
outra linha talvez nos eventos OnDestroy ou OnClose do form que está causando o 
AV...

Henrique

  - Original Message - 
  From: Renato Lorandi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 18, 2007 8:21 AM
  Subject: Res: [delphi-br] PROBLEMA P DESTRUIR FORM


  amigo, tente acrescetar esta linha antes do action...

  nomedoform:=nil
  Action:=caFree;

  blz...

  - Mensagem original 
  De: Fábio - CS Informatica [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quarta-feira, 17 de Janeiro de 2007 19:15:49
  Assunto: [delphi-br] PROBLEMA P DESTRUIR FORM

  Olá colegas,

  estou migrando do D5 para o D7, só q estou com problemas qdo fecho o form,
  estou utilizando MDI, qdo tento destruir algum form aberto (MDIChild), 
utilizando
  a seguinte linha de código no Evento OnClose do form:

  Action:=caFree;

  até fecha o form, mais apresenta uma mensagem de Acess Violation at Adress 
004C81EA

  agradeço a atenção dos colegas...

  Fábio.

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

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.yahoo.com/ 

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



   

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



Re: [delphi-br] Evento onCanResize de um componente TScrollbox

2007-01-17 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Olá, Joandeiy!

Tem alguns eventos melhores pra você usar... Uma opção boa é sobrescrever a 
procedure SetBounds que está no escopo public de todos os decendentes do 
TControl. Outra opção é interceptar a mensagem WM_Resize, enviada pelo Windows 
sempre que o controle é redimensionado...

Pra este tipo de coisa, não vale a pena linkar os eventos lá no fim; pega pela 
raiz! :)

Um abraço
Henrique Netzka

  - Original Message - 
  From: Joandreiy Cordeiro 
  To: [EMAIL PROTECTED] ; delphi-br ; delphi-total 
  Sent: Wednesday, January 17, 2007 8:36 AM
  Subject: [delphi-br] Evento onCanResize de um componente TScrollbox


  Estou criando um componente descendente de um TScrollbox o objetivo deste
  componente é pegar qualquer outro componente e centralizar dentro dele,
  consigo fazer centralizar mas, quando eu redimenciono o TScrollbox o
  componente que está dentro dele não se alinha a posição que eu determinel
  que é centralizado.

  Como faço para usar o evento onCanResize dentro deste componente que estou
  criando pois qualquer mudança no tamanho do TScrollbox fique sempre
  centralizado.

  --
  Atenciosamente,
  Joandreiy Cordeiro

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



   

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



Re: [delphi-br] Traduzir Mensagens MessageDlg

2007-01-15 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Olá, Marcos...

É, nem a minha nem a sua suposição estavam corretas... Quando você usa os 
run-time packages, ele busca os já compilados BPLs do delphi (rtl70.bpl, 
vcl70.bpl, etc), ao invés de recompilá-los. Assim, units como a Consts, 
DBConsts e etc já estão compiladas (dentro dos BPLs). Se você tentar adicionar 
as units aos packages, um erro será exibido pois a unit já está contida no 
pacote X. Não tem build que resolva, pois os pacotes da VCL são feitos com 
Explicit rebuild. Minha nova tentativa (que acabei de pensar) vai ser 
recompilar os pacotes da vcl com nomes diferentes (pq com o msm ele não deixa) 
e utilizá-los, ao invés de utilizar os nativos da VCL... Vamos ver...

Abraços e obrigado pelas dicas até agora...
Henrique

  - Original Message - 
  From: Marcos Douglas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 12, 2007 12:30 PM
  Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg


  Henrique,

  Não tenho absoluta certeza, mas acho que o compilador não vai pegar a unit
  Const.pas através de algum outro pacote na seção required, como vc falou.

  Para não ter que adicionar a unit em todos os projetos, tente colocar a unit
  modificada num lugar comum a todos os projetos e depois adicione no search
  path de cada projeto a pasta onde estará a unit. Assim vc vai dizer para o
  Delphi procurar ali primeiro, antes de tentar achar a unit em outras pastas.

  Não acredito que vc vá conseguir fazer isso sem recompilar o(s) projeto(s),
  pois a unit const.pas (default) já está linkada a todos os projetos. Sem
  Build com a nova unit, nada feito.

  Atenciosamente,

  --
  Marcos Douglas

   Mensagem Original 
  From: Henrique Netzka \(Vetor Sistemas\) [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Sex, Janeiro 12, 2007 11:11 am
  Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg

   Olá, Marcos,
  
   Então.. isso funcionará, provavelmente, se eu colocar a nova unit Consts em
   todos os meus packets! Isso porque, caso ela não esteja explicitamente
   incluída no meu pacote, ela pegará de algum dos DCPs incluídos na seção
   required do packet! Certo!?
  
   A questão é.. eu queria refazer os DCPs, e não incluir a nova unit Consts (e
   todas as outras). Só que essa idéia me surgiu enquanto escrevia na lista, e
   não testei ainda!! Vou tentar isso e dou um retorno quando conseguir (ou
   não)...
  
   Indiferente disso, agradeço a todas as respostas. A idéia não é traduzir o
   meu sistema (isso eu sabia como fazer :) ), mas sim as mensagens padrão do
   delphi! E num sistema sem packets eu também sei como fazer - inclusive já
   está feito! Mas estranhei quando passei a usar os packets pq a tradução não
   se aplica... E é em cima disso a discussão!
  
   Abraços,
   Henrique
  
   - Original Message -
   From: Marcos Douglas
   To: delphi-br@yahoogrupos.com.br
   Sent: Thursday, January 11, 2007 10:23 AM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
  
  
   Henrique,
  
   A solução que eu falei tb serve para pacotes. O problema é que vc terá que
   recompilar todos os pacotes que utilizam esta unit.
  
   Lembre-se que a unit tb deve estar o mais próximo possível do projeto de
   cada pacote, ou seja, o melhor seria estar na mesma pasta de cada .DPR.
  
   Se vc recompilar somente alguns pacotes, vc terá pacotes que utilizam a
   const.pas padrão e pacotes que utilizam a const.pas alterada,
   entendeu?
  
   Abraços,
  
   --
   Marcos Douglas
  
    Mensagem Original 
   From: Henrique Netzka \(Vetor Sistemas\) [EMAIL PROTECTED]
   To: delphi-br@yahoogrupos.com.br
   Sent: Qui, Janeiro 11, 2007 8:56 am
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
  
Marcos,
   
Ninguém deu, mas receio que não vá resolver; o problema tem se mostrado
quando usamos uma aplicação com packets ao invés de usar uma que faça o
   build
de todos eles para dentro do executável!!
   
É como se o Delphi não recompilasse os pacotes, não refizesse os dcps! E
talvez não refaça mesmo, mas tem que ter um jeito...
   
Henrique
   
- Original Message -
From: Marcos Douglas
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 10, 2007 2:13 PM
Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
   
   
Se não quiser alterar nada do Delphi, nem ter que apagar DCU, etc,
   etc...
É
só pegar o const.pas (ou qq outra unit que se queira alterar) e fazer
   uma
CÓPIA para dentro da pasta do seu projeto. Após isso é só dar um build
   no
projeto.
   
Acontece que o compilador procura os arquivos na pasta atual do projeto
   e
somente depois do path do Delphi.
   
PS: Me desculpe se alguém já deu esta dica, pois não estou acompanhando
esta
thread desde o início.
   
--
Marcos Douglas
   
 Mensagem Original 
From: Eric D. [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Qua, Janeiro 10, 2007 2:12 pm

Re: [delphi-br] Traduzir Mensagens MessageDlg

2007-01-12 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Olá, Marcos,

Então.. isso funcionará, provavelmente, se eu colocar a nova unit Consts em 
todos os meus packets! Isso porque, caso ela não esteja explicitamente incluída 
no meu pacote, ela pegará de algum dos DCPs incluídos na seção required do 
packet! Certo!?

A questão é.. eu queria refazer os DCPs, e não incluir a nova unit Consts (e 
todas as outras). Só que essa idéia me surgiu enquanto escrevia na lista, e não 
testei ainda!! Vou tentar isso e dou um retorno quando conseguir (ou não)...

Indiferente disso, agradeço a todas as respostas. A idéia não é traduzir o meu 
sistema (isso eu sabia como fazer :) ), mas sim as mensagens padrão do delphi! 
E num sistema sem packets eu também sei como fazer - inclusive já está feito! 
Mas estranhei quando passei a usar os packets pq a tradução não se aplica... E 
é em cima disso a discussão!

Abraços,
Henrique

  - Original Message - 
  From: Marcos Douglas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 11, 2007 10:23 AM
  Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg


  Henrique,

  A solução que eu falei tb serve para pacotes. O problema é que vc terá que
  recompilar todos os pacotes que utilizam esta unit.

  Lembre-se que a unit tb deve estar o mais próximo possível do projeto de
  cada pacote, ou seja, o melhor seria estar na mesma pasta de cada .DPR.

  Se vc recompilar somente alguns pacotes, vc terá pacotes que utilizam a
  const.pas padrão e pacotes que utilizam a const.pas alterada, entendeu?

  Abraços,

  --
  Marcos Douglas

   Mensagem Original 
  From: Henrique Netzka \(Vetor Sistemas\) [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Qui, Janeiro 11, 2007 8:56 am
  Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg

   Marcos,
  
   Ninguém deu, mas receio que não vá resolver; o problema tem se mostrado
   quando usamos uma aplicação com packets ao invés de usar uma que faça o 
build
   de todos eles para dentro do executável!!
  
   É como se o Delphi não recompilasse os pacotes, não refizesse os dcps! E
   talvez não refaça mesmo, mas tem que ter um jeito...
  
   Henrique
  
   - Original Message -
   From: Marcos Douglas
   To: delphi-br@yahoogrupos.com.br
   Sent: Wednesday, January 10, 2007 2:13 PM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
  
  
   Se não quiser alterar nada do Delphi, nem ter que apagar DCU, etc, etc...
   É
   só pegar o const.pas (ou qq outra unit que se queira alterar) e fazer uma
   CÓPIA para dentro da pasta do seu projeto. Após isso é só dar um build no
   projeto.
  
   Acontece que o compilador procura os arquivos na pasta atual do projeto e
   somente depois do path do Delphi.
  
   PS: Me desculpe se alguém já deu esta dica, pois não estou acompanhando
   esta
   thread desde o início.
  
   --
   Marcos Douglas
  
    Mensagem Original 
   From: Eric D. [EMAIL PROTECTED]
   To: delphi-br@yahoogrupos.com.br
   Sent: Qua, Janeiro 10, 2007 2:12 pm
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
  
Vale lembrar que Application.MessageBox não traduz nada. Ele apenas
   mostra os
captions dos botões segundo a linguagem do SO instalado no computador
   onde a
aplicação está rodando.
   
Ou seja, em um Win PT_BR, vai aparece Sim, Não, etc... já num Win
   US_EN
vai aparecer Yes, No, etc...
   
[]'s
   
Eric D. - Desenvolvimento e Soluções de Tecnologia
[EMAIL PROTECTED]
Talk is cheap, show me the code...
- Original Message -
From: Alexandre
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 10, 2007 11:32 AM
Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
   
   
Eu descobri outra função que traduz:
Windows.Messagebox
   
Aqui funcionou perfeitamente,
   
Alex
- Original Message -
From: Henrique Netzka (Vetor Sistemas)
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 10, 2007 11:25 AM
Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
   
Alexandre,
   
Se serve de consolo, estou correndo atrás da mesma solução!!
   
Abraços,
Henrique Netzka
   
- Original Message -
From: Alexandre
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 10, 2007 7:36 AM
Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
   
Ja apaguei o dcu, foi o que eu disse, quando eu crio um projeto vazio
   que
não usa RUNTIME PACKAGE ele traduz normal, é só eu usar pacote lincado
   ao
projeto que fica tudo em ingles novamente.
   
- Original Message -
From: Desenvolvimento (Anderson)
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 10, 2007 5:44 PM
Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
   
na verdade é assim:
vc precisa apagar o consts.dcu...
pq se vc não der um build no consts.pas, ele não vai compilar seu
   programa
com ele não...
pq qdo compila, o delphi pega só os .dcu para

Re: [delphi-br] Traduzir Mensagens MessageDlg

2007-01-11 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Marcos,

Ninguém deu, mas receio que não vá resolver; o problema tem se mostrado quando 
usamos uma aplicação com packets ao invés de usar uma que faça o build de todos 
eles para dentro do executável!!

É como se o Delphi não recompilasse os pacotes, não refizesse os dcps! E talvez 
não refaça mesmo, mas tem que ter um jeito...

Henrique

  - Original Message - 
  From: Marcos Douglas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 10, 2007 2:13 PM
  Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg


  Se não quiser alterar nada do Delphi, nem ter que apagar DCU, etc, etc... É
  só pegar o const.pas (ou qq outra unit que se queira alterar) e fazer uma
  CÓPIA para dentro da pasta do seu projeto. Após isso é só dar um build no
  projeto.

  Acontece que o compilador procura os arquivos na pasta atual do projeto e
  somente depois do path do Delphi.

  PS: Me desculpe se alguém já deu esta dica, pois não estou acompanhando esta
  thread desde o início.

  --
  Marcos Douglas

   Mensagem Original 
  From: Eric D. [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Qua, Janeiro 10, 2007 2:12 pm
  Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg

   Vale lembrar que Application.MessageBox não traduz nada. Ele apenas mostra 
os
   captions dos botões segundo a linguagem do SO instalado no computador onde a
   aplicação está rodando.
  
   Ou seja, em um Win PT_BR, vai aparece Sim, Não, etc... já num Win US_EN
   vai aparecer Yes, No, etc...
  
   []'s
  
   Eric D. - Desenvolvimento e Soluções de Tecnologia
   [EMAIL PROTECTED]
   Talk is cheap, show me the code...
   - Original Message -
   From: Alexandre
   To: delphi-br@yahoogrupos.com.br
   Sent: Wednesday, January 10, 2007 11:32 AM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
  
  
   Eu descobri outra função que traduz:
   Windows.Messagebox
  
   Aqui funcionou perfeitamente,
  
   Alex
   - Original Message -
   From: Henrique Netzka (Vetor Sistemas)
   To: delphi-br@yahoogrupos.com.br
   Sent: Wednesday, January 10, 2007 11:25 AM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
  
   Alexandre,
  
   Se serve de consolo, estou correndo atrás da mesma solução!!
  
   Abraços,
   Henrique Netzka
  
   - Original Message -
   From: Alexandre
   To: delphi-br@yahoogrupos.com.br
   Sent: Wednesday, January 10, 2007 7:36 AM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
  
   Ja apaguei o dcu, foi o que eu disse, quando eu crio um projeto vazio que
   não usa RUNTIME PACKAGE ele traduz normal, é só eu usar pacote lincado ao
   projeto que fica tudo em ingles novamente.
  
   - Original Message -
   From: Desenvolvimento (Anderson)
   To: delphi-br@yahoogrupos.com.br
   Sent: Wednesday, January 10, 2007 5:44 PM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
  
   na verdade é assim:
   vc precisa apagar o consts.dcu...
   pq se vc não der um build no consts.pas, ele não vai compilar seu programa
   com ele não...
   pq qdo compila, o delphi pega só os .dcu para gerar o .exe.
  
   logo, apague o .dcu.
  
   And
   - Original Message -
   From: Elazar Dornelles Ceza
   To: delphi-br@yahoogrupos.com.br
   Sent: Tuesday, January 09, 2007 5:21 PM
   Subject: RES: [delphi-br] Traduzir Mensagens MessageDlg
  
   Boa tarde
  
   Acho que vai ser necessário voce dar um build no pacote onde esta o
   const.pas.
  
   Atenc.
   Elazar
  
   -Mensagem original-
   De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
   Em nome de Alexandre
   Enviada em: terça-feira, 9 de janeiro de 2007 15:30
   Para: delphi-br@yahoogrupos.com.br
   Assunto: [delphi-br] Traduzir Mensagens MessageDlg
  
   Pessoal estou com um problemão, eu traduzi as mensagens do meu Delphi
   2005 no arquivo consts.pas e fiz o teste em um executavel vazio e
   traduziu beleza, mas quando eu rodo o meu sistema que chama um pacote
   com a opção BUILD RUNTIME PACKAGE as mensagens vem em inglês, procurei
   em todas as livrarias do delphi mas não consigo achar da onde ele esta
   buscando essas mensagens em ingles sendo que ja traduzi e o consts.pas.
   O unico parametro que tenho é o pacote vcl.dcp, mas não consigo
   recompila-lo.
  
   Obrigado desde ja,
  
   Alexandre
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   ___
   Yahoo! Mail - Sempre a melhor opção para você!
   Experimente já e veja as novidades.
   http://br.yahoo.com/mailbeta/tudonovo/
  
   __ Informação do NOD32 IMON 1967 (20070109) __
  
   Esta mensagem foi verificada pelo NOD32 sistema antivírus
   http://www.eset.com.br
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham

Re: [delphi-br] Re: Traduzir Mensagens MessageDlg

2007-01-11 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Bem, isso traduz os botões - não no meu caso, pois meu windows é em inglês.. 
mas e as mensagens do sistema, como campo requerido e etc? Ou vc não usa esse 
tipo de recurso?

Henrique
  - Original Message - 
  From: Alexandre 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 11, 2007 11:18 AM
  Subject: Re: [delphi-br] Re: Traduzir Mensagens MessageDlg


  Windows.MessageBox(Handle,PChar(Mensagem),PChar(Titulo da janela),MB_YESNO);

  - Original Message - 
  From: maniacapordelphi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 11, 2007 10:08 AM
  Subject: [delphi-br] Re: Traduzir Mensagens MessageDlg

  Oi Alex
  Eu tentei usar essa função Windows.MessageBox, mas não funcionou.

  Somente na função windows.MessageBoxEx é que existe o 
  parametro Language, mas eu não consegui fazer ela funcionar.:(

  Como você conseguiu fazer? 

  Mani

  --- Em delphi-br@yahoogrupos.com.br, Alexandre 
  [EMAIL PROTECTED] escreveu
  
   Eu descobri outra função que traduz: 
   Windows.Messagebox
   
   Aqui funcionou perfeitamente,
   
   Alex
   - Original Message - 
   From: Henrique Netzka (Vetor Sistemas) 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Wednesday, January 10, 2007 11:25 AM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
   
   
   Alexandre,
   
   Se serve de consolo, estou correndo atrás da mesma solução!!
   
   Abraços,
   Henrique Netzka
   
   - Original Message - 
   From: Alexandre 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Wednesday, January 10, 2007 7:36 AM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
   
   Ja apaguei o dcu, foi o que eu disse, quando eu crio um projeto 
  vazio que não usa RUNTIME PACKAGE ele traduz normal, é só eu usar 
  pacote lincado ao projeto que fica tudo em ingles novamente.
   
   - Original Message - 
   From: Desenvolvimento (Anderson) 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Wednesday, January 10, 2007 5:44 PM
   Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg
   
   na verdade é assim:
   vc precisa apagar o consts.dcu...
   pq se vc não der um build no consts.pas, ele não vai compilar 
  seu programa com ele não...
   pq qdo compila, o delphi pega só os .dcu para gerar o .exe.
   
   logo, apague o .dcu.
   
   And
   - Original Message - 
   From: Elazar Dornelles Ceza 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Tuesday, January 09, 2007 5:21 PM
   Subject: RES: [delphi-br] Traduzir Mensagens MessageDlg
   
   Boa tarde
   
   Acho que vai ser necessário voce dar um build no pacote onde 
  esta o
   const.pas.
   
   Atenc.
   Elazar
   
   -Mensagem original-
   De: delphi-br@yahoogrupos.com.br [mailto:delphi-
  [EMAIL PROTECTED]
   Em nome de Alexandre
   Enviada em: terça-feira, 9 de janeiro de 2007 15:30
   Para: delphi-br@yahoogrupos.com.br
   Assunto: [delphi-br] Traduzir Mensagens MessageDlg
   
   Pessoal estou com um problemão, eu traduzi as mensagens do meu 
  Delphi
   2005 no arquivo consts.pas e fiz o teste em um executavel vazio e
   traduziu beleza, mas quando eu rodo o meu sistema que chama um 
  pacote
   com a opção BUILD RUNTIME PACKAGE as mensagens vem em inglês, 
  procurei
   em todas as livrarias do delphi mas não consigo achar da onde 
  ele esta
   buscando essas mensagens em ingles sendo que ja traduzi e o 
  consts.pas.
   O unico parametro que tenho é o pacote vcl.dcp, mas não consigo
   recompila-lo.
   
   Obrigado desde ja,
   
   Alexandre
   
   [As partes desta mensagem que não continham texto foram 
  removidas]
   
   ___ 
   Yahoo! Mail - Sempre a melhor opção para você! 
   Experimente já e veja as novidades. 
   http://br.yahoo.com/mailbeta/tudonovo/
   
   __ Informação do NOD32 IMON 1967 (20070109) __
   
   Esta mensagem foi verificada pelo NOD32 sistema antivírus
   http://www.eset.com.br
   
   [As partes desta mensagem que não continham texto foram 
  removidas]
   
   [As partes desta mensagem que não continham texto foram 
  removidas]
   
   [As partes desta mensagem que não continham texto foram 
  removidas]
   
   
   
   
   
   [As partes desta mensagem que não continham texto foram removidas]
  

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



   

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



Re: [delphi-br] Traduzir Mensagens MessageDlg

2007-01-10 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Alexandre,

Se serve de consolo, estou correndo atrás da mesma solução!!

Abraços,
Henrique Netzka

  - Original Message - 
  From: Alexandre 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 10, 2007 7:36 AM
  Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg


  Ja apaguei o dcu, foi o que eu disse, quando eu crio um projeto vazio que não 
usa RUNTIME PACKAGE ele traduz normal, é só eu usar pacote lincado ao projeto 
que fica tudo em ingles novamente.

  - Original Message - 
  From: Desenvolvimento (Anderson) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 10, 2007 5:44 PM
  Subject: Re: [delphi-br] Traduzir Mensagens MessageDlg

  na verdade é assim:
  vc precisa apagar o consts.dcu...
  pq se vc não der um build no consts.pas, ele não vai compilar seu programa 
com ele não...
  pq qdo compila, o delphi pega só os .dcu para gerar o .exe.

  logo, apague o .dcu.

  And
  - Original Message - 
  From: Elazar Dornelles Ceza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 09, 2007 5:21 PM
  Subject: RES: [delphi-br] Traduzir Mensagens MessageDlg

  Boa tarde

  Acho que vai ser necessário voce dar um build no pacote onde esta o
  const.pas.

  Atenc.
  Elazar

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Alexandre
  Enviada em: terça-feira, 9 de janeiro de 2007 15:30
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Traduzir Mensagens MessageDlg

  Pessoal estou com um problemão, eu traduzi as mensagens do meu Delphi
  2005 no arquivo consts.pas e fiz o teste em um executavel vazio e
  traduziu beleza, mas quando eu rodo o meu sistema que chama um pacote
  com a opção BUILD RUNTIME PACKAGE as mensagens vem em inglês, procurei
  em todas as livrarias do delphi mas não consigo achar da onde ele esta
  buscando essas mensagens em ingles sendo que ja traduzi e o consts.pas.
  O unico parametro que tenho é o pacote vcl.dcp, mas não consigo
  recompila-lo.

  Obrigado desde ja,

  Alexandre

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

  ___ 
  Yahoo! Mail - Sempre a melhor opção para você! 
  Experimente já e veja as novidades. 
  http://br.yahoo.com/mailbeta/tudonovo/

  __ Informação do NOD32 IMON 1967 (20070109) __

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br

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

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



   

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



Re: [delphi-br] Re: Enviar mensagem para outro micro na rede

2007-01-10 Por tôpico Henrique Netzka \(Vetor Sistemas\)
É, dá pra fazer via sockets; a questão é: esse controle não precisaria ser 
melhor do que uma simples mensagem? Algo como uma listagem que exibisse todas 
as vendas e o cara do depósito marcasse como separadas ou algo assim?

Se for só o ShowMessage, dá pra usar sockets e, se TCP não servir e vc estiver 
numa rede local, usa broadcast (UDP) pra rede inteira...

abraços,
Henrique Netzka

  - Original Message - 
  From: Murillo Proença 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 10, 2007 10:23 AM
  Subject: [delphi-br] Re: Enviar mensagem para outro micro na rede


  Uma forma seria vc criar uma tabela de mensagens, com tres campos,
  código do usuario, texto da mensagem e uma flag se ela foi lida ou não.
  Aí vc coloca um timer no seu sistema pra rodar de tempos em tempos e
  verificar se tem mensagem para o usuário logado que ainda não foi
  lida. Exibe a mensagem e quando ele clicar no Ok do seu showmessage vc
  marca a mensagem como lida e aí vc tem um log das mensagens enviadas.

  --- Em delphi-br@yahoogrupos.com.br, leacarbonera2
  [EMAIL PROTECTED] escreveu
  
   Olá pessoal,
   
   Estou precisando de uma ajuda. Precio desenvolver uma rotina para que 
   quando um usuario do sistema lançar um pedido de venda novo, seja 
   exibida uma mensagem na tela do responsavel pelo estoque para que ele 
   saiba que existe um pedido para ser separado. Esta mensagem pode ser um 
   ShowMessage da vida sem muita frescura. Alguem tem alguma ideia de como 
   eu posso fazer isso
   
   Abraço
  



   

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



Re: [delphi-br] Re: Firebird e Delphi

2007-01-03 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Na mesma linha, tem uma tabela que só tem um registro e não precisa usar o 
FIRST:

SELECT
  GEN_ID(Nome_DO_Gerador, 1)
FROM
  RDB$Database

Abraços
Henrique

  - Original Message - 
  From: Jose Henrique 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 03, 2007 9:07 AM
  Subject: [delphi-br] Re: Firebird e Delphi


  Olá amigo, talvez isso possa te ajudar !

  vai lá no Delphi onde tem a query com o MAX e troca a sentenca por
  esta aki e o result continuará sendo o proximo numero que vc terá
  disponivel ! boa sorte qq duvida retorne ! 

  sentenca:
  ---
  select first 1 gen_id(Nome_Generator, 1) from Qualquer_Tabela;
  /\ /\ Incremento 
  uso first pra so rodar o Gen_id uma unica vez
  ---

  Boa Sorte !!!

  --- Em delphi-br@yahoogrupos.com.br, andersonfurtilhobr3
  [EMAIL PROTECTED] escreveu
  
   Olá amigos da Lista!!!
   
   Tenho um Generetor criado com o nome GEN_ENTIDADE, ligado a um Trigger 
   chamado ENTIDADE_BI.
   
   
   Como eu faço pra usar o mardito no Delphi?
   
   Alguém teria algum exemplo pra me enviar, pois já tentei de várias
  forma e 
   ainda nada. Eu estava usando uma Query separada e dando um Select
  Max + 1, 
   mas como tem os Generetor no FireBird gostaria de testa-los.
   
   Se alguém tiver um exemplo e puder me enviar ou me passar qualquer dica 
   ficarei agradecido.
   
   
   Um Forte abraço a todos
   Anderson Furtilho
   
   __
   Busca Yahoo!
   O serviço de busca mais completo da Internet. O que você pensar o
  Yahoo! encontra.
   http://br.busca.yahoo.com/
  



   

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



Re: [delphi-br] Forçar letras maiúsculas no dbmemo

2006-12-19 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Herda o componente e publica a propriedade CharCase :)

Henrique
  - Original Message - 
  From: Rodrigo Brito 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, December 19, 2006 11:12 AM
  Subject: [delphi-br] Forçar letras maiúsculas no dbmemo


  Como faço para forçar letras maiúsculas no dbmemo?

  att,

  Rodrigo Brito



   

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



Re: [delphi-br] ListBox

2006-12-14 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Olá, Renato!

Assim... Pode ser que haja um componente exatamente assim esperando para ser 
baixado por você! Mas pode ser que não. Em todo caso, não descarte a 
possibilidade de desenvolver o seu ListBox. Não é um componente super difícil 
de ser desenvolvido, e acho que você terá mais sucesso pois o componente fica 
do jeito que você espera...

Abraços
Henrique
  - Original Message - 
  From: Renato Lorandi 
  To: Lista Delphi 
  Sent: Wednesday, December 13, 2006 11:02 AM
  Subject: [delphi-br] ListBox


  ola galera, ja postei a dúvida antes e não obtive respostas, por isso volto a 
recorrer a lista ,pois não consegui encontrar nada ainda a respeito de como 
solucionar meu probleama..

  seguinte, quero fazer uma lista igual a do msn, onde olhamos os contatos 
on-line, ,ou seja divida em colunas...

  para que quando algum cliente meu se conecta ele va adicionando na lista e 
quando chegar a um determinado numero no caso 10 clientes ele começe a adiconar 
na outra coluna, na verdade eu consegui fazer ele adiocionar dinamicamente 
esses clientes em colunas, o unico problema é o tamanho das colunas por exemplo 
que não consigo enchergar a outra coluna sem mover a barra de rolagem, ele não 
fica como o msn que posso ver duas colunas juntas é isso que preciso, para que 
eu possa visualizar um numero maior de clientes ao mesmo tempo entendem, 
gostaria da ajuda de vc's quanto a isso, no momento utilizo listbox , pois 
necessito desse cara...

  abraço.


  ___ 
  O Yahoo! está de cara nova. Venha conferir! 
  http://br.yahoo.com

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



   

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



Re: [delphi-br] ListBox

2006-12-14 Por tôpico Henrique Netzka \(Vetor Sistemas\)
 rs, ah, mas veja então pelo seguinte lado:

quanto tempo você está gastando buscando esse componente?

este tempo não poderia ser usado pra aprender a desenvolver o seu próprio?

Henrique

  - Original Message - 
  From: Renato Lorandi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 14, 2006 9:27 AM
  Subject: Res: [delphi-br] ListBox


  mas para desenvolver, ainda tenho muito caminho pela frente rs.

  - Mensagem original 
  De: Henrique Netzka (Vetor Sistemas) [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quinta-feira, 14 de Dezembro de 2006 9:10:53
  Assunto: Re: [delphi-br] ListBox

  Olá, Renato!

  Assim... Pode ser que haja um componente exatamente assim esperando para ser 
baixado por você! Mas pode ser que não. Em todo caso, não descarte a 
possibilidade de desenvolver o seu ListBox. Não é um componente super difícil 
de ser desenvolvido, e acho que você terá mais sucesso pois o componente fica 
do jeito que você espera...

  Abraços
  Henrique
  - Original Message - 
  From: Renato Lorandi 
  To: Lista Delphi 
  Sent: Wednesday, December 13, 2006 11:02 AM
  Subject: [delphi-br] ListBox

  ola galera, ja postei a dúvida antes e não obtive respostas, por isso volto a 
recorrer a lista ,pois não consegui encontrar nada ainda a respeito de como 
solucionar meu probleama..

  seguinte, quero fazer uma lista igual a do msn, onde olhamos os contatos 
on-line, ,ou seja divida em colunas...

  para que quando algum cliente meu se conecta ele va adicionando na lista e 
quando chegar a um determinado numero no caso 10 clientes ele começe a adiconar 
na outra coluna, na verdade eu consegui fazer ele adiocionar dinamicamente 
esses clientes em colunas, o unico problema é o tamanho das colunas por exemplo 
que não consigo enchergar a outra coluna sem mover a barra de rolagem, ele não 
fica como o msn que posso ver duas colunas juntas é isso que preciso, para que 
eu possa visualizar um numero maior de clientes ao mesmo tempo entendem, 
gostaria da ajuda de vc's quanto a isso, no momento utilizo listbox , pois 
necessito desse cara...

  abraço.

   _ _ _ _ ___ 
  O Yahoo! está de cara nova. Venha conferir! 
  http://br.yahoo. com

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

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


  ___ 
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale 
  o discador agora! 
  http://br.acesso.yahoo.com

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



   

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



Re: [delphi-br] ppReport

2006-12-13 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Access violation para endereços zerados quer dizer que você não criou algum 
objeto e está tentando acessá-lo (modificá-lo)...

  - Original Message - 
  From: Joseane Batalha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, December 12, 2006 1:51 PM
  Subject: [delphi-br] ppReport


  Olá, como estão?

  Tenho uma dúvida sobre o delphi, com relação ao ppreport.
  Estou trabalhando em um sistema que possui um ppreport, ppjitpipeline, e que
  está ocorrendo o seguinte erro:

  Cannot generate report.

  Access violation at address 0065F79B in module 'ProjectSisca2Sigma.exe'.
  Read of address 0008.

  É um sistema que entre outras coisas, trata de históricos de alunos, e
  somente para alguns casos, acontece esse erro, para os demais tudo corre
  normalmente.

  Gostaria de saber se alguém poderia me ajudar, se puder, urgentemente.

  Obrigada.

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



   

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



Re: [delphi-br] Verdade sobre fieldbyname

2006-12-12 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Opa,

Indiferente de retrabalho e/ou não sei o quê, acho uma preocupação totalmente 
desnecessária a utilização de FieldByName X qualquer outra forma. Concordo  com 
o Luis quando ele falou da importação de dados; neste caso, sim, usaria 
diferente; mas consideremos que, neste caso, 1ms por loop pode se tornar alguns 
minutos no fim do processo todo!

Se você tem o dataset na sua tela (tipo um ClientDataSet), realmente é muito 
melhor usar algo do tipo cdsMeuDataSetMeuField, que já é um Field da classe 
desejada (muitas vezes ao utilizar o FieldByName você precisa ainda fazer um 
typecast pra convertê-lo para um TBlobField, por exemplo). Mas trabalhando com 
datasets que carregarão a própria estrutura, usar o FieldByName não vai matar 
ninguém!

Na época do 286 talvez isso fosse uma preocupação. Mas bem... nessa época, acho 
que não existia FieldByName :)

Em resumo, a minha preocupação ao participar da discussão é uma só... Existem 
pessoas mais e menos experientes, que já vivenciaram mais ou menos coisas. Não 
querendo me gabar, ou puxar para o nosso lado, mas o pessoal que tem alguma 
experiência a mais sabe usar do bom senso pra dizer o que é bom e o que não é. 
Agora, se eu tivesse começando a programar e lesse um artigo dizendo que usar o 
FieldByName vai deixar minha aplicação uma carroça, eu acreditaria cegamente! E 
nesse tipo de verdade eu vejo problema...

Abraços,
Henrique

  - Original Message - 
  From: Valfrid-Ly Silva Couto 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 11, 2006 7:04 PM
  Subject: Re: [delphi-br] Verdade sobre fieldbyname


  Cara, 

  Não entendi bem o que você quis dizer.

  Você criou o arquivo de constantes certinho, já tá feito, já era.

  Errar o nome de uma constante ou algo assim é pasível de todo ser humano.

  As IDEs mais novas das ferramentas já conseguem ajudar até nisso, mas mesmo 
num Framework isso pode acontecer.

  Joao Morais [EMAIL PROTECTED] escreveu: Valfrid-Ly Silva Couto wrote:
   João,
   
   Os erros de digitação podem ser resolvidos de uma forma simples, mesmo em 
projetos grandes, basta-se utilizar constantes públicas com os nomes dos 
campos, assim, digitado 1x é o suficiente.
   
   Se digitar errado o nome da constante, o compilador pega!!

  Daí isso passa a ganhar um nome diferente: retrabalho.

  --
  João Morais

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos

  Valfrid-Ly Silva Couto
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]
  ICQ 15114646

  -
  Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora!

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



   

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



Re: [delphi-br] Off-Topic ALLguem ai já atualizou p ro IE7 ??

2006-12-12 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Eu atualizei... Alguns sites travam, outros não entram (porque travam), outros 
entram mas dão problema (travam), e o site do Unibanco só entra de vez em 
quando (porque, em geral, trava). Mas quando funciona é bem bacana!! hehehe

Abraços
Henrique

  - Original Message - 
  From: Luiz Escobar 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 11, 2006 5:06 PM
  Subject: [delphi-br] Off-Topic ALLguem ai já atualizou pro IE7 ??



  E ai gente, alguem já teve a coragem de atualizar para o IE7 no XP ?
  Deu muitos problemas ? muitas incompatibilidades ? 
  Quais os bug´s ??

  abraços ?

  Luiz Escobar
  Analista/Desenvolvedor:
  WEB - HTML/JavaScript/PHP/MySQL 
  WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase
  DOS - Clipper/Assembler xBase
  SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k
  LINUX - LAZARUS/Kylix/MySQL;
  http://www.megasistema.com.br

  - Original Message - 
  From: Marcelo Hoepfner (SI) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 11, 2006 10:33 AM
  Subject: RES: [delphi-br] Conecta a um banco de dados onLine

  No hosting 

  www.meh.com.br http://www.meh.com.br/ 

  tenho 2 sistemas delphi (desktop) acessando o mysql (web) 100% funcionando.

  Qualquer coisa manda um email.

  _ 

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Luiz 
Escobar
  Enviada em: sábado, 9 de dezembro de 2006 14:22
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Conecta a um banco de dados onLine

  Bom duas coisas, faz ai e ve se conecta, SE não CONECTAR e vc tiver certeza 
que fez certo, porque não tem como errar, é só trocar o IP LOCAL pelo IP do seu 
mysql2.freehostia.com, ou pelo proprio nome, ai vc vai ter que pedir para eles 
abrierem o firewall para o seu IP ou para seu usuário, pois se não vc não chega 
ao servidor...

  Eu tenho um banco na LOCAWEB, e é tudo fechado, se vc quizer acesso externo, 
tem que pedir pra eles, e eles liberam para o seu IP-fixo, para IP-dinamico eu 
não sei

  Luiz Escobar

  - Segue mensagem original! -

  De: willer [EMAIL PROTECTED] mailto:willer%40personalcom.com.br com.br

  Vamos considerar o seguinte:
  Minha base de dados está em 'mysql2.freehostia.com' na porta 3306
  O meu banco de dados é 'wilcos_db'.
  Tô usando o host gratuito.

  Como eu faria para conectar-me a esse banco?

  - Original Message - 
  From: Eduardo Silva dos Santos 

  Qualquer um, a conexão é feita igual à na rede local.

  eu uso myDAC www.crlab.com mas também ja usei ZEOS.

  Em 08/12/06, willer escreveu:
  
   Que componente(s) eu usaria para fazer a conexão?
  
   - Original Message -
   From: Eduardo Silva dos Santos
  
   é perfeitamento possível, e te adianto que mysql funciona muuuito rapido
   em
   conexões via internet.
   de mais detalhes que eu te ajudo.
  
   Em 08/12/06, willer [EMAIL PROTECTED] mailto:willer%40personalcom.com.br 
com.br
   escreveu:
   
Alguém sabe se é possível fazer com que um aplicativo se comunique com
um banco de dados onLine, banco de dados MySql.?
   
[As partes desta mensagem que não continham texto foram removidas]
   
   
   
  
   --
   Eduardo Silva dos Santos
   DRD Sistemas.
   (27) 3218-4201
   MSN: eduardo.drd@ mailto:eduardo.drd%40gmail.com gmail.com 
   Site: http://www.drdsiste http://www.drdsistemas.com/ mas.com/
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   __ Informação do NOD32 IMON 1911 (20061208) __
  
   Esta mensagem foi verificada pelo NOD32 sistema antivírus
   http://www.eset. http://www.eset.com.br com.br
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Eduardo Silva dos Santos
  DRD Sistemas.
  (27) 3218-4201
  MSN: eduardo.drd@ mailto:eduardo.drd%40gmail.com gmail.com
  Site: http://www.drdsiste http://www.drdsistemas.com/ mas.com/

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

  __ Informação do NOD32 IMON 1912 (20061209) __

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset. http://www.eset.com.br com.br

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

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

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



   

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



Re: [delphi-br] edição do componente edit

2006-12-12 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Calma, calma... acho que não é por aí! rs

Os componentes são um pouco diferentes; ainda que você possa mesmo linkar o 
vento do edit a uma procedure do próprio componente, o mais legal (na minha 
opinião) é sobrescrever a procedure virtual anterior ao evento. Em geral, os 
componentes têm procedures que devem ser sobrescritas pra chegar nesses 
comportamentos.

No seu caso, declare no escopo PROTECTED da sua nova classe (TMeuEdit) a 
seguinte procedure:

procedure KeyPress(var Key: Char); override;

e pressione Ctrl+Shit+C em cima dela... Deixe lá o inherited que o próprio 
Delphi adicionará, e coloque seu tratamento embaixo dele (if Key = #13...). 
Agora sim funciona :)

Mãs... agora você tem um problema (rs). Não vai adiantar você dar um Perform no 
seu próprio componente dizendo pra ele mudar o foco pro próximo controle. 
Então, você terá que procurar o OwnerForm do seu componente (eventualmente 
ele será o próprio Owner, eventualmenteo o Owner do Owner, etc..) e, em cima do 
OwnerForm, você manda a mensagem WM_NextDlgCtl.

Manjou?!

Abraço
Henrique Netzka

  - Original Message - 
  From: Rodrigo Mota 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 11, 2006 9:24 PM
  Subject: RES: [delphi-br] edição do componente edit


  Vc pode criar uma propriedade no seu edit chamada EnableKeyPreview.

  Tipo SetEnableKeyPreview - Self.KeyPreview

  Se vc seta direto no botão q o botão já muda na propriedade do form,
  entendeu?

  Abs,

  Rodrigo Mota.

  _ 

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Anderson
  Enviada em: segunda-feira, 11 de dezembro de 2006 12:32
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] edição do componente edit

  gente...

  tô começando a mexer com criação de componentes e estou com uma 
  dúvida...
  Estou criando um edit melhorado com validação de entrada por cpf, 
  cnpf, data, numeros etc...
  também gostaria que ele incorporasse o enter pelo tab...

  fiz o seguinte, criei o evento keypress e nele coloquei as 
  validações que disse acima e funcionou beleza, só que também 
  coloquei assim:
  if key=#13 then
  begin
  perform(wm_nextdlgctl,0,0);
  key:=#0;
  end;
  acontece que não estã funcionando... alguém pode me explicar o que 
  eu tenho q fazer ?

  outra coisa... quando eu coloco esse componente em algum projeto e 
  adicono alguma coisa (dentro da aplicação) no evento onkeypress 
  desse meu edit ele ignora o evento keypress interno dele. Tem como 
  eu fazer alguma coisa para que ele use o que estiver dentro do 
  keypress digitado e depois ainda use o keypress internodo 
  componente ?

  Aguardo a ajuda e desde já agradeço

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



   

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



Re: [delphi-br] Destruir um EXE da memoria

2006-12-08 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Opa!

Tem sim.. procure por como usar a função TerminateProcess.

Abraços,
Henrique Netzka

  - Original Message - 
  From: Doretto 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, December 08, 2006 11:54 AM
  Subject: [delphi-br] Destruir um EXE da memoria


  Bom dia...

  Tem como tirar da memoria um programa em execucao via programacao ?

  Ex:

  WinExec('Prod.Exe',0)
  Entrada:=Tentrada.Create(Self);
  Entrada.ShowModal;
  Entrada.Release;
  Destruir o prod.exe ou seja tirar de execucao..

  Abraço

  Doretto.

  tem como ?

  Abraço.

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



   

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



Re: [delphi-br] Como enviar e-mail com arquivo atachado atraves do Outlook Express

2006-12-07 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Fala Paulo,

Uma vez estive atrás disso, e encontrei várias respostas! Mas achei que era 
muito empenho para o que eu precisasse...

Seguem algumas dicas de como encontrar o que você quer:

- Procure por rotinas que enviem e-mail pelo Outlook com arquivo; não procure 
por Delphi, pois você deverá mexer com API do Windows e do Outlook! As rotinas 
normalmente estavam em VB
- Você poderá utilizar COM pra fazer isso; a rotina do VB usava!
- Uma das rotinas era engraçada, mas dava certo... Ele abria uma janela de 
Nova Mensagem e enviava vários KeyPress para a tela, que na seqüência 
executavam: Clicar em Anexar-Digitar o nome do arquivo-Clicar em Ok; et 
voilà! O arquivo estava anexado. É um xunxo, mas já vi coisas bem piores! rs...
- Essa última é só desenvolver, não precisa nem procurar no Google :)

Espero ter ajudado de alguma forma! E desejo-lhe boa sorte na busca! rs

Abraços
Henrique Netzka
  - Original Message - 
  From: Paulo Sérgio Dias 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, December 06, 2006 4:34 PM
  Subject: [delphi-br] Como enviar e-mail com arquivo atachado atraves do 
Outlook Express


  Pessoal:

  Alguem tem alguma rotina que, a partir de um programa Delphi 7
  (ou D2006) chame o Outlook Express e monte um e-mail com um
  arquivo atachado ?

  Encontrei algumas rotinas na Internet, mas as que funcionam
  nao permitem atachar arquivos, e as que permitem atachar arquivos
  nao funcionam direito.

  Obs.: Tem de ser pelo Outlook Express ou pelo leitor de e-mail padrao
  do usuario. So' nao posso enviar diretamente (motivos especificos dos
  meus usuarios). Por isso nao estou usando componentes para envio
  de e-mail.

  Grato pela atencao de todos
  Paulo

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



   

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



Re: [delphi-br] MSN

2006-12-06 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Tem pra windows também, um monitor de MSN... exatamente o que você está 
procurando... procure no google!

Henrique Netzka

  - Original Message - 
  From: Andre Veloso de Mesquita 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, December 05, 2006 5:41 PM
  Subject: Re: [delphi-br] MSN


  Existe um monitorador de rede que te dá essas informações. Não lembro o nome 
  agora.

  Procura por ele... é pra linux.

  - Original Message - 
  From: Higor (Yahoo) [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, December 05, 2006 11:50 AM
  Subject: [delphi-br] MSN

  Pessoal, bom dia!!

  Preciso fazer uma aplicação que indentifique no servidor conversas via MSN,
  tipo: USUÁRIO, CONVERSANDO COM, DATA/HORA INÍCIO, DATA/HORA TÉRMINO, TEMPO
  DE CONVERSA (Data/Hora Término - Data/Hora Início)... isso iria gravar num
  banco de dados e gerar pesquisas/relatórios.

  Alguém poderia me dar um idéia de como faria isso.

  Obrigado desde já...

  Higor

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

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos



   

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



Re: [Bulk] Re: RES: [delphi-br] Documentação d a OTA

2006-12-05 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Ouvi falar que o Google explica :)

hehehe.. tá, pior que ele explica mesmo. Mas OTA = Open Tools API. Na  prática, 
é para fazer ferramentas e utilitários internos à IDE, de forma a melhorar 
nossa vida. Por exemplo, embutir o CVS dentro da IDE; nomear automaticamente 
os componentes de um form; criar Units com um código pré-definido diferente do 
padrão do Delphi... essas coisas que parecem inúteis mas que às vezes são 
bacanas!

Um que fiz aqui, por exemplo, lista os forms com o Caption junto. É tipo a 
janela do Shift+F12, mas mais completo! Fiz isso pq nossos forms recebem 
identificação numérica (tipo P001, P002, etc). Essas coisas ajudam...

Henrique Netzka
  - Original Message - 
  From: Anderson RB 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 04, 2006 10:11 PM
  Subject: Re: [Bulk] Re: RES: [delphi-br] Documentação da OTA


  Pessoal alguem poderia explicar o que é isso.. estou viajando.
  Grato.
  - Original Message - 
  From: Henrique Netzka (Vetor Sistemas) [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Monday, December 04, 2006 4:31 PM
  Subject: [Bulk] Re: RES: [delphi-br] Documentação da OTA

  www.gexperts.org/toolsapi

  Lá tem vários links que ajudam!! Mas nada como experimentar, experimentar, 
  reiniciar o Delphi umas 40 vezes e conseguir desenvolver algo sem muitas 
  exceções de access violations hehehe

  Henrique Netzka

  - Original Message - 
  From: Marcos Douglas
  To: delphi-br@yahoogrupos.com.br
  Sent: Monday, December 04, 2006 5:04 PM
  Subject: Re: RES: [delphi-br] Documentação da OTA

  João,
  Procure pelo sub-projeto do JEDI, o JediCodeFormart (formatador de 
  código).
  Este projeto tem uma parte que é um plugin para a IDE. Veja como é o 
  código.

  mD

   Mensagem Original 
  From: Joao Morais [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Seg, Dezembro 4, 2006 4:45 pm
  Subject: Re: RES: [delphi-br] Documentação da OTA

   Sérgio T. Uetanabaro wrote:
  
   Olá João,
  
  
   Se você puder ser um pouco mais específico nas suas necessidades eu
   posso ter alguns exemplos. Os OTAs services são bem amplos e uma
   documentação completa sobre eles vc nao vai achar.
  
  
   Olá Sérgio,
  
   Eu preciso de tudo um pouco, tal como inserir opção no menu e no
   New..., criar nova unit, mexer no editor, mexer no .dpr, trocar foco,
   e o resto vou descobrindo conforme a implementação.
  
   Qualquer indicação de material ou exemplos de uso serão muito bem 
  vindos.
  
   Obrigado,
   --
   João Morais
  

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

  --

  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.15.6/567 - Release Date: 04/12/06


  ___ 
  Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
  http://br.mobile.yahoo.com/mailalertas/ 




   

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



Re: [Delphi-br] conversao Inteiro p/ Binario

2006-12-04 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Também...

function IntToBin(AValor: Integer): String;
begin
  Result := '';

  AValor := Abs(AValor);
  while (AValor  0) do
  begin
Result := IntToStr(AValor and 1) + Result;
AValor := AValor shr 1;
  end;
end;

Mas essa ignora o sinal do inteiro...

Henrique Netzka

  - Original Message - 
  From: Alvaro 
  To: delphi-br@yahoogrupos.com.br 
  Cc: [EMAIL PROTECTED] 
  Sent: Monday, December 04, 2006 10:31 AM
  Subject: Re: [Delphi-br] conversao Inteiro p/ Binario


  function DecToBin(Valor: Integer): string;
  var
  S: string;
  i: integer;
  Negative: boolean;
  begin
  Negative := (valor  0);

  valor := Abs(valor);
  for i := 1 to SizeOf(valor) * 8 do
  begin
  if valor  0 then
  S := S + '1'
  else
  S := S + '0';
  valor := valor shl 1;
  end;
  Delete(S, 1, Pos('1', S) - 1);

  if Negative then
  S := '-' + S;
  Result := S;
  end;

  Em 04/12/06, Julio Cesar Quierati [EMAIL PROTECTED] escreveu:
  
   Fiz o codigo utilizando mod, div, e ficou muito grande meu codigo,
   precisava dar uma refinada !
   sera que alguem conhece uma forma mais pratica ?
  
  
   -
   Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Att.,
  Alvaro Esteves Alves
  Analista de Sistemas
  55 11 8214-7819

  The information contained in this message and in the attached
  files are restricted, and its confidentiality protected by law. In case you
  are not the addressee, be aware that the reading, spreading and copy of this
  message is unauthorized. Please, delete this message and notify the sender.
  The improper use of this information will be treated according the company's
  internal rules and legal laws.

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



   

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



Re: RES: [delphi-br] Documentação da OTA

2006-12-04 Por tôpico Henrique Netzka \(Vetor Sistemas\)
www.gexperts.org/toolsapi

Lá tem vários links que ajudam!! Mas nada como experimentar, experimentar, 
reiniciar o Delphi umas 40 vezes e conseguir desenvolver algo sem muitas 
exceções de access violations hehehe

Henrique Netzka


  - Original Message - 
  From: Marcos Douglas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 04, 2006 5:04 PM
  Subject: Re: RES: [delphi-br] Documentação da OTA


  João,
  Procure pelo sub-projeto do JEDI, o JediCodeFormart (formatador de código).
  Este projeto tem uma parte que é um plugin para a IDE. Veja como é o código.

  mD

   Mensagem Original 
  From: Joao Morais [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Seg, Dezembro 4, 2006 4:45 pm
  Subject: Re: RES: [delphi-br] Documentação da OTA

   Sérgio T. Uetanabaro wrote:
  
   Olá João,
  
  
   Se você puder ser um pouco mais específico nas suas necessidades eu
   posso ter alguns exemplos. Os OTAs services são bem amplos e uma
   documentação completa sobre eles vc nao vai achar.
  
  
   Olá Sérgio,
  
   Eu preciso de tudo um pouco, tal como inserir opção no menu e no
   New..., criar nova unit, mexer no editor, mexer no .dpr, trocar foco,
   e o resto vou descobrindo conforme a implementação.
  
   Qualquer indicação de material ou exemplos de uso serão muito bem vindos.
  
   Obrigado,
   --
   João Morais
  



   

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



Re: [delphi-br] Como copiar dados de uma tabela para outra? [OFF]

2006-12-04 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Caroline,

Coloque uma trigger na tabela CARTEIRA, no evento AFTER INSERT, que inclua! 
Algo assim:

SET TERM ^;
CREATE TRIGGER TG_Carteira_AftIns
  FOR CARTEIRA
  AFTER INSERT
AS
BEGIN
  INSERT INTO 
CARTEIRA 2
  (
CAMPOS
  ) VALUES (
NEW.Campo1,
NEW.Campo2...
  );
   
END^

Henrique Netzka

  - Original Message - 
  From: carolinetcc 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 04, 2006 5:21 PM
  Subject: [delphi-br] Como copiar dados de uma tabela para outra?


  Olá gente!

  Eu tenho um banco de dados Firebird e entre as tabelas, tenho uma
  chamada CARTEIRA e outra chamada CARTEIRA2 e eu preciso que quando
  todos os dados dos campos forem cadastrados em CARTEIRA, sejam
  automaticamente gravados nos mesmos campos da tabela CARTEIRA2.

  Vocês podem me ajudar por favor?



   

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



Re: RES: [delphi-br] Documentação da OTA

2006-12-04 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Ei, vc já viu o help do Delphi sobre isso, que vem junto?? Eu descobri bastante 
coisa lá...

  - Original Message - 
  From: Joao Morais 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 04, 2006 5:47 PM
  Subject: Re: RES: [delphi-br] Documentação da OTA


  Henrique Netzka (Vetor Sistemas) wrote:

   www.gexperts.org/toolsapi
   
   Lá tem vários links que ajudam!! Mas nada como experimentar, experimentar, 
reiniciar o Delphi umas 40 vezes e conseguir desenvolver algo sem muitas 
exceções de access violations hehehe

  Mas isso já faz parte do cronograma. Falta mesmo é o resto do material :-)

  Obrigado Henrique e Marcos.

  --
  João Morais

   Henrique Netzka
   
   
   - Original Message - 
   From: Marcos Douglas 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Monday, December 04, 2006 5:04 PM
   Subject: Re: RES: [delphi-br] Documentação da OTA
   
   
   João,
   Procure pelo sub-projeto do JEDI, o JediCodeFormart (formatador de código).
   Este projeto tem uma parte que é um plugin para a IDE. Veja como é o código.
   
   mD
   
    Mensagem Original 
   From: Joao Morais [EMAIL PROTECTED]
   To: delphi-br@yahoogrupos.com.br
   Sent: Seg, Dezembro 4, 2006 4:45 pm
   Subject: Re: RES: [delphi-br] Documentação da OTA
   
Sérgio T. Uetanabaro wrote:
   
Olá João,
   
   
Se você puder ser um pouco mais específico nas suas necessidades eu
posso ter alguns exemplos. Os OTAs services são bem amplos e uma
documentação completa sobre eles vc nao vai achar.
   
   
Olá Sérgio,
   
Eu preciso de tudo um pouco, tal como inserir opção no menu e no
New..., criar nova unit, mexer no editor, mexer no .dpr, trocar foco,
e o resto vou descobrindo conforme a implementação.
   
Qualquer indicação de material ou exemplos de uso serão muito bem vindos.
   
Obrigado,
--
João Morais
   
   



   

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



Re: [delphi-br] DBExpress

2006-11-30 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Fellipe,

Aproveitando que você comentou, me diga uma coisa... Como você faz com os 
generators? Pq na IBX é fácil, ele pega o valor do generator e está tranqüilo; 
mas o DBExpress não tem essa facilidade. Já pensei em alguns métodos ,mas me 
parecem meio toscos (do tipo buscar o valor do generator antes de gravar o 
registro). Tem alguma forma mais direta de trabalhar com generator e 
ClientDataSets?

Abraços
Henrique Netzka

  - Original Message - 
  From: Fellipe Henrique 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, November 30, 2006 4:00 PM
  Subject: Re: [delphi-br] DBExpress


  Olha, se você quer rapidez use o IBX, já com DBExpress você terá um pouco
  mais de trabalho, mas o resultado é muito melhor...eu particularmente, nao
  uso mais IBX, somente DBExpress...

  []s

  Em 30/11/06, Fabio Dantas [EMAIL PROTECTED] escreveu:
  
   Pessoal vcs recomendam o uso da paleta dbExpress para acessar o
   firebird ? ou melhor outro componente ?
  
  
   Abraço
  
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  _
  Fellipe Henrique
  [EMAIL PROTECTED]

  Venham até a borda, ele disse.
  Eles disseram: Nós temos medo.
  Venham até a borda, ele insistiu.
  Eles foram, Ele os empurrou...
  E eles voaram.
  (Guillaume Apollinaire)

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



   

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



Re: [delphi-br] Validação mais inteligente

2006-11-30 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Mas essa funçao é bem mais demorada do que fazer a comparação direta... Além do 
quê, se são exceções (pq 111 não é um CPF válido, então a validação é 
para deixá-lo passar, certo?!), é melhor deixar o mais visível possível (acho 
eu). Porque exceções não são esperadas pelo próximo programador que vai pegar o 
código, então é melhor q fique mais visível pra este!

De qualquer forma, antes que gere qualquer polêmica, eu sei que a velocidade de 
ambas as formas é ridícula e desprezível! Mas bem, já li até críticas sobre o 
FieldByName pelo consumo de processamento; então, para os que se preocupam 
com a velocidade do FieldByName, se preocupem também com a velocidade de usar 
uma função como essa (Occurs) em relação à comparação direta. :)

Gabriel, não leve a mal ok?! Só comentando e discutindo mesmo...

Henrique Netzka

  - Original Message - 
  From: Gabriel Filho 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, November 30, 2006 3:41 PM
  Subject: Re: [delphi-br] Validação mais inteligente


  Function Occurs(T, S : ShortString) : Byte;
  Var
  P : Byte;
  Begin
  Result := 0;
  P := Pos (T, S);
  while P  0 do
  begin
  Inc (Result);
  S := Copy (S, P + Length (T), 255);
  P := Pos (T, S);
  end;
  End;

  Essa funcao identifica quantas ocorrecias de um caracter há em uma string,

  Desculpe nao postar a fonte mas tenho faz tempo e nao me lembro onde
  consegui.
  Mas se nao me engano foi o DTDelphi

  espero ter ajudado

  Codigo de Ex.:

  usei isso no onValidate do campo

  If (Occurs(copy((Sender as TField).Value,0,1),(Sender as TField).Value)11)
  then

  Em 30/11/06, Rodrigo [EMAIL PROTECTED] escreveu:
  
   if (cpf  '000')and(cpf  '111')and(cpf 
   '222')
   and(cpf  '333')and(cpf  '444')and(cpf 
   '555')
   and(cpf  '666')and(cpf  '777')and(cpf 
   '888')
   and(cpf  '999')then
  
   galera tenho uma validação de CPF e tive que colocar esse codigo acima
   também
   existe uma forma de validação...usando expressão regular..ou algo melhor
   do que o acima...?
  
   qq sugestão é bem vinda.
  
   abs.
  
   Rodrigo Mota.
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

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



   

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



Re: [delphi-br] Off-Topicc - Roteador

2006-11-28 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Procure no Google, existem vários e de quase todas as marcas... Difícil é achar 
no Brasil, mas existem... Procure por Twin Wan, Double Wan, etc etc...

  - Original Message - 
  From: HNS Informática 
  To: Delphi BR 
  Sent: Monday, November 27, 2006 10:59 PM
  Subject: [delphi-br] Off-Topicc - Roteador


  Pessoal, ta for a da discussão DA lista, mas preciso saber se alguém conhece
  algum roteador que de para ligar dois link's ADSL. Possuo duas redes com um
  link cada um, e estou querendo fazer só uma rede, usando um roteador para
  ligar as duas ADSL somando a banda, alguém sabe de algum roteador que faça
  isso no ADSL DA Brasil Telecom? 

  Abraços 

  Charles A. Chiodi 
  HNS Informatica

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



   

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



Re: [delphi-br] chamar um form sem perder o foco do form criador

2006-11-27 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Tipo um Hint?

  - Original Message - 
  From: Gabriel Filho 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 27, 2006 9:14 AM
  Subject: [delphi-br] chamar um form sem perder o foco do form criador


  Bom dia,

  Gostaria de saber se exite uma maneira de dar um show em um form sem
  perder o foco do form que o chamou

  Desde já agradeço!

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



   

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



Re: [delphi-br] chamar um form sem perder o foco do form criador

2006-11-27 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Então... dê uma olhada no Windows SDK Help (que tem lá no menu Help do Delphi). 
Procure por CreateWindowEx. tem um monte de parâmetros lá que podem ser úteis 
pra definir melhor as janelas... o que você procura se chama WS_EX_NOACTIVATE. 
Para defini-lo, você sobrescreverá a procedure CreateParams no seu form, e 
definirá da seguinte forma:

Params.ExStyle := Params.ExStyle or WS_EX_NOACTIVATE;

Talvez você queira combiná-lo com outras características, como WS_EX_TOPMOST ou 
WS_EX_TOOLWINDOW. Também, você pode redefinir o pai da janela para o Desktop 
(caso queira um comportamento igual ao de uma janela hint), fazendo:

Params.WndParent := GetDesktopWindow;

Desta forma, você terá a janela acima de todas as outras (inclusive outros 
aplicativos). Este tipo de janela pode ser usado, por exemplo, pra criar uma 
janela igual à do MSN (que não recebe foco e aparece em cima de todo mundo).

Espero ter sido útil...
Henrique Netzka

  - Original Message - 
  From: Gabriel Filho 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 27, 2006 9:42 AM
  Subject: Re: [delphi-br] chamar um form sem perder o foco do form criador


  Isso! mais ou menos isso

  Em 27/11/06, Henrique Netzka (Vetor Sistemas) [EMAIL PROTECTED]
  escreveu:
  
   Tipo um Hint?
  
   - Original Message -
   From: Gabriel Filho
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Sent: Monday, November 27, 2006 9:14 AM
   Subject: [delphi-br] chamar um form sem perder o foco do form criador
  
   Bom dia,
  
   Gostaria de saber se exite uma maneira de dar um show em um form sem
   perder o foco do form que o chamou
  
   Desde já agradeço!
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

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



   

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



Re: [delphi-br] Imprimir arquivo

2006-11-27 Por tôpico Henrique Netzka \(Vetor Sistemas\)
AssignFile(Arq, 'LPT1')

é uma forma :)

  - Original Message - 
  From: dionatanhenrique 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 27, 2006 1:47 PM
  Subject: [delphi-br] Imprimir arquivo


  Pessol, como faco para enviar um arquivo de minha maquina direto para 
  impressora?



   

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



Re: [delphi-br] Trocar enter por nulo

2006-11-16 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Henry,

Antes de procurar por #13, procure pela combinacao #13#10; no windows, esta eh 
a sequencia de caracteres de quebra de linha.  E pode usar o StringReplace 
tambem, do tipo str := StringReplace(str, #13#10, #0, [rfReplaceAll]);

Depois de substituir o #13#10, substitua o #13 pra garantir caso o arquivo seja 
unix-based...

Henrique
  - Original Message - 
  From: Henry Maltz 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, November 16, 2006 3:03 PM
  Subject: [delphi-br] Trocar enter por nulo


  Pessoal, como o subject já diz, hehehe, alguém sabe como trocar enter por
  nulo?

  tentei assim, mas está colocando um espaço e queria simplesmente sumir com
  aquela casa:

  if pos(#13, ls_temp)  0 or pos(#10, ls_temp) then
  ls_temp[ll_pos] := #0;

  obrigado

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



   

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



Re: [delphi-br] Re: Programar para Palm, existe alguma ide gratuita?

2006-11-08 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Eu usei C#!! VB é meio limitado (acho)...

Mas no Visual Studio, você deve selecionar para iniciar um projeto para Smart 
Device! Os componentes são bem limitados, mas ainda assim dá pra criar muito 
mais coisa do que eu já tinha visto com outras ferramentas... Programei um 
sistema para registrar meus treinos (de corrida) que grava em XML os dados e 
sincroniza com o PC; e programei aqui para a empresa um sistema para um coletor 
de dados da Symbol, que usa WindowsCE; ele também grava em XML; daí fiz um 
programinha em C# (para Desktop) que faz o papel do Sync, puxando o XML do 
coletor e/ou enviando para ele se for o caso... Esse programa ativo pelo 
Delphi, e assim tenho um sistema em Delphi se comunicando com o Pocket...

Dá pra fazer essa comunicação utilizando a tecnologia COM e interagindo com o 
ActiveSync. Não fiz de vadio mesmo, porque ficaria até melhor do que tendo 
feito o software intermediário...

Ah... e as versões Express não desenvolvem pra Smart Devices... Tem que ser o 
VS mesmo...

Henrique
  - Original Message - 
  From: Hayalon A. de Oliveira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, November 07, 2006 2:31 PM
  Subject: RES: [delphi-br] Re: Programar para Palm, existe alguma ide gratuita?


  Henrique o que vc usa VB??
  O VB Express tb funciona??



_  

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Henrique Netzka (Vetor Sistemas)
  Enviada em: terça-feira, 7 de novembro de 2006 15:28
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Re: Programar para Palm, existe alguma ide
  gratuita?


  Se é pra recomendar, estou com a .NET ... É muito fácil e rápido desenvolver
  para PDA em .NET (mas claro, apenas para PDAs que possuem Windows-based OS).
  Pra PalmOS, boa sorte...
- Original Message - 
From: Walter Chagas (Yahoo) 
To: delphi-br@yahoogrupos.com.br 
Sent: Tuesday, November 07, 2006 1:16 PM
Subject: [delphi-br] Re: Programar para Palm, existe alguma ide gratuita?


Existem muitas aí na WEB. Me lembro de uma que na época chamava 
VisualPocket. Uma IDE muito simples pra programação para Palm usando 
PalmOS e para PDA que usassem o PocketPC ou Windows CE. Pra Palm 
gerava um programinha manero mas muito limitado de recursos. Pra PDA 
no Windows CE dava pau demais. Na época, na lista de discussão que eu 
participava, um cara conseguiu gerar um programinha pra rodar no 
Jornada, mas muito precariamente. A programação era toda na munheca 
mesmo pois a IDE consistia num editor de texto com interação direta 
com o compilador e só. Se é que podiamamos chamar aquilo de IDE...

Pela experiencia que já tive de programação para portáteis, estas 
ferramentas são muito limitadas e cheias de bugs. Você vai passar 
muito mais raiva do que conseguir produzir descentemente com elas.


[]s



Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
http://www.geocities.com/SiliconValley/Bay/1058
MSN: [EMAIL PROTECTED]


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

 Amigos, existe alguma maneira para programar para Palm de forma 
gratuita,
 que nao seja o PocketStudio  e tals? Estou precisando urgente.
 
 Desde já agradeço
 
 []s
 
 -- 
 _
 Fellipe Henrique
 [EMAIL PROTECTED]
 
 Borland Developer Studio 2006 Certified
 
 Venham até a borda, ele disse.
 Eles disseram: Nós temos medo.
 Venham até a borda, ele insistiu.
 Eles foram, Ele os empurrou...
 E eles voaram.
 (Guillaume Apollinaire)
 
 
 [As partes desta mensagem que não continham texto foram removidas]




 

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





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

   

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




-- 
 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] Re: Programar para Palm, existe alguma ide gratuita?

2006-11-08 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Visual Studio.
  - Original Message - 
  From: sdf sdf 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, November 08, 2006 8:10 AM
  Subject: Res: [delphi-br] Re: Programar para Palm, existe alguma ide gratuita?


  Gostaria de saber um software para programar para pocketPC (windows mobile), 
se teria algum tipo delphi.?
  que seja facil de rodar 
  obrigado






  - Mensagem original 
  De: Thiago Menon [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quarta-feira, 8 de Novembro de 2006 8:18:39
  Assunto: Re: [delphi-br] Re: Programar para Palm, existe alguma ide gratuita?

  Acho q uma opção melhor seria programar em PHP (isso se o Palm tiver um 
  broswer) pois se caso acontece do cliente trocar os Palm vc nao terá q 
  refazer o sistema.

  Thiago

  Walter Chagas (Yahoo) escreveu:

  Realmente programação para Palm não é nenhum bicho de 7 cabeças mesmo 
  não. O que existem são limitações do proprio produto, em relação ao 
  PC, mas que você aprende rapido a contornar numa boa.
  
  Aliás, programar pra PDA chega a ser mais complicado porque muitas 
  vezes o equipamento ainda requer um SDK que voce tem que instalar na 
  IDE da sua ferramenta e mandar uns RT lá pro portátil. Aí o cliente 
  troca de Coletor, por exemplo, e lá vai você ter que readequar tuuudo 
  outra vez: Arruma o SDK, adequa seu projeto, compila e manda...
  Penei muito com impressorinhas portáteis Zebra com Bluetooth 
  conectadas a um iPac. Ora ia ora não ia. Um cara, numa lista de 
  discussão de Windows CE me salvou nessa, me passou uma DLL que não 
  foi inclusa no SDK (por falha do fabricante) da Zebra e que resolveu 
  todos os problemas de conexão da impressora com o PDA. DEUS ME LIVRE 
  VIU
  
  O Pocket, realmente, é muito massante mesmo. O povo vê ele e acha que 
  é igual o Delphi. Tá a IDE é. Beleza, mas para por aí (O PocketStudio 
  optou por seguir a mesma filosofia do Code Warrior. A vantagem é que 
  o Pocket é em pascal e o Code em C). Daí pra frente cada um segue sua 
  filosofia. Delphi tem VCL o Pocket Não. Delphi tem CDS, o Pocket nem 
  sabe o que é isto. O Delphi trabalha com SQL, o Pocket não. Um 
  programa bem feito no Delphi você consegue escrever pouco. Um 
  programa bem feito no Pocket tu vai ter que codificar pra carai. 
  
  
  Agora, vai programar praqueles Ciper's da vida, vai!
  
  []s
  
  
  
  Walter Alves Chagas Junior
  Belo Horizonte - MG - Brazil
  [EMAIL PROTECTED]
  http://www.geocities.com/SiliconValley/Bay/1058
  MSN: [EMAIL PROTECTED]
  
  --- Em delphi-br@yahoogrupos.com.br, Mauro Risonho 
  [EMAIL PROTECTED] escreveu

  
  Eu desenvolvo para Palms faz 5 anos, e em meu ultimo emprego em
  Jaguariuna-SP, na JRS Computação,fiz um software para imobiliárias.
  
  Foi em PocketStudio, uma bosta, para codar, mas funciona o software 
  
  
  de

  
  imobiliárias sem pau algum.
  
  Se quiser me contactar
  
  MSN [EMAIL PROTECTED]
  
  Obrigado
  
  Em 07/11/06, Juliano Carvalho - Folhamatic [EMAIL PROTECTED]
  escreveu:
  
  
  Terceiriza cara.
  Contrata alguém que já manja Palm e fica com o lucro.
  Programação com Palm é bem mais complicada que Windows
- Original Message -
From: Fellipe Henrique
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, November 07, 2006 1:27 PM
Subject: Re: [delphi-br] Re: Programar para Palm, existe alguma 

  
  ide

  
  gratuita?
  
  
Valeu Walter, o problema é que agora é que pintou um cliente 

  
  pra um

  
sisteminha pra Palm, e eu nao queria comprar um PocketStudio 

  
  pra isso, é

  
caro d+,
  
Vou tentar achar esse VisualPocket aí.
  
Se alguem souber de mais alguns, preciso pra programar para 

  
  PalmOS.

  
desde ja agradeço
[]s
  
  
Em 07/11/06, Walter Chagas (Yahoo) [EMAIL PROTECTED] escreveu:

 Existem muitas aí na WEB. Me lembro de uma que na época 

  
  chamava

  
 VisualPocket. Uma IDE muito simples pra programação para Palm 

  
  usando

  
 PalmOS e para PDA que usassem o PocketPC ou Windows CE. Pra 

  
  Palm

  
 gerava um programinha manero mas muito limitado de recursos. 

  
  Pra PDA

  
 no Windows CE dava pau demais. Na época, na lista de 

  
  discussão que eu

  
 participava, um cara conseguiu gerar um programinha pra rodar 

  
  no

  
 Jornada, mas muito precariamente. A programação era toda na 

  
  munheca

  
 mesmo pois a IDE consistia num editor de texto com interação 

  
  direta

  
 com o compilador e só. Se é que podiamamos chamar aquilo de 

  
  IDE...

  

 Pela experiencia que já tive de programação para portáteis, 

  
  estas

  
 ferramentas são muito limitadas e cheias de bugs. Você vai 

  
  passar

  
 muito mais raiva do que 

Re: [delphi-br] Criando Objeto

2006-11-08 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Como assim? Você está criando on the fly? Caso sim, atribua a propriedade 
Parent do WebBrowser para o TabSheet

Henrique
  - Original Message - 
  From: Rodrigo F. Borges 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, November 07, 2006 4:35 PM
  Subject: [delphi-br] Criando Objeto


  Olá pessoal,
  Eu preciso criar um TWebBrowser, mas quero que ele seja carregado dentro de 
uma tabSheet.
  Ele é criado, mas fica fora da tabsheet.
  Alguem saberia o que devo fazer para que ele seja iniciado dentro de tal 
objeto ?

  Valew!

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


   

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




-- 
 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] TreeView

2006-11-08 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Clovis...

A quantidade de espaços, na realidade, não são caracteres TABs? Ele não deve 
criar espaços para indentar, ele deve colocar caracteres #9! Com um editor tipo 
EditPlus você consegue formatar o tamanho do caracteres TAB na visualização...

Henrique
  - Original Message - 
  From: Clovis 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, November 08, 2006 9:35 AM
  Subject: [delphi-br] TreeView



  Saudações 
  Estou trabalhando com o componente treeview e até agora tudo bem. Qdo vamos
  cadastrando novos elementos o proprio componente vai criando dentro de um
  arquivo texto, novas linhas e dependendo da hierarquia, vai endentando essas
  linhas automaticamente. Só que para o meu serviço a quantidade de espaços em
  branco, na endentação, é muito grande. Gostaria de saber como posso deixar
  essa quantidade de acordo com a minha necessidade.Alterando o componente ou
  criando um novo componente. 
  Obrigado 
  Clovito 




  QUE O GRANDE ARQUITETO DO UNIVERSO NOS AMPARE 
  Msn- [EMAIL PROTECTED] 
  Dourado(SP)   
(0xx163345-1228)

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

   

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




-- 
 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] Mostrar número da linha no dbGrid

2006-11-07 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Bem... você pode criar uma coluna dummy no grid e interceptar o OnDraw 
dela! rs

Henrique
  - Original Message - 
  From: Leodinei Bielak 
  To: delphi-br 
  Sent: Tuesday, November 07, 2006 7:46 AM
  Subject: [delphi-br] Mostrar número da linha no dbGrid


  Olá.
  Alguém sabe como eu faço pra mostrar o número da linha do dbGrid em uma
  coluna. Sem precisar depender do número da linha no dataset?
  Valeu.

  -- 
  Leodinei Bielak

  Civilization had too many rules for me, so I did my best to rewrite them.
  _Bill Cosby_


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

   

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




-- 
 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] Re: Programar para Palm, existe alguma ide gratuita?

2006-11-07 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Se é pra recomendar, estou com a .NET ... É muito fácil e rápido desenvolver 
para PDA em .NET (mas claro, apenas para PDAs que possuem Windows-based OS). 
Pra PalmOS, boa sorte...
  - Original Message - 
  From: Walter Chagas (Yahoo) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, November 07, 2006 1:16 PM
  Subject: [delphi-br] Re: Programar para Palm, existe alguma ide gratuita?


  Existem muitas aí na WEB. Me lembro de uma que na época chamava 
  VisualPocket. Uma IDE muito simples pra programação para Palm usando 
  PalmOS e para PDA que usassem o PocketPC ou Windows CE. Pra Palm 
  gerava um programinha manero mas muito limitado de recursos. Pra PDA 
  no Windows CE dava pau demais. Na época, na lista de discussão que eu 
  participava, um cara conseguiu gerar um programinha pra rodar no 
  Jornada, mas muito precariamente. A programação era toda na munheca 
  mesmo pois a IDE consistia num editor de texto com interação direta 
  com o compilador e só. Se é que podiamamos chamar aquilo de IDE...

  Pela experiencia que já tive de programação para portáteis, estas 
  ferramentas são muito limitadas e cheias de bugs. Você vai passar 
  muito mais raiva do que conseguir produzir descentemente com elas.


  []s



  Walter Alves Chagas Junior
  Belo Horizonte - MG - Brazil
  [EMAIL PROTECTED]
  http://www.geocities.com/SiliconValley/Bay/1058
  MSN: [EMAIL PROTECTED]


  --- Em delphi-br@yahoogrupos.com.br, Fellipe Henrique 
  [EMAIL PROTECTED] escreveu
  
   Amigos, existe alguma maneira para programar para Palm de forma 
  gratuita,
   que nao seja o PocketStudio  e tals? Estou precisando urgente.
   
   Desde já agradeço
   
   []s
   
   -- 
   _
   Fellipe Henrique
   [EMAIL PROTECTED]
   
   Borland Developer Studio 2006 Certified
   
   Venham até a borda, ele disse.
   Eles disseram: Nós temos medo.
   Venham até a borda, ele insistiu.
   Eles foram, Ele os empurrou...
   E eles voaram.
   (Guillaume Apollinaire)
   
   
   [As partes desta mensagem que não continham texto foram removidas]
  



   

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




-- 
 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] criando formulários

2006-11-07 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Bem... ou você os redesenha (rs)... Ou você pega um compnente de Skin. Aqui na 
empresa compramos a palheta BusinessSkinForm, da AlmediaDev (www.almdev.com)... 
É bem bacana, os caras são bem honestos e o valor é baixo. Além disso, como 
dá pra mudar o skin dinamicamente, você pode colocar uma interface pro cliente 
escolher o skin.

Henrique
  - Original Message - 
  From: Virgilho Henrique 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, November 07, 2006 1:27 AM
  Subject: [delphi-br] criando formulários


  como criar formularios(form) diferentes??

  eu gostaria de dar um visual diferente aos meus formularios, ou seja, as
  janelas do meu programa.. como fazer??

  -- 
  Fraternalmente,

  Sir Virgilho Henrique Silva


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


   

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




-- 
 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] Sender TWinControl

2006-11-06 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Pode usar o FindComponent também...
  - Original Message - 
  From: Paulo Sérgio de Souza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 06, 2006 1:47 PM
  Subject: Re: [delphi-br] Sender TWinControl


  Boa tarde Cristiano,

  Você pode fazer assim:

  Var
ScrollName: String;
Indice: Integer
  begin
if (Sender is TPanelPraca) then
begin
  ScrollName := 'ScP_' + copy(TPanelPraca(sender).Name;
  for Indice := 0 to Form.ComponentCount -1 do
if  UpperCase(Form.Components[Indice].Name) = UpperCase(ScrollName) then
begin
  Form.Components[Indice].Heigth :=  100;
  Break;
end;
end;
  end;

  Espero ter lhe ajudado.

  Sds,

  Paulo Sérgio
  Desenvolvedor
  B.Hte./MG
- Original Message - 
From: cristianopintado 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, November 06, 2006 12:39 PM
Subject: [delphi-br] Sender TWinControl


Gente, eu crio alguns componetes em tempo de execução, e dou alguns 
nomes a eles. O que eu preciso é seleciona-los com o nome em formato 
de texto. O que acontece é exatamente o seguinte:

Dentro de um ScrollBox, Eu crio vários Scroll, cada um com um 
componente TPanel (que uso como botão) e vários labels dentro dos 
mesmos Scroll, o Panel serve para quando eu clicar ele selecionar o 
Scrol a qual ele pertence (propriedade Parent apontada para o 
scrol) ele teria de mudar a propriedade heigth deste scrol. Quando 
Clico no Tpanel, pego o nome dele:

Scrol : String;
begin
if (Sender is TPanelPraca) then
  Scrol := 'ScP_' + copy(TPanelPraca(sender).Name, 4,Length; que 
é o nome do Scroll. Dou um nome parecido ao Tpanel para saber como 
pegar o nome, mas em String..

O que eu preciso saber é se é possivel eu setar como ativo um exemplo:


Scrol.heigth := 100; //Isso não funciona 

Como eu poderia setar um componente sabendo só o nome dele?

alguém sabe?

Abraços..


 


  --


No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.409 / Virus Database: 268.13.28/518 - Release Date: 04/11/2006


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

   

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




-- 
 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] Impressão por canvas

2006-11-06 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Então.. tem um componente bem legal e barato, o RDPrint.. usamos aqui na 
empresa, é de uma empresa de Marília que não lembro o nome. Para imprimir 
direto na impressora (com Canvas), você não tem como usar 1, 1, pq existem 
bem mais pixels do que 1 por linha; mas você pode montar sua própria função, e 
passar pra ela (1, 1) e ela converter nos números corretos!

Henrique
  - Original Message - 
  From: galvao_em 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 06, 2006 10:27 AM
  Subject: [delphi-br] Impressão por canvas


  Olá, gostaria de saber como faço para o meu programa imprimir
  diretamente sem usar relatórios visuais tipo assim:
  print(x,y, teste') onde x e y são respectivamente a linha e a coluna
  onde quero, achei na internet alguns exemplos mas os números de linha e
  coluna são muito grandes tipo (3500, 6200) eu queria algo do tipo linha
  1 coluna1 fosse (1,1) e assim por diante.

  desde já agradeço a colaboração.

  Att

  Rodrigo


  
  ___ 
  O Yahoo! está de cara nova. Venha conferir! 
  http://br.yahoo.com 
   

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




-- 
 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] Função que retorna array

2006-11-06 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Leodinei,

Você não pode criar um Result como array, mas pode passar um parâmetro 
variável como tal.

procedure GeraArray(var Vetor: array...);

Henrique
  - Original Message - 
  From: Leodinei Bielak 
  To: delphi-br 
  Sent: Monday, November 06, 2006 9:35 AM
  Subject: [delphi-br] Função que retorna array


  Olá pessoal.
  Eu quero fazer uma função que retorna um array com o valor das parcelas.
  De preferência uma array dinâmico.
  Mas o delphi diz que eu não posso declarar como retorno um array.
  E se eu eu crio um tipo a partir de um array e defino o retorno da função
  desde tipo ocorre um erro de runtime.
  Se alguém puder em ajudar.

  Valeu.

  -- 
  Leodinei Bielak

  Civilization had too many rules for me, so I did my best to rewrite them.
  _Bill Cosby_


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

   

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




-- 
 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