[delphi-br] Funcoes Sql genéricas para apoio

[Praxis]

Gostaria de montar, numa unit de apoio (que não tem form)
três funcões:

função SELECIONAR
função DELETAR
função  ATUALIZAR

Estas funçôes precisam ser genéricas
para servirem a qualuer formulário
com qq número de campos para
ser selecionado da tabela,
deletado e atualizado.

É possível???




[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

 

[delphi-br] Gravar texto (RichEdit) formatado no banco de dados (Firebird)

[Jader Ricardo]

Olá amigos !
 
Não conheço bem o componente RichEdit e gostaria de um auxilio de vocês.
Estou fazendo manutenção em um programa que monta um texto e joga em um
RichEdit, formatando e colocando determinadas linhas em negrito. O usuário
então vai lá e modifica o texto acrescentando mais informações. Preciso
gravar este texto que foi modificado e mostra-lo posteriormente da mesma
forma que estava. Existe alguma forma de gravar este texto formatado e
depois somente joga-lo no RichEdit e ele estaria já formatado ou terei que
ler linha a linha, verificar se o atributo da linha está em negrito e gravar
esta linha no banco de dados e depois ler do banco checando se a linha está
flegada (na tabela) como negrito e depois montar tudo no RichEdit ?
Vixi, não sei se consegui me expressar, mas, tai o meu problema, se alguém
tiver uma sugestão ficarei grato.
 
Jader Ricardo


[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

 

[delphi-br] Portabilidade

[Bruno]

Boa Noite pessoal pensante,

Fiz um programa show de bola com acesso a banco de dados e tudo mais.
Funcionou perfeitamente na minha máquina.
Então, gravei num cd o .exe e as tabelas e ao chegar no computador da minha
faculdade coloquei as tabelas no mesmo caminho físico que estava no meu
computador.
Não funcionou. O .exe deu erro em tempo de execução.
Daí perguntei a uma professora "Tem jeito isso ? " e ela me respondeu "Você
vai ter que recompilar o código na máquina em que vc quer executar.  "
Eu fiquei quieto mas não aceitei. Não aceitei porque se a banda tocasse
assim a E.A. não venderia .exes a rodo e estes .exes não funcionariam em
máquinas tão diferentes uma das outras.
Então pergunto a vocês na lista : Como fazer meu programa em Delphi 6
portável para a plataforma Windows, seja ela qual for ?


Abraço a todos,

Bruno Santiago Arêas.


[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

 

[delphi-br] Re: Debugando DLL's

[tranquilog12]

É o seguinte:

Estou desenvolvendo uma DLL em Delphi 5, em uma máquina com Windows 
XP Professional.

O caso é que, quando eu dou f9 pra iniciar o aplicativo, pra depois 
acessar a opção e chamar a dll pra debugar, ele dá access violation 
enão executa nem debuga a dll.

Isso só acontece no Windows XP, no Win 98, 2000, etc, eu consigo 
debugar normalmente.

Obrigado!



--- Em delphi-br@yahoogrupos.com.br, "Rubem Nascimento da Rocha" 
<[EMAIL PROTECTED]> escreveu
>
> Dá mais detalhes sobre esse problema. Sds.
> 
> 
> >From: "tranquilog12" <[EMAIL PROTECTED]>
> >Reply-To: delphi-br@yahoogrupos.com.br
> >To: delphi-br@yahoogrupos.com.br
> >Subject: [delphi-br] Debugando DLL's
> >Date: Mon, 28 Aug 2006 14:29:18 -
> >
> >Bom dia a todos.
> >
> >Gostaria de saber se é possível debugar DLL's no Delphi 5, 
utilizando
> >Windows XP Professional
> >
> >Aqui dá "Access Violation"
> >
> >Obrigado!
> >
> >
> >
> >
> >
> >
> 
> _
> MSN Messenger: converse com os seus amigos online. 
> http://messenger.msn.com.br
>









-- 
< 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] Deixar o usuário escolher o numero que ele quer para a primeira pagi na de um relatório.

[Mauricio Virtual]

Utilize uma fórmula mais ou menos assim:
( PageNumber + vPaginaInicialEscolhida - 1 )

Assim vai ficar ( 1 + 7 - 1 )  e começa a numerar no 7, 8 9 que voce 
precisa.

sandro cunha escreveu:
> E ai rapaziada!
>   To precizando de um help de voces.
>   Preciso que um relatorio que estou criando em Quickreport (Erhhk) 
> comece a contar suas paginas a partir de um numero escolhido pelo 
> usuário. Por exemplo eu quero que a primeira pagina  do relatório 
> comece com o numero 7 e siga a partir dai contando o numero das 
> paginas a partir do 7.
>   Em vez de contar um relatório com 3 paginas desta forma: 1,2,3
>   como indiquei que ele começará com 7 ficaria assim: 7,8,9
>   Ja tentei isso:
>   
>   Inputquery('Informe o Numero de inicio desta Pagina:',Paginas);
> numero:=strtoint(paginas);
> QuickRep6.QRPrinter.FirstPage:=numero;
>   
>   Até compila mas quando vai abrir o relatorio da uma menssagem de erro.
>   Alguem poderia me indicar uma forma de fazer isso.
>   
>   
>   Um Grande abraço a todos.
>   Sandro
>
>
> -
> 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]
>
>  





-- 
< 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] Rotina para limpar campos dando problemas me unit sem form

[Rogerio Martins]

Você precisa passar o "pai" dos componentes como parâmetros.

Assim :
procedure LimparCampos(pai: TForm)
begin
   for  i := 0  to pai.ComponentCount -1 do
   begin
  if (pai.Components[i] is TEdit) Then
 (pai.Components[i] as TEdit).Clear;

  if (pai.Components[i] is TMaskEdit) then
  (pai.Components[i] as TMaskEdit).Clear;

end

- Original Message - 
From: "Praxis" <[EMAIL PROTECTED]>
To: "Delphi_BR" 
Sent: Thursday, August 31, 2006 4:27 PM
Subject: [delphi-br] Rotina para limpar campos dando problemas me unit sem 
form


Tenho uma rotina pra limpar todas as edits de um form e ela funciona.
Contudo, resolvi fazer uma unit de apoio, sem form,  onde coloquei vários
procedimentos importantes. Umas delas, a LimparCampos não está funcionando
e é a única. Alguém saberia explicar?


Segue parte do código abaixo


unit uApoio;//não está acoplada a um form

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Mask, StdCtrls, Buttons, ExtCtrls, DBCtrls;



//Exporta método pra outra unit
   procedure LimparCampos;



implementation

   uses ModuloDados, DateUtils, DB, IBQuery;



 procedure LimparCampos;
  var  i : integer;
  begin
   for  i := 0  to ComponentCount -1 do
   begin
  if (Components[i] is TEdit) Then
 (Components[i] as TEdit).Clear;

  if (Components[i] is TMaskEdit) then
  (Components[i] as TMaskEdit).Clear;
   end;

  end;



end.

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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >



Links do Yahoo! Grupos













-- 
< 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] SQLConnection com Oracle

[Danilo Rogério]

Rogério... encontrei esse documento no bdn da borland. e nos "news" da vida...

http://bdn.borland.com/article/20661

http://delphi.newswhat.com/geoxml/forumhistorythread?groupname=borland.public.delphi.database.dbexpress&[EMAIL
 PROTECTED]

http://forum.devmedia.com.br/viewtopic.php?t=56475&sid=b728559048eb0d684003abc6c2f6de08

Espero que dê certo...

Danilo

Rogerio Martins <[EMAIL PROTECTED]> escreveu:Eu havia feito essa ligação 
que você citou entre os componentes, justamente 
 por já ter utilizado DBExpress com Interbase 6.
 
 O problema é que quando vou abrir a query no ClientDataSet, aparece essa 
 mensagem "Operation not Applicable" para a SQLConnection conectada em uma 
 base Oracle.
 
 Mas, obrigado pela ajuda !
 
 - Original Message - 
 From: "Danilo Rogério" <[EMAIL PROTECTED]>
 To: 
 Sent: Tuesday, August 29, 2006 8:27 PM
 Subject: Re: [delphi-br] SQLConnection com Oracle
 
 
 SQLConnection e TQuery não combinam...
 
 SQLConnection = tecnologia DBExpress
 TQuery = tecnologia BDE
 
 Com SQLConection, vc utiliza mais 3 componentes nesta ordem: SQLQuery(esse 
 aqui é o seu TQuery) ou SQLDataSet(onde você faz os Selects), 
 DataSetProvider, ClientDataSet, DataSource.
 
 Atenciosamente,
 Danilo
 
 Rogerio Martins <[EMAIL PROTECTED]> escreveu:Bom dia 
 pessoal !!
 
   Tentei fazer um teste de conexão do componente SQLConnection em uma base 
 Oracle.
  O componente se conecta, mas ao abrir uma query ( que normalmente funciona 
 com um TQuery na BDE ) em um ClientDataSet  , aparece a mensagem "Operation 
 not Applicable"
  Alguém sabe como resolver isso ??
 
  Obrigado
 
  [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!
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 -- 
 < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
 
 
 
 Links do Yahoo! Grupos
 
 
 
 
 
 
 
 
 
 
 
   


-
 Yahoo! Search
 Música para ver e ouvir: You're Beautiful, do James Blunt

[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] campo tipo BLOB

[Luiz Eduardo Oliveira Fonseca]

q subtipo vc usou 



On 8/31/06, Gilson <[EMAIL PROTECTED]> wrote:
>
> Neste site abaixo tem uma dica que pode ser útil.
>
> http://delphi.about.com/library/weekly/aa030105a.htm
>
> Espero ter ajudado,
>
> []'s
>
> Gilson
>
> -Mensagem original-
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
> nome de ca_programador007
> Enviada em: quinta-feira, 31 de agosto de 2006 14:39
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] campo tipo BLOB
>
>
> Olá galera
>
> Criei uma tabela com o campo tipo BLOB, e no meu form coloquei o
> componente
> memo.
> Nas minhas consultas, este campo não mostra o conteúdo que está gravado,
> mas
> mostra assim: (MEMO).
>
> Tenho que fazer alguma conversão para o conteúdo gravado neste campo para
> aparecer corretamente nas minhas consultas?
>
> Valeu
>
> CA_programador007.
>
>
> -
> Yahoo! Search
> Música para ver e ouvir: You're Beautiful, do James Blunt
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
> 
>



-- 



Atenciosamente, Luiz Eduardo.


>> Desenvolvimento de Sistemas PHP e Delphi

>> Manutenção em Base de Dados MySQL , Interbase/Firebird e MS Access ...

Fone: (12) 8143-7191
email alternativo: [EMAIL PROTECTED]




[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

 

[delphi-br] Re: Migrar para sistema multicamadas

[Eduardo Bianchi Ribeiro]

  Welson,
Que Banco de Dados vc usa e com que metodo de acesso ? Ex. BDE,
DBExpress etc ... Vc vai ter IP Fixo ou Dinâmico ? Qual é a sua
infra-estrutura de rede (Tem Roteador) ?






--- Em delphi-br@yahoogrupos.com.br, Welson Avelar
<[EMAIL PROTECTED]> escreveu
>
> Amigos, perdoem o assunto do email, as foi o mais próximo que
encontrei para
> chamar a atenção para a minha questão.
> É o seguinte: temos hoje aqui na empresa um sistema que está em um
cliente com
> filiais espalhadas por Minas.
> Quando foi colocado o sistema, tinha a necessidade que os bancos de
dados de
> todos (matriz e filiais) permanecessem atualizados. Na época (eu não
estava na
> empresa ainda) foi feito o seguinte:
> A filial extrai todos os dados, de todas as tabelas, que foram
alterados e NÃO
> enviados na última exportação e manda para a matriz. A matriz
importa e exporta
> alguma coisa que ela tenha feito, no mesmo esquema que as filiais,
ou seja,
> extrai os dados, de todas as tabelas, que foram alterados e NÃO
enviados na
> última exportação.
> Isso nós fazíamos porque o cliente tinha conexão discada e somente a
matriz
> tinha banda larga (ela fica em Belo Horizonte). Recentemente todas
as filiais
> colocaram banda larga e eles resolveram centralizar o banco de
dados, porque é
> mais seguro contra invasão (física mesmo, de alguém ir lá e roubar o
BD) e
> roubo dos dados.
> 
> Bom, essa foi a explanação sobre como funciona o sistema hoje. É na
filosofia
> de cliente/servidor.
> Pra colocar da forma que o cliente deu idéia, eu coloquei a
possibilidade de
> passarmos pra multicamadas, mas uma dúvida ficou pertinente:
> o cliente disponibilizando um servidor dedicado, como eu conectarei
remotamente
> a essa máquina ?! O que eu quero saber é se "basta" passar o IP do
servidor
> para conectar a máquina e 'voi lá', já conectei...
> 
> Acho que falta perguntar mais coisas, mas como é uma coisa absolutamente
> inédita pra mim, nem sei o que perguntar. Por isso que peço a ajuda
dos amigos
> da lista, pra poderem me "dar a luz" no problema.
> 
> []s.
> 
> =
> "O que me preocupa não é o grito dos maus. É o silêncio dos bons."
> Martin Luther King.
> =
> Welson de Avelar Soares Filho
> Analista/Programador Delphi
> Gemini Sistemas
> 
> Juiz de Fora - Minas Gerais
> =
> 
> 
>   
> ___ 
> Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu
celular. Registre seu aparelho agora! 
> http://br.mobile.yahoo.com/mailalertas/
>







-- 
< 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] Deixar o usuário escolher o numero q ue ele quer para a primeira pagina de um relatório.

[Atendimento - BG on-line]

Blz Rapaz

Vc ta partidno pela logia errada. QuickRep6.QRPrinter.FirstPage não significa 
que é o numero que vai colocar na primeira pagina... e sim... quando vc imprime 
algum documento... por exemplo word: vc seleciona se deseja imprimir todas as 
folhas... ou da folha 3 até 5 firstpage é esse 3

Ja precisei fazer algo parecido com isso... não estou no escritorio agora para 
lhe enviar... mas é simples...

Cria uma variavel no seu form, insere uma banda de rodape, nela um qrlabel que 
apresentara o numero da página.

A banda tem o evento onprint... nesse evento soma 1 na variavel. e 
erlabel1.caption := inttostr(variavel);

Tenta lá... 



  - Original Message - 
  From: sandro cunha 
  To: Grupo Delphi 
  Sent: Thursday, August 31, 2006 5:11 PM
  Subject: [delphi-br] Deixar o usuário escolher o numero que ele quer para a 
primeira pagina de um relatório.


  E ai rapaziada!
To precizando de um help de voces.
Preciso que um relatorio que estou criando em Quickreport (Erhhk) comece a 
contar suas paginas a partir de um numero escolhido pelo usuário. Por exemplo 
eu quero que a primeira pagina  do relatório comece com o numero 7 e siga a 
partir dai contando o numero das paginas a partir do 7.
Em vez de contar um relatório com 3 paginas desta forma: 1,2,3
como indiquei que ele começará com 7 ficaria assim: 7,8,9
Ja tentei isso:
 
Inputquery('Informe o Numero de inicio desta Pagina:',Paginas);
  numero:=strtoint(paginas);
  QuickRep6.QRPrinter.FirstPage:=numero;
 
Até compila mas quando vai abrir o relatorio da uma menssagem de erro.
Alguem poderia me indicar uma forma de fazer isso.
 
 
Um Grande abraço a todos.
Sandro

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

   

[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

 

[delphi-br] Re: Rotina para limpar campos dando problemas me unit sem form

[Eduardo Bianchi Ribeiro]

  Oi, vc esqueceu de "dizer" pro seu metodo em que form ele deve
procurar os edits ...
  Segue as alterações necessárias ...

//Assinatura do metodo
procedure LimparCampos(AForm: TForm);

//metodo
procedure LimparCampos(AForm: TForm);
var
  i : integer;
begin
  for i:=0 to AForm.ComponentCount-1 do
  begin
if ( (AForm.Components[i] is TEdit) or (AForm.Components[i] is
TMaskEdit) )then
  TEdit(AForm.Components[i]).Clear;
  end;
end;


//Chamada do metodo
LimparCampos(Self);


Abraços ...





-- 
< 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] TABELAS PARADOX EM REDE

[Atendimento - BG on-line]

No BDE, selecione o drive Paradox, no parâmetro NET DIR informe o caminho onde 
está a sua base de dados. Não esqueça que, se estiver usando Alias este também 
deve ser apontado para o drive da rede onde estão os dados. E por último o 
parâmetro LOCAL SHARE tem que estar configurado para TRUE na orelha System para 
a maquina Servidora.

Na maquina Cliente a unica coisa que muda é LOCAL SHARE para FALSE





  - Original Message - 
  From: comercial3fgv 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 31, 2006 11:13 AM
  Subject: [delphi-br] TABELAS PARADOX EM REDE


  Alguém sabe como faço para colocar um sistema funcionando em rede? 
  Este sistema foi feito com tabelas paradox e utiliza o BDE como 
  gerenciador. Serão 2 máquinas nesta rede acessando o sistema. 
  Perguntas: Instalo o sistema nas 2 máquinas? Onde vão ficar as 
  tabelas? Abraço a todos!







   

[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

 

RES: [delphi-br] campo tipo BLOB

[Gilson]

Neste site abaixo tem uma dica que pode ser útil.

http://delphi.about.com/library/weekly/aa030105a.htm

Espero ter ajudado,

[]'s

Gilson

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de ca_programador007
Enviada em: quinta-feira, 31 de agosto de 2006 14:39
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] campo tipo BLOB

Olá galera

Criei uma tabela com o campo tipo BLOB, e no meu form coloquei o componente
memo.
Nas minhas consultas, este campo não mostra o conteúdo que está gravado, mas
mostra assim: (MEMO).

Tenho que fazer alguma conversão para o conteúdo gravado neste campo para
aparecer corretamente nas minhas consultas?

Valeu

CA_programador007.


-
 Yahoo! Search
 Música para ver e ouvir: You're Beautiful, do James Blunt

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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >


 
Links do Yahoo! Grupos




 




-- 
< 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] Problema com transação, ser á que tem solução?

[Ricardo Cabral]

Bem, você poderia bloquear o registro quando estivesse editando e avisar para o 
outro usuário que aquele registo não poderia ser editado. Mas imagine se o o 
cara que estiver editando sair para tomar um cafezinho? O tal registro iria 
ficar bloqueado.
   
  Acho que o registro sempre ficará com a última atualização!
   
   
  

Fellipe Henrique <[EMAIL PROTECTED]> escreveu:
  Olá amigos, estou com o seguinte problema.. quando dois usuarios estao
editando o mesmo registro ao mesmo tempo... o que acontece? tipo... tenho o
cadastro de cliente, e dois usuarios do telemarketing abrem o mesmo cadastro
pra atualizar os dados, e cada um está atualizando os dados, um usuario
salva, e o que o  outro usuario estava fazendo é perdido? como é tratado
isso?

Uso Firebird 1.5 e DBExpress + ClientDataSet + DataSetProvider + SQLQuery


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]

 


Abraços,

   Ricardo Cabral

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



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

 

[delphi-br] Focar a área de trabalho(desktop)

[conexaoi]

Ao clicar em um botão eu já sei como encontra a janela da calculadora 
e focá-la, caso a calculadora não esteja aberta eu quero que o foco vá 
para outro local como o Desktop. 

Se alguém sabre dê uma dica!


var
H : HWnd;

begin

H := FindWindow(Nil,'Calculadora');//localiza a janela da calculadora
ShowWindow(H, SW_SHOWDEFAULT);// mostra ela padrão
SetForegroundWindow(H); Foca a calculadora
else
WinExec('calc.exe', SW_SHOW);//Isso saí ===> que vá para o 
Desktop

end;






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

 

RES: [delphi-br] Rotina para limpar campos dando problemas me unit sem form

[Gilson]

Experimente usar desta forma:

procedure TNomedoFormulario.LimparCampos;
var
  I: Integer;
  Temp: TComponent;
begin
  for I := ComponentCount - 1 downto 0 do
  begin
Temp := Components[I];
if (Temp is TCustomEdit) then
begin
  TCustomEdit(Components[i]).Clear;
end;
  end;
end;

Desta forma, todos os componentes que descendem de TCustomEdit (edits,
maskedits, etc...) serão limpos!

[]'s

Gilson

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Welson Avelar
Enviada em: quinta-feira, 31 de agosto de 2006 17:54
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Rotina para limpar campos dando problemas me unit
sem form

--- Praxis escreveu:
> (...)
> unit uApoio;//não está acoplada a um form
> 
> interface
> 
> uses
>   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
>   Dialogs, Mask, StdCtrls, Buttons, ExtCtrls, DBCtrls;
> 
> 
> 
> //Exporta método pra outra unit
>procedure LimparCampos;
> 
> 
> 
> implementation
> 
>uses ModuloDados, DateUtils, DB, IBQuery;
> 
> 
> 
>  procedure LimparCampos;
>   var  i : integer;
>   begin
>for  i := 0  to ComponentCount -1 do
>begin
>   if (Components[i] is TEdit) Then
>  (Components[i] as TEdit).Clear;
> 
>   if (Components[i] is TMaskEdit) then
>   (Components[i] as TMaskEdit).Clear;
>end;
> 
>   end;
>
> 
> 
> end.
[--x--]

[Welson] Passe um form como parâmetro. É assim que usamos aqui na empresa:

procedure LimpaForm(Form: TForm);
var i: integer;
begin
  { *** Percorre todos os Componentes do Form *** }
  for i := 0 to Form.ComponentCount - 1 do
  begin
{ *** LabeledEdit *** }
if (Form.Components[i] is TLabeledEdit) then
  TLabeledEdit(Form.Components[i]).Clear
{ *** Edit *** }
else if (Form.Components[i] is TEdit) then
  TEdit(Form.Components[i]).Clear
{ *** ComboBox *** }
else if (Form.Components[i] is TComboBox) then
  TComboBox(Form.Components[i]).ItemIndex := -1
{ *** Radio Group *** }
else if (Form.Components[i] is TRadioGroup) then
  TRadioGroup(Form.Components[i]).ItemIndex := -1
{ *** Radio Button *** }
else if (Form.Components[i] is TRadioButton) then
  TRadioButton(Form.Components[i]).Checked := False
{ *** Memo *** }
else if (Form.Components[i] is TMemo) then
  TMemo(Form.Components[i]).Lines.Clear
{ *** CheckBox *** }
else if (Form.Components[i] is TCheckBox) then
  TCheckBox(Form.Components[i]).Checked := False
{ *** MaskEdit *** }
else if (Form.Components[i] is TMaskEdit) then
  TMaskEdit(Form.Components[i]).Clear
  end;

end;

Atente para o typecast: se você faz antes "(Form.Components[i] is
TMaskEdit)",
então faça o 'cast' diretamente com "TMaskEdit(Form.Components[i]).Clear".
Uma
vez o Daniel Poliblablabla (não sei escrever o sobrenome dele -_-') explicou
a
diferença disso, mas sinceramente não me lembro.

[]s.

=
"O que me preocupa não é o grito dos maus. É o silêncio dos bons."
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas

Juiz de Fora - Minas Gerais
=








___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer
compartilhar seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/


-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >


 
Links do Yahoo! Grupos




 





-- 
< 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] Problema com Delphi 2006 e TFrame.

[Bruno Mendes]

desativa o keypreview dele !!!
Daniel escreveu:
> Eu converti recentemente um sistema do Delphi 7 para o 2006, e está
> ocorrendo o seguinte problema: supondo um Form, com um Tedit, um Frame e
> dentro deste outro Tedit, quando o usuário aperta Tab para ir para o próximo
> campo, ao invés do foco ir para o Tedit de dentro do Frame, o foco vai para
> o próprio frame (ou seja, pro usuário parece que o foco sumiu). Daí, tem que
> apertar Tab novamente para o foco ir para o Tedit de dentro do frame. No
> Delphi 7 não ocorria este problema.
>
> Já fiz algumas rotinas para tentar resolver isso, como sobrescrever o método
> OnEnter de todos os Frames, ou recebendo todas as mensagens WM_KEYDOWN do
> Windows, mas nenhuma funcionou legal.
>
> Alguém tem uma solução para esse problema?
>
> Valeu.
>
>
>
>   



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



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

 

[delphi-br] Problema com Delphi 2006 e TFrame.

[Daniel]

Eu converti recentemente um sistema do Delphi 7 para o 2006, e está
ocorrendo o seguinte problema: supondo um Form, com um Tedit, um Frame e
dentro deste outro Tedit, quando o usuário aperta Tab para ir para o próximo
campo, ao invés do foco ir para o Tedit de dentro do Frame, o foco vai para
o próprio frame (ou seja, pro usuário parece que o foco sumiu). Daí, tem que
apertar Tab novamente para o foco ir para o Tedit de dentro do frame. No
Delphi 7 não ocorria este problema.

Já fiz algumas rotinas para tentar resolver isso, como sobrescrever o método
OnEnter de todos os Frames, ou recebendo todas as mensagens WM_KEYDOWN do
Windows, mas nenhuma funcionou legal.

Alguém tem uma solução para esse problema?

Valeu.



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

 

[delphi-br] Re: Migrar para sistema multicamadas

[Filipe Belchior]

bom, welson, o luiz explicou como enxergar a sua maquina remotamente,
agora, se vc tbm quer saber como implementar mesmo, multicamadas,
se for em delphi mesmo (digo isso, pois como vc comecou seu topico,
não tenho certeza se é em delphi mesmo), pesquise por exemplos
utilizando Datasnap com SOAP. vlw.

[]s
FILIPE BELCIOR



--- Em delphi-br@yahoogrupos.com.br, "Luiz Escobar" <[EMAIL PROTECTED]>
escreveu
>
> Bom com certeza seu servidor vai esta dentro da sua empresa, e o ip
dele ser 
> 192.168.0.x ou 10.1.1.x etc..
> que não é um IP valido, certo !?, OK!?
> 
> Bom então no seu ROTEADOR/NAT, vc vai criar um regra para fazer um 
> redirecionamento de porta para a maquina servidora, e nos clientes
vc vai 
> colocar o IP valido do seu ROTEADOR/NAT e não do seu servidor REAL
entendeu 
> ?
> 
> IP.internet 200.x.x.x.x <--> routeador/nat porta 3306(mysql) 
> ip.interno.do.roteador 192.168.0.1 <--> vai para o servidor MySQL
interno no 
> IP:192.168.0.x
> 
> no cliente ip do servidor mysql será: 200.x.x.x.x
> 
> o Exemplo é valido para qualquer servidor só falta saber a porta que
vc vai 
> utilizar ;-)
> 
> 
> 
> Luiz Escobar
> Analista/Desenvolvedor:
> WEB - HTML/JavaScript/PHP/MySQL
> WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase
> DOS - Clipper/Assembler xBase
> LINUX - LAZARUS/Kylix/MySQL;
> http://www.megasistema.com.br
> 
> - Original Message - 
> From: Welson Avelar
> To: Delphi-BR
> Sent: Thursday, August 31, 2006 5:40 PM
> Subject: [delphi-br] Migrar para sistema multicamadas
> 
> 
> Amigos, perdoem o assunto do email, as foi o mais próximo que
encontrei para
> chamar a atenção para a minha questão.
> É o seguinte: temos hoje aqui na empresa um sistema que está em um
cliente 
> com
> filiais espalhadas por Minas.
> Quando foi colocado o sistema, tinha a necessidade que os bancos de
dados de
> todos (matriz e filiais) permanecessem atualizados. Na época (eu não
estava 
> na
> empresa ainda) foi feito o seguinte:
> A filial extrai todos os dados, de todas as tabelas, que foram
alterados e 
> NÃO
> enviados na última exportação e manda para a matriz. A matriz importa e 
> exporta
> alguma coisa que ela tenha feito, no mesmo esquema que as filiais,
ou seja,
> extrai os dados, de todas as tabelas, que foram alterados e NÃO
enviados na
> última exportação.
> Isso nós fazíamos porque o cliente tinha conexão discada e somente a
matriz
> tinha banda larga (ela fica em Belo Horizonte). Recentemente todas as 
> filiais
> colocaram banda larga e eles resolveram centralizar o banco de
dados, porque 
> é
> mais seguro contra invasão (física mesmo, de alguém ir lá e roubar o
BD) e
> roubo dos dados.
> 
> Bom, essa foi a explanação sobre como funciona o sistema hoje. É na 
> filosofia
> de cliente/servidor.
> Pra colocar da forma que o cliente deu idéia, eu coloquei a
possibilidade de
> passarmos pra multicamadas, mas uma dúvida ficou pertinente:
> o cliente disponibilizando um servidor dedicado, como eu conectarei 
> remotamente
> a essa máquina ?! O que eu quero saber é se "basta" passar o IP do
servidor
> para conectar a máquina e 'voi lá', já conectei...
> 
> Acho que falta perguntar mais coisas, mas como é uma coisa absolutamente
> inédita pra mim, nem sei o que perguntar. Por isso que peço a ajuda dos 
> amigos
> da lista, pra poderem me "dar a luz" no problema.
> 
> []s.
> 
> =
> "O que me preocupa não é o grito dos maus. É o silêncio dos bons."
> Martin Luther King.
> =
> Welson de Avelar Soares Filho
> Analista/Programador Delphi
> Gemini Sistemas
> 
> Juiz de Fora - Minas Gerais
> =
> 
> 
> 
> ___
> Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu
celular. 
> Registre seu aparelho agora!
> http://br.mobile.yahoo.com/mailalertas/
>







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

 

[delphi-br] Scroll em runtime

[Filipe Belchior]

olá galera, paz..

..seguinte, questão dificil, rs.. to precisando rolar
a scrollbar em runtime, de um dbrichedit.. é de um módulo
em touchscreen, então, personalizei os botões de rolagem.

bom.. estou tentando, usar o método ScrollBy, herdado
da classe TWinControl, mas naum funciona da forma que
eu esperava, só vcs vendo pra entenderem..

se puderem, encarissidamente, me ajudarem, agradeço, rs.
:D






-- 
< 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] Migrar para sistema multicamadas

[Luiz Escobar]

Bom com certeza seu servidor vai esta dentro da sua empresa, e o ip dele ser 
192.168.0.x ou 10.1.1.x etc..
que não é um IP valido, certo !?, OK!?

Bom então no seu ROTEADOR/NAT, vc vai criar um regra para fazer um 
redirecionamento de porta para a maquina servidora, e nos clientes vc vai 
colocar o IP valido do seu ROTEADOR/NAT e não do seu servidor REAL entendeu 
?

IP.internet 200.x.x.x.x <--> routeador/nat porta 3306(mysql) 
ip.interno.do.roteador 192.168.0.1 <--> vai para o servidor MySQL interno no 
IP:192.168.0.x

no cliente ip do servidor mysql será: 200.x.x.x.x

o Exemplo é valido para qualquer servidor só falta saber a porta que vc vai 
utilizar ;-)



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

- Original Message - 
From: Welson Avelar
To: Delphi-BR
Sent: Thursday, August 31, 2006 5:40 PM
Subject: [delphi-br] Migrar para sistema multicamadas


Amigos, perdoem o assunto do email, as foi o mais próximo que encontrei para
chamar a atenção para a minha questão.
É o seguinte: temos hoje aqui na empresa um sistema que está em um cliente 
com
filiais espalhadas por Minas.
Quando foi colocado o sistema, tinha a necessidade que os bancos de dados de
todos (matriz e filiais) permanecessem atualizados. Na época (eu não estava 
na
empresa ainda) foi feito o seguinte:
A filial extrai todos os dados, de todas as tabelas, que foram alterados e 
NÃO
enviados na última exportação e manda para a matriz. A matriz importa e 
exporta
alguma coisa que ela tenha feito, no mesmo esquema que as filiais, ou seja,
extrai os dados, de todas as tabelas, que foram alterados e NÃO enviados na
última exportação.
Isso nós fazíamos porque o cliente tinha conexão discada e somente a matriz
tinha banda larga (ela fica em Belo Horizonte). Recentemente todas as 
filiais
colocaram banda larga e eles resolveram centralizar o banco de dados, porque 
é
mais seguro contra invasão (física mesmo, de alguém ir lá e roubar o BD) e
roubo dos dados.

Bom, essa foi a explanação sobre como funciona o sistema hoje. É na 
filosofia
de cliente/servidor.
Pra colocar da forma que o cliente deu idéia, eu coloquei a possibilidade de
passarmos pra multicamadas, mas uma dúvida ficou pertinente:
o cliente disponibilizando um servidor dedicado, como eu conectarei 
remotamente
a essa máquina ?! O que eu quero saber é se "basta" passar o IP do servidor
para conectar a máquina e 'voi lá', já conectei...

Acho que falta perguntar mais coisas, mas como é uma coisa absolutamente
inédita pra mim, nem sei o que perguntar. Por isso que peço a ajuda dos 
amigos
da lista, pra poderem me "dar a luz" no problema.

[]s.

=
"O que me preocupa não é o grito dos maus. É o silêncio dos bons."
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas

Juiz de Fora - Minas Gerais
=



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


 



-- 
< 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] Rotina para limpar campos dando problemas me unit sem form

[Welson Avelar]

--- Praxis escreveu:
> (...)
> unit uApoio;//não está acoplada a um form
> 
> interface
> 
> uses
>   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
>   Dialogs, Mask, StdCtrls, Buttons, ExtCtrls, DBCtrls;
> 
> 
> 
> //Exporta método pra outra unit
>procedure LimparCampos;
> 
> 
> 
> implementation
> 
>uses ModuloDados, DateUtils, DB, IBQuery;
> 
> 
> 
>  procedure LimparCampos;
>   var  i : integer;
>   begin
>for  i := 0  to ComponentCount -1 do
>begin
>   if (Components[i] is TEdit) Then
>  (Components[i] as TEdit).Clear;
> 
>   if (Components[i] is TMaskEdit) then
>   (Components[i] as TMaskEdit).Clear;
>end;
> 
>   end;
>
> 
> 
> end.
[--x--]

[Welson] Passe um form como parâmetro. É assim que usamos aqui na empresa:

procedure LimpaForm(Form: TForm);
var i: integer;
begin
  { *** Percorre todos os Componentes do Form *** }
  for i := 0 to Form.ComponentCount - 1 do
  begin
{ *** LabeledEdit *** }
if (Form.Components[i] is TLabeledEdit) then
  TLabeledEdit(Form.Components[i]).Clear
{ *** Edit *** }
else if (Form.Components[i] is TEdit) then
  TEdit(Form.Components[i]).Clear
{ *** ComboBox *** }
else if (Form.Components[i] is TComboBox) then
  TComboBox(Form.Components[i]).ItemIndex := -1
{ *** Radio Group *** }
else if (Form.Components[i] is TRadioGroup) then
  TRadioGroup(Form.Components[i]).ItemIndex := -1
{ *** Radio Button *** }
else if (Form.Components[i] is TRadioButton) then
  TRadioButton(Form.Components[i]).Checked := False
{ *** Memo *** }
else if (Form.Components[i] is TMemo) then
  TMemo(Form.Components[i]).Lines.Clear
{ *** CheckBox *** }
else if (Form.Components[i] is TCheckBox) then
  TCheckBox(Form.Components[i]).Checked := False
{ *** MaskEdit *** }
else if (Form.Components[i] is TMaskEdit) then
  TMaskEdit(Form.Components[i]).Clear
  end;

end;

Atente para o typecast: se você faz antes "(Form.Components[i] is TMaskEdit)",
então faça o 'cast' diretamente com "TMaskEdit(Form.Components[i]).Clear". Uma
vez o Daniel Poliblablabla (não sei escrever o sobrenome dele -_-') explicou a
diferença disso, mas sinceramente não me lembro.

[]s.

=
"O que me preocupa não é o grito dos maus. É o silêncio dos bons."
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas

Juiz de Fora - Minas Gerais
=








___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/


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

 

[delphi-br] Problema com transação, será que tem solução?

[Fellipe Henrique]

Olá amigos, estou com o seguinte problema.. quando dois usuarios estao
editando o mesmo registro ao mesmo tempo... o que acontece? tipo... tenho o
cadastro de cliente, e dois usuarios do telemarketing abrem o mesmo cadastro
pra atualizar os dados, e cada um está atualizando os dados, um usuario
salva, e o que o  outro usuario estava fazendo é perdido? como é tratado
isso?

Uso Firebird 1.5 e DBExpress + ClientDataSet + DataSetProvider + SQLQuery


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]



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

 

[delphi-br] Migrar para sistema multicamadas

[Welson Avelar]

Amigos, perdoem o assunto do email, as foi o mais próximo que encontrei para
chamar a atenção para a minha questão.
É o seguinte: temos hoje aqui na empresa um sistema que está em um cliente com
filiais espalhadas por Minas.
Quando foi colocado o sistema, tinha a necessidade que os bancos de dados de
todos (matriz e filiais) permanecessem atualizados. Na época (eu não estava na
empresa ainda) foi feito o seguinte:
A filial extrai todos os dados, de todas as tabelas, que foram alterados e NÃO
enviados na última exportação e manda para a matriz. A matriz importa e exporta
alguma coisa que ela tenha feito, no mesmo esquema que as filiais, ou seja,
extrai os dados, de todas as tabelas, que foram alterados e NÃO enviados na
última exportação.
Isso nós fazíamos porque o cliente tinha conexão discada e somente a matriz
tinha banda larga (ela fica em Belo Horizonte). Recentemente todas as filiais
colocaram banda larga e eles resolveram centralizar o banco de dados, porque é
mais seguro contra invasão (física mesmo, de alguém ir lá e roubar o BD) e
roubo dos dados.

Bom, essa foi a explanação sobre como funciona o sistema hoje. É na filosofia
de cliente/servidor.
Pra colocar da forma que o cliente deu idéia, eu coloquei a possibilidade de
passarmos pra multicamadas, mas uma dúvida ficou pertinente:
o cliente disponibilizando um servidor dedicado, como eu conectarei remotamente
a essa máquina ?! O que eu quero saber é se "basta" passar o IP do servidor
para conectar a máquina e 'voi lá', já conectei...

Acho que falta perguntar mais coisas, mas como é uma coisa absolutamente
inédita pra mim, nem sei o que perguntar. Por isso que peço a ajuda dos amigos
da lista, pra poderem me "dar a luz" no problema.

[]s.

=
"O que me preocupa não é o grito dos maus. É o silêncio dos bons."
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas

Juiz de Fora - Minas Gerais
=



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



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

 

RES: [delphi-br] Instalar dcu

[Camoloze]

Não funciona, já tentei isso.
No Delphi 7, você editava a package Borland User Components, ai funcionava.
Mas no BDS2006 não esta danada!!! e nem sei como cria-la. Mais alguma dica.
Andreano cê sabe mano...
 
[]´s camoloze

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Daniel Bastos
Enviada em: quinta-feira, 31 de agosto de 2006 16:04
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Instalar dcu


vc cria uma nova package e adiciona a DCU nessa package..
depois compila e instala
:~)


Em 31/08/06, Camoloze <[EMAIL PROTECTED]> escreveu:
>
>  Bom dia,
>
> Alguém saberia como instalar um componente no BDS 2006 que só tenho a DCU?
> Já procurei ho help, no Google e até agora nada.
>
> Obrigado
>
> Camoloze
>
>
> [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] Deixar o usuário escolher o numero q ue ele quer para a primeira pagina de um relatório.

[Andre Mesquita]

Qual o erro?

- Original Message - 
From: "sandro cunha" <[EMAIL PROTECTED]>
To: "Grupo Delphi" 
Sent: Thursday, August 31, 2006 5:11 PM
Subject: [delphi-br] Deixar o usuário escolher o numero que ele quer para a 
primeira pagina de um relatório.


E ai rapaziada!
  To precizando de um help de voces.
  Preciso que um relatorio que estou criando em Quickreport (Erhhk) comece a 
contar suas paginas a partir de um numero escolhido pelo usuário. Por 
exemplo eu quero que a primeira pagina  do relatório comece com o numero 7 e 
siga a partir dai contando o numero das paginas a partir do 7.
  Em vez de contar um relatório com 3 paginas desta forma: 1,2,3
  como indiquei que ele começará com 7 ficaria assim: 7,8,9
  Ja tentei isso:

  Inputquery('Informe o Numero de inicio desta Pagina:',Paginas);
numero:=strtoint(paginas);
QuickRep6.QRPrinter.FirstPage:=numero;

  Até compila mas quando vai abrir o relatorio da uma menssagem de erro.
  Alguem poderia me indicar uma forma de fazer isso.


  Um Grande abraço a todos.
  Sandro


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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >



Links do Yahoo! Grupos









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

 

[delphi-br] Re: Rotina para limpar campos dando problemas me unit sem form

[valmsrj]

Como a funcao vai saber quem é o parent dos edits? Você deveria
passa-lo por parametro.

--- Em delphi-br@yahoogrupos.com.br, "Praxis" <[EMAIL PROTECTED]> escreveu
>
> Tenho uma rotina pra limpar todas as edits de um form e ela funciona.
> Contudo, resolvi fazer uma unit de apoio, sem form,  onde coloquei
vários
> procedimentos importantes. Umas delas, a LimparCampos não está
funcionando
> e é a única. Alguém saberia explicar?
> 
> 
> Segue parte do código abaixo
> 
> 
> unit uApoio;//não está acoplada a um form
> 
> interface
> 
> uses
>   Windows, Messages, SysUtils, Variants, Classes, Graphics,
Controls, Forms,
>   Dialogs, Mask, StdCtrls, Buttons, ExtCtrls, DBCtrls;
> 
> 
> 
> //Exporta método pra outra unit
>procedure LimparCampos;
> 
> 
> 
> implementation
> 
>uses ModuloDados, DateUtils, DB, IBQuery;
> 
> 
> 
>  procedure LimparCampos;
>   var  i : integer;
>   begin
>for  i := 0  to ComponentCount -1 do
>begin
>   if (Components[i] is TEdit) Then
>  (Components[i] as TEdit).Clear;
> 
>   if (Components[i] is TMaskEdit) then
>   (Components[i] as TMaskEdit).Clear;
>end;
> 
>   end;
>
> 
> 
> end.   
> 
> [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

 

[delphi-br] Deixar o usuário escolher o numero que ele quer para a primeira pagina de um relatór io.

[sandro cunha]

E ai rapaziada!
  To precizando de um help de voces.
  Preciso que um relatorio que estou criando em Quickreport (Erhhk) comece a 
contar suas paginas a partir de um numero escolhido pelo usuário. Por exemplo 
eu quero que a primeira pagina  do relatório comece com o numero 7 e siga a 
partir dai contando o numero das paginas a partir do 7.
  Em vez de contar um relatório com 3 paginas desta forma: 1,2,3
  como indiquei que ele começará com 7 ficaria assim: 7,8,9
  Ja tentei isso:
   
  Inputquery('Informe o Numero de inicio desta Pagina:',Paginas);
numero:=strtoint(paginas);
QuickRep6.QRPrinter.FirstPage:=numero;
   
  Até compila mas quando vai abrir o relatorio da uma menssagem de erro.
  Alguem poderia me indicar uma forma de fazer isso.
   
   
  Um Grande abraço a todos.
  Sandro


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



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

 

[delphi-br] Rotina para limpar campos dando problemas me unit sem form

[Praxis]

Tenho uma rotina pra limpar todas as edits de um form e ela funciona.
Contudo, resolvi fazer uma unit de apoio, sem form,  onde coloquei vários
procedimentos importantes. Umas delas, a LimparCampos não está funcionando
e é a única. Alguém saberia explicar?


Segue parte do código abaixo


unit uApoio;//não está acoplada a um form

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Mask, StdCtrls, Buttons, ExtCtrls, DBCtrls;



//Exporta método pra outra unit
   procedure LimparCampos;



implementation

   uses ModuloDados, DateUtils, DB, IBQuery;



 procedure LimparCampos;
  var  i : integer;
  begin
   for  i := 0  to ComponentCount -1 do
   begin
  if (Components[i] is TEdit) Then
 (Components[i] as TEdit).Clear;

  if (Components[i] is TMaskEdit) then
  (Components[i] as TMaskEdit).Clear;
   end;

  end;
   


end.   

[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

 

[delphi-br] Random

[Alex - Yahoo]

Alguem sabe como faço para pegar numeros randomicos de uma string sem 
repeti-los?Por exemplo: 123 = 312 ou 123 = 213...Enfim pegando da string 123 e 
misturando mas sem repetir.

Alex

[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] Firebird - Função Last

[Daniel Bastos]

Que bom que resolveu...
mas de qualquer forma... a sintaxe do first é assim:

select First   from 

olha um sql do meu sistema como exemplo:
select first 10 * from AF

abs :~)

Em 28/08/06, WILLER <[EMAIL PROTECTED]> escreveu:
>
>  Consegui, fiz o que você me sugeriu, e já que o campo é do tipo data, mas
> é sempre incrementada... funcionou.
> Valeu.
> Meu select ficou assim:
> SELECT TABCLI.VENCIMENTO,TABCLI.COD,tabcli.nome,mensal.vencto,TABMEN.PRECfrom 
> tabcli,mensal,TABMEN where ((
> tabcli.cod=mensal.cod)AND(TABCLI.TABELA=TABMEN.TAB))and(mensal.vencto=(select
> max(mensal.vencto)from mensal where mensal.cod=tabcli.cod) ) order by
> mensal.vencto DESC
>
>
> Willer Alves da Costa.
>
>   - Original Message -
>   From: Alisson Yahoo
>   To: delphi-br@yahoogrupos.com.br
>   Sent: Wednesday, August 30, 2006 8:22 AM
>   Subject: Re: [delphi-br] Firebird - Função Last
>
>
>   Se o campo chave for auto-incremento você pode fazer o seguinte para
> selecionar o último registro :
>
>   Select * From Tabela where CampoChave = (select Max(CampoChave) From
> Tabela)
>
>
>   [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
>
>   __ Informação do NOD32 1.1683 (20060728) __
>
>   Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
>   http://www.nod32.com.br
>
>
> [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] Instalar dcu

[Daniel Bastos]

vc cria uma nova package e adiciona a DCU nessa package..
depois compila e instala
:~)


Em 31/08/06, Camoloze <[EMAIL PROTECTED]> escreveu:
>
>  Bom dia,
>
> Alguém saberia como instalar um componente no BDS 2006 que só tenho a DCU?
> Já procurei ho help, no Google e até agora nada.
>
> Obrigado
>
> Camoloze
>
>
> [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

 

[delphi-br] campo tipo BLOB

[ca_programador007]

Olá galera

Criei uma tabela com o campo tipo BLOB, e no meu form coloquei o componente 
memo.
Nas minhas consultas, este campo não mostra o conteúdo que está gravado, mas 
mostra assim: (MEMO).

Tenho que fazer alguma conversão para o conteúdo gravado neste campo para 
aparecer corretamente nas minhas consultas?

Valeu

CA_programador007.


-
 Yahoo! Search
 Música para ver e ouvir: You're Beautiful, do James Blunt

[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

 

[delphi-br] Atender Ligação

[Ilton Vieira Junior]

Boa tarde a todos.

Estou começando um projeto, onde terei que desenvolver um sistema que 
atenda as ligações por intermédio do modem.
Porém estou meio sem saber por onde começar. Alguém teria algum material 
para disponibilizar???

Obrigado

Ilton


-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

 

Re: RES: [delphi-br] Padrões de codificação

[Marcos Douglas]

Padrão da Borland:
Object Pascal Style Guide
http://community.borland.com/article/0,1410,10280,00.html

--
Marcos Douglas

 Mensagem Original 
From: "Elazar Dornelles Ceza" <[EMAIL PROTECTED]>
To: delphi-br@yahoogrupos.com.br
Sent: Qui, Agosto 31, 2006 1:44 pm
Subject: RES: [delphi-br] Padrões de codificação

> Rogerio
>
> Bom eu normalmente uso as siglas dos componentes e alguns outros
> truques... De uma olhada.
> Mas o melhor de tudo, se voce trabalha em equipe em um mesmo projeto com
> frequencia é que a equipe use o mesmo padrao.
>
>
> Ex.
>
> TEdit= edt
> TLabel   = lbl
> TPanel   = pnl
> Tbevel   = bvl
> TMainMenu= mnu
> TPopupMenu   = pnu
> TDBEdit  = dbedt
> TDBGrid  = dbgrd
> TDataSource  = dts
> TClientDataSet   = cds
> TIBDataSet   = ibd
> TIBTable = ibt
> TIBSQL   = ibs
> TIBStoredProc.   = ibp
> TListBox = lbx
> TComboBox= cbx
> TLoockupComboBox = lcb
> TListView= lvw
>
> Exceções Forms... fNomeForm uNomeUnit
>  Data Modules dtmNomeDataModule uNomeDataModule
>
>
> Para comandos/funcoes
>
>   with do begin
> {...}
>   end;
>
>   if {...} then {...}
>else {...}
>
>   if {...} then begin
> {...}
>   end else begin
> {...}
>   end;
>
>   for {} to {} do begin
> {}
>   end;
>
>   while {} do begin
> {...}
>   end;
>
>   case {...} of
> {...} : begin
> end;
> {...} : begin
> end;
>   end;
>
> Variaveis
>
> Var
>   vNome : String;
>   vValor: Double;
>   vAtivo: Boolean;
>   vCancelar : Boolean;
>   { Sempre mantendo a indentação e : abaixo de :}
>
> begin
>   {.}
>   vNome := 'Elazar Dornelles Ceza';
>   vValor:= 10.4;
>   vAtivo:= True;
>   vCancelar := False;
>
>   { loop }
>   while not ibdCadastro.Eof do begin
>
> { Incluir o funcionário }
> ibdCadastro.Insert;
> ibdCadastro.FieldByName('NOME').AsString := vNome;
> ibdCadastro.FieldByName('VALORHORA').AsFloat := vValor;
>
> if vAtivo then ibdCadastro.FieldByName('ATIVO').AsInteger := 1
>   else ibdCadastro.FieldByName('ATIVO').AsInteger := 0;
>
> if vCancelar then ibdCadastro.FieldByName('CANCELAR').AsInteger := 1
>  else ibdCadastro.FieldByName('CANCELAR').AsInteger :=
> 0;
> ibdCadastro.Post;
>
> { Exibe mensagem ao usuario de que o mesmo foi incluido }
> ShowMessage('Funcionário incluido com sucesso');
>   end;
> end
>
> Atenc.
> Elazar
>
> -Mensagem original-
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> Em nome de Rogerio Martins
> Enviada em: quinta-feira, 31 de agosto de 2006 09:38
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Padrões de codificação
>
>
> Bom dia pessoal !
> Alguém conhece algum documento sugerindo padrões de codificação em
> delphi,
> para se aplicar em uma empresa ?
> Ex: nomenclatura de variáveis, componentes etc
>
> Obrigado
>
>
>
>
>
>
>
>
>
>
>
> ___
> Você quer respostas para suas perguntas? Ou você sabe muito e quer
> compartilhar seu conhecimento? Experimente o Yahoo! Respostas !
> http://br.answers.yahoo.com/
>
>




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

 

RES: [delphi-br] Timer

[Rodrigo O. Farias]

A lógica é:

CronometroDecremental = 30:00 - timer


Onde 30 vc colocara o tempo desejado, quando chegar a zero vc desliga o
timer




--
Rodrigo Othávio Farias 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Alex - Yahoo
Enviada em: quinta-feira, 31 de agosto de 2006 10:59
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Timer

Alguem sabe como posso DECREMENTAR uma hora que eu definir usando timer?Por
exemplo coloco 30:00:00 e vai diminuindo ao invés de aumentar?

Alex

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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >


 
Links do Yahoo! Grupos




 






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

 

[delphi-br] TABELAS PARADOX EM REDE

[comercial3fgv]

Alguém sabe como faço para colocar um sistema funcionando em rede? 
Este sistema foi feito com tabelas paradox e utiliza o BDE como 
gerenciador. Serão 2 máquinas nesta rede acessando o sistema. 
Perguntas: Instalo o sistema nas 2 máquinas? Onde vão ficar as 
tabelas? Abraço a todos!









-- 
< 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] Clicar e passar o foco

[Hélder Seixas Lima]

caro,
vc pode passar o forcar o foco pra outra outra janela da seguinte maneira:

handleDaJanela : hwnd;

  mouse_event(MOUSEEVENTF_ABSOLUTE, 0, 0, 0, 0);  //simula um clik de maous
  SetForegroundWindow(handleDaJanela);   //lanca foco pra qualquer janela


Em 31/08/06, conexaoi <[EMAIL PROTECTED]> escreveu:
>
> Ai manos dá uma ajuda.!1
>
> Como eu faço para ao clicar em um botão o foco passe para outra janela
> ou caso não tenha janela para a área de trabalho, de maneira que
> sempre ao clicar o form não tenha o foco.
>
>
> Saudações!
>
>
>
> 
>


[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

 

RES: [delphi-br] Padrões de codificação

[Elazar Dornelles Ceza]

Rogerio

Bom eu normalmente uso as siglas dos componentes e alguns outros
truques... De uma olhada.
Mas o melhor de tudo, se voce trabalha em equipe em um mesmo projeto com
frequencia é que a equipe use o mesmo padrao.


Ex.

TEdit= edt
TLabel   = lbl
TPanel   = pnl
Tbevel   = bvl
TMainMenu= mnu
TPopupMenu   = pnu
TDBEdit  = dbedt
TDBGrid  = dbgrd
TDataSource  = dts
TClientDataSet   = cds
TIBDataSet   = ibd
TIBTable = ibt
TIBSQL   = ibs
TIBStoredProc.   = ibp
TListBox = lbx
TComboBox= cbx
TLoockupComboBox = lcb
TListView= lvw

Exceções Forms... fNomeForm uNomeUnit
 Data Modules dtmNomeDataModule uNomeDataModule 


Para comandos/funcoes

  with do begin
{...}
  end;
  
  if {...} then {...}
   else {...}

  if {...} then begin
{...}
  end else begin
{...}
  end;

  for {} to {} do begin
{}
  end;

  while {} do begin
{...}
  end;
  
  case {...} of
{...} : begin
end;
{...} : begin
end;
  end;

Variaveis

Var
  vNome : String;
  vValor: Double;
  vAtivo: Boolean;
  vCancelar : Boolean;
  { Sempre mantendo a indentação e : abaixo de :}

begin
  {.}
  vNome := 'Elazar Dornelles Ceza';
  vValor:= 10.4;
  vAtivo:= True;
  vCancelar := False; 

  { loop }
  while not ibdCadastro.Eof do begin

{ Incluir o funcionário }
ibdCadastro.Insert;
ibdCadastro.FieldByName('NOME').AsString := vNome;
ibdCadastro.FieldByName('VALORHORA').AsFloat := vValor;

if vAtivo then ibdCadastro.FieldByName('ATIVO').AsInteger := 1
  else ibdCadastro.FieldByName('ATIVO').AsInteger := 0;

if vCancelar then ibdCadastro.FieldByName('CANCELAR').AsInteger := 1
 else ibdCadastro.FieldByName('CANCELAR').AsInteger :=
0;  
ibdCadastro.Post;

{ Exibe mensagem ao usuario de que o mesmo foi incluido }
ShowMessage('Funcionário incluido com sucesso');
  end;
end 
  
Atenc.
Elazar

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Rogerio Martins
Enviada em: quinta-feira, 31 de agosto de 2006 09:38
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Padrões de codificação


Bom dia pessoal !
Alguém conhece algum documento sugerindo padrões de codificação em
delphi, 
para se aplicar em uma empresa ?
Ex: nomenclatura de variáveis, componentes etc

Obrigado 




 






___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/


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

 

RES: [delphi-br] Duvida - Como fazer ?

[Elazar Dornelles Ceza]

Noises;

Que tal tu fazer uma nova busca no momento de processamento, pra ver se
ainda tem saldos pra pagar?

Atenc.
Elazar

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de moises ribeiro
Enviada em: quinta-feira, 31 de agosto de 2006 10:55
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Duvida - Como fazer ?


Como fazer para que se duas pessoa alterarem o mesmo registro ao
"mesmo tempo" ? Exemplo: Um usuário esta em um sistema financeiro, e
está
entrando com um numero considerável de dados afim de fazer uma
transferencia
de valores para uma outra conta, assim que ele entra, o saldo aparece na
tela e ele verifica que ainda tem saldo sufciente para tranferir a
quantia
que deseja, mas por existir varios informações a serem preenchidas, o
usuario perde um determinado tempo, e um outro usuário, que tambem tem
acesso a essa conta, faz uma retirada, antes que ele venha a concluir a
transação, o que devo fazer como desenvolvedor? mostrar na tela que o
saldo
que ele possúi no momento não é mas o mesmo que quando ele iniciou a
transação, e que todo o tempo que ele perdeu ali foi atoa pois o saldo
atual
não permite uma tranferencia com o valor que ele deseja? Por isso que eu
ao
iniciar uma tela de cadastro abro uma nova transação, com a finalidade
de
travar um registro, para que duas pessoa não possa usá-lo ao mesmo
tempo,
quando uma estiver realizando uma tarefa de estrema importancia.

Gostaria de saber a opinião do grupo a esse respeito

Sem mais, obrigado e que Deus continue os abençoando.

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

 






___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/


-- 
< 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] Boa Apostila sobre banco

[Higor]

Estou querendo aprender sobre banco de dados no geral e interesse em
Interbase e SQL Server.

Valeu mesmo


2006/8/31, Gustavo Sequeira <[EMAIL PROTECTED]>:
>
>  para que banco??? ou voce que aprender sql?
>
> 2006/8/31, Higor <[EMAIL PROTECTED]>:
>
> >
> >  Boa noite pessoal,
> >
> > Gostaria da ajuda de vocês na indicação de uma boa apostila sobre Banco
> de
> > Dados pois tenho pouco conhecimento e gostaria de aprender todas as
> > possibilidades que os bancos nos oferecem como Store Procedure, Domain
> > para
> > que cada coisa serve e como fazer, só q n achei nenhuma apostila legal q
> > fale sobre essas coisas.
> >
> > Se alguém conhecer alguma ou tiver favor indicar.
> >
> > Obrigado pelo apoio.
> >
> > Atenciosamente.
> > Higor Tadeu
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
>
>
> --
> Gustavo Sequeira
> Soluções e Assessoria em Informática
>
>
> [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] (Fora do tópico) Zanthus

[Fabiano Frizzo]

os Componentes do Projeto ACBr fazem Comunicção direta com varios modelos de 
Impressoras Inclusive COm Zanthus
  - Original Message - 
  From: Luiz Henrique Santos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 30, 2006 11:48 AM
  Subject: [delphi-br] (Fora do tópico) Zanthus


  Pessoal,

  Alguem já fez comunicacao direta com esse ECF? 
  Tenho algumas dúvidas e o pessoal da Zanthus não dá suporte.
  Por exemplo: 
  Não sei construir o comando que devo enviar pra impressora fiscal...








   

[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

 

RES: [delphi-br] Crystal Reports x Delphi (Travamento)

[Andreano Lanusse]

Idivaldo,
 
se você estiver usando o Crystal com Delphi 2005, a Crystal disponibilizou um 
service pack que corrige um monte de coisas do crystal...
 
Da uma olhada nesse link: 
http://blogs.borland.com/andreanolanusse/archive/2006/07/06/25836.aspx
 
 
[]'s
 
Andreano Lanusse
System Engineer - Development Tools
http://info.borland.com.br/borcon> Tel.: +55 (11) 2165 - 
8000 / Mobile: +55 (11) 8196-5912 
http://info.borland.com.br/borcon> [EMAIL PROTECTED] 
mailto:[EMAIL PROTECTED]>  - www.borland.com.br 
http://www.borland.com.br/> 
Blogs: http://blogs.borland.com/andreanolanusse 
http://blogs.borland.com/andreanolanusse> 
Artigos: http://bdn.borland.com http://bdn.borland.com/>  



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de idivaldomb
Enviada em: Thursday, August 31, 2006 11:20 AM
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Crystal Reports x Delphi (Travamento)


Olá pessoal! 

Estou com um tremendo problema, tenho meus relatórios feitos em 
crystal reports todos eles rodam perfeitamente pela IDE do crystal, 
mas quando eu uso os relatórios chamados pela minha aplicação ele as 
vezes trava e levando o processamento da cpu a 100%, eu estou usando 
a vcl do crystal XI e os relatórios feitos no crystal XI, o que 
acontece de engraçado é que tenho um form onde chamo o relatório onde 
o mesmo é executado inumeras vezes e não trava, quando vou para outro 
form que contem outros relatórios o mesmo é executado inumeras vezes 
e tambem não trava, mas se eu voltar logo após um dos forms que eu ja 
utilizei para ver os relatórios novamente , na primeira chamda da 
execução do relatório , ai o sistema trava levando a cpu a 100% de 
processamento. Já troquei de vcl da 10 para 11, já criei outros 
formulários e mudei os componentes de um form para outro, já fiz 
liberação de memória quando executo os relatórios, já liberei o form 
da memória também e até agoa não consegui achar uma solução, caso 
alguem ja teve esse problema por favor, deixe aqui a sua sugestão. 

Idivaldo 

MSN [EMAIL PROTECTED]




 


[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

 

[delphi-br] Crystal Reports x Delphi (Travamento)

[idivaldomb]

Olá pessoal! 

Estou com um tremendo problema, tenho meus relatórios feitos em 
crystal reports todos eles rodam perfeitamente pela IDE do crystal, 
mas quando eu uso os relatórios chamados pela minha aplicação ele as 
vezes trava e levando o processamento da cpu a 100%, eu estou usando 
a vcl do crystal XI e os relatórios feitos no crystal XI, o que 
acontece de engraçado é que tenho um form onde chamo o relatório onde 
o mesmo é executado inumeras vezes e não trava, quando vou para outro 
form que contem outros relatórios o mesmo é executado inumeras vezes 
e tambem não trava, mas se eu voltar logo após um dos forms que eu ja 
utilizei para ver os relatórios novamente , na primeira chamda da 
execução do relatório , ai o sistema trava levando a cpu a 100% de 
processamento. Já troquei de vcl da 10 para 11, já criei outros 
formulários e mudei os componentes de um form para outro, já fiz 
liberação de memória quando executo os relatórios, já liberei o form 
da memória também e até agoa não consegui achar uma solução, caso 
alguem ja teve esse problema por favor, deixe aqui a sua sugestão. 

Idivaldo 

MSN [EMAIL PROTECTED]






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

 

[delphi-br] Timer

[Alex - Yahoo]

Alguem sabe como posso DECREMENTAR uma hora que eu definir usando timer?Por 
exemplo coloco 30:00:00 e vai diminuindo ao invés de aumentar?

Alex

[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

 

[delphi-br] Duvida - Como fazer ?

[moises ribeiro]

Como fazer para que se duas pessoa alterarem o mesmo registro ao
"mesmo tempo" ? Exemplo: Um usuário esta em um sistema financeiro, e está
entrando com um numero considerável de dados afim de fazer uma transferencia
de valores para uma outra conta, assim que ele entra, o saldo aparece na
tela e ele verifica que ainda tem saldo sufciente para tranferir a quantia
que deseja, mas por existir varios informações a serem preenchidas, o
usuario perde um determinado tempo, e um outro usuário, que tambem tem
acesso a essa conta, faz uma retirada, antes que ele venha a concluir a
transação, o que devo fazer como desenvolvedor? mostrar na tela que o saldo
que ele possúi no momento não é mas o mesmo que quando ele iniciou a
transação, e que todo o tempo que ele perdeu ali foi atoa pois o saldo atual
não permite uma tranferencia com o valor que ele deseja? Por isso que eu ao
iniciar uma tela de cadastro abro uma nova transação, com a finalidade de
travar um registro, para que duas pessoa não possa usá-lo ao mesmo tempo,
quando uma estiver realizando uma tarefa de estrema importancia.

Gostaria de saber a opinião do grupo a esse respeito

Sem mais, obrigado e que Deus continue os abençoando.

[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] O q são Hashs?

[wazen]

hash
; 1 produzir um número único, derivado da própria entrada, para cada
entrada em uma base de dados; ± hashing function = função hash =
algoritmo usado para produzir um código hash para uma entrada e
assegurar que este código é único para cada entrada; 2 (a)
>> HASHMARK; (b) hash code = código hash = sistema de codificação
derivado dos códigos ASCII, onde os números de código para as
primeiras três letras são somados, produzindo um novo número usado
como código hash; ± hash-code system = sistema de código hash =
sistema de codificação usando códigos hash; ± hash index = índice
hash = lista de entradas de acordo com seus números de hash; ± hash
table = tabela hash = lista de todas as entradas em um arquivo com seus
endereços de chave em hash; ± hash total = total de hash = somatório
dos hashes aplicados a um número de entradas, usado para detecção de
erro; ± hash value = valor de hash = número obtido depois de uma chave
ter sido gerada por uma função hash.

Roberto


> Mensagem Original:
> Data: 08:50:56 31/08/2006
> De: Moked - Tamara (Brazil) <[EMAIL PROTECTED]>
> Assunto: [delphi-br] O q são Hashs?

>      Tamara Clemente - Suporte Técnico
> Moked do Brasil - Consultoria de Segurança Empresarial
> Divisão MokInf de Informática
> PABX: (55-11) 5071-2748
> [EMAIL PROTECTED]
> www.moked.com.br 
>
> Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo
> Nível de Prioridade:  Alto  Médio  Baixo
> Destinatário/s: Lista de divulgação
> -
> Bom dia,
>
> Pessoal, fiz uma rápida pesquisa e ñ consegui descobrir(ao menos 
> saber do q se trata) hashs... alguém poderia me dar um Help???
>
> Num sei nem se issu é relacionado diretamente com Delphi, então se 
> for off-topic, desculpem-me.
>
> Obrigada,
>
> Tamara
> A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
>
> Serviços prestados no Brasil na área de segurança pessoal e empresarial:
> Consultoria e Assessoria | Diagnósticos e Projetos | Curso e 
> Treinamentos | Auditoria e Sindicância | Software de Gestão | 
> Help-desk 24hs
>
>
> O emitente da mensagem é o responsável por seu conteúdo e divulgação, 
> proibindo sua reprodução sem a prévia autorização do mesmo.
> O conteúdo da presente mensagem é exclusivo para o/s destinatário/s e 
> caso tenha recebido este e-mail por engano, por  favor  apaga-o e 
> notifique o remetente.
> Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o 
> comprometimento com os custo envolvidos!
>
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>



Aqui na Oi Internet você ganha ou ganha. Além de acesso grátis com
qualidade, ganha contas ilimitadas de email com 1 giga cada uma. Ganha
espaço ilimitado para hospedar sua página pessoal. Ganha flog, suporte
grátis e muito mais. Baixe grátis o Discador em
http://www.oi.com.br/discador e comece a ganhar.

Agora, se o seu negócio é voar na internet sem pagar uma fortuna,
assine Oi Internet banda larga a partir de R$ 9,90. Clique em
http://www.oi.com.br/bandalarga e aproveite essa moleza!




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

 

[delphi-br] Instalar dcu

[Camoloze]

Bom dia,
 
Alguém saberia como instalar um componente no BDS 2006 que só tenho a DCU?
Já procurei ho help, no Google e até agora nada.
 
Obrigado
 
Camoloze


[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

 

[delphi-br] Clicar e passar o foco

[conexaoi]

Ai manos dá uma ajuda.!1

Como eu faço para ao clicar em um botão o foco passe para outra janela 
ou caso não tenha janela para a área de trabalho, de maneira que 
sempre ao clicar o form não tenha o foco.


Saudações!





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

 

[delphi-br] FormStyle fsMDIForm

[Wesley Romualdo da silva]

eu tenho um form principal que na su propriedade de formstyle = fsMDIForm,
  so que eu criei um form de login com sua propriedade de formstyle = fsNormal 
para abrir antes do form principal, so que quando abre o form principal da erro 
porque isso ocorre?


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






-- 
< 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] Boa Apostila sobre banco

[Gustavo Sequeira]

para que banco??? ou voce que aprender sql?

2006/8/31, Higor <[EMAIL PROTECTED]>:
>
>  Boa noite pessoal,
>
> Gostaria da ajuda de vocês na indicação de uma boa apostila sobre Banco de
> Dados pois tenho pouco conhecimento e gostaria de aprender todas as
> possibilidades que os bancos nos oferecem como Store Procedure, Domain
> para
> que cada coisa serve e como fazer, só q n achei nenhuma apostila legal q
> fale sobre essas coisas.
>
> Se alguém conhecer alguma ou tiver favor indicar.
>
> Obrigado pelo apoio.
>
> Atenciosamente.
> Higor Tadeu
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>



-- 
Gustavo Sequeira
Soluções e Assessoria em Informática


[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

 

[delphi-br] Achar em um texto e focar uma janela aberta

[conexaoi]

Uma ajuda por favor...

1.º) Gente O objetivo é ao clicar em um botão, em um texto(Richedit) 
ele encontre a palavra calculadora e passe o foco para a janela do 
calculadora(já aberta), ou se encontrar a palavra word passe o foco 
para a janela do word(já aberta). Eu fiz mas ele encontra somente 
uma vez e sempre passa o foco para a mesma janela sempre. 


Essa foi a rotina: Eu tenho um botão avançar, ao clicar ele vai 
localizar em um dbRichEdit1.Text o texto 'Calculadora' e se ele 
encontrar, localizar a janela da calculadora e passa o foco para ela.

Olha como ficou:

var
i : integer;//localizar o texto
aux: integer; //localizar o texto
H : HWnd; //achar a janela


begin
aux:=1;
for i:=0 to Length(DbRichEdit1.Text) do
begin
if (Copy(dbRichEdit1.Text,i+1,length ('clique')) ='clique') then // 
compara os dois texto
H := FindWindow(Nil,'Calculadora');//localiza a janela da calculadora
ShowWindow(H, SW_SHOWDEFAULT);// mostra ela padrão
SetForegroundWindow(H); // Foca a janela da calculadora
end;

Obs. O texto está em uma tabela que é acessada em um DbRichEdit1.Text

pÔ GENTE MÉ Dáa uma ajuda! Qualquer teco eu agradeço   :(






-- 
< 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] CLX / KYLIX - Quem usa ?

[Daniel Bastos]

Não.. a biblioteca clx ficou na historia junto com kylix, BDE, CLX e
outras... :~)

O Freepascal é um compilador Pascal, que permite que vc complile fontes em
várias plataformas.

O lazarus é um projeto do freepascal. Ele é uma IDE (Semelhante ao delphi)
para desenvolvimento RAD. Ele usa o compilador freepascal para compilar seus
programas...

abs


Em 30/08/06, Florentino - Yahoo <[EMAIL PROTECTED]> escreveu:
>
>  Olá,
> Há algum tempo me interessei em desenvolver sistemas multi plataforma
> usando CLX - Delphi 7. Esfriei ao saber que a Borland tinha abandonado o
> desenvolvimento do Kylix (é assim que se escreve?). Pois bem, voltei a
> me interessar pelo assunto. Pergunto: A biblioteca CLX está presente no
> Delphi 2005/2006 ?  Quanto a Lazarus e Free-Pascal, de que se trata?
>
> Obrigado pela atenção.
>
>
>
>
> ___
> 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]



-- 
< 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] O q são Hashs?

[Daniel Bastos]

O algoritmo de hash é usado para gerar um valor do hash de alguns dados,
como um e-mail, uma senha ou uma chave. A função do hash verifica qualquer
modificação em um dado. O hash é um método para transformar dados de tal
forma que o resultado seja exclusivo e não possa ser retornado ao formato
original. Sua característica principal é a não-duplicidade de dados. Os mais
usados algoritmos de hash são os MD2, MD4, MD5 e o SHA-1.

pt.wikipedia.org/wiki/Hash
http://www.google.com/search?sourceid=navclient&ie=UTF-8&rls=IRFA,IRFA:2006-29,IRFA:en&q=define%3ahash


Em 31/08/06, Moked - Tamara (Brazil) <[EMAIL PROTECTED]> escreveu:
>
>   Tamara Clemente - Suporte Técnico
> Moked do Brasil - Consultoria de Segurança Empresarial
> Divisão MokInf de Informática
> PABX: (55-11) 5071-2748
> [EMAIL PROTECTED]
> www.moked.com.br 
>
> Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo
> Nível de Prioridade:  Alto  Médio  Baixo
> Destinatário/s: Lista de divulgação
> -
> Bom dia,
>
> Pessoal, fiz uma rápida pesquisa e ñ consegui descobrir(ao menos saber do
> q se trata) hashs... alguém poderia me dar um Help???
>
> Num sei nem se issu é relacionado diretamente com Delphi, então se for
> off-topic, desculpem-me.
>
> Obrigada,
>
> Tamara
> A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000
>
> Serviços prestados no Brasil na área de segurança pessoal e empresarial:
> Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos
> | Auditoria e Sindicância | Software de Gestão | Help-desk 24hs
>
>
> O emitente da mensagem é o responsável por seu conteúdo e divulgação,
> proibindo sua reprodução sem a prévia autorização do mesmo.
> O conteúdo da presente mensagem é exclusivo para o/s destinatário/s e caso
> tenha recebido este e-mail por engano, por  favor  apaga-o e notifique o
> remetente.
> Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
> comprometimento com os custo envolvidos!
>
>
>
>
> [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

 

[delphi-br] O q são Hashs?

[Moked - Tamara \(Brazil\)]

   Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br  

Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo 
Nível de Prioridade:  Alto  Médio  Baixo
Destinatário/s: Lista de divulgação 
-
Bom dia,
 
Pessoal, fiz uma rápida pesquisa e ñ consegui descobrir(ao menos saber do q se 
trata) hashs... alguém poderia me dar um Help???
 
Num sei nem se issu é relacionado diretamente com Delphi, então se for 
off-topic, desculpem-me.
 
Obrigada,

Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000

Serviços prestados no Brasil na área de segurança pessoal e empresarial: 
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | 
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs 

 
O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo 
sua reprodução sem a prévia autorização do mesmo. 
O conteúdo da presente mensagem é exclusivo para o/s destinatário/s e caso 
tenha recebido este e-mail por engano, por  favor  apaga-o e notifique o 
remetente. 
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o 
comprometimento com os custo envolvidos! 
 



[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] Validação de datas

[Sandro]

Pode usar a funcao DaysInAMonth() da unit DateUtils.
Ela retorna o número de dias de um mês em um determinado ano.
  - Original Message - 
  From: marcelo_juniorrr 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 30, 2006 12:39 PM
  Subject: [delphi-br] Validação de datas


  Preciso fazer uma validação para os meses... por exemplo (31 e 30 
  dias).  






   

[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

 

[delphi-br] Re: SQL Server 2000 e BDE - problema com cabo de rede

[Murillo Proença]

vou fazer este teste também, vlw

--- Em delphi-br@yahoogrupos.com.br, "Danilo Valente" <[EMAIL PROTECTED]>
escreveu
>
> Você tentou  colocar (local)?
> 
> Atenciosamente,
> 
> Danilo Valente
>   - Original Message - 
>   From: Murillo Proença 
>   To: delphi-br@yahoogrupos.com.br 
>   Sent: Wednesday, August 30, 2006 10:34 AM
>   Subject: [delphi-br] Re: SQL Server 2000 e BDE - problema com cabo
de rede
> 
> 
>   também acho que deve ser configuração no BDE, mas o que?
>   já tentei colocar na configuração do BDE em ServerName o ip da
>   máquina, tentei também 127.0.0.1, mas nada, é só tirar o cabo de rede
>   que o BDE não conecta mais.
> 
>   --- Em delphi-br@yahoogrupos.com.br, [EMAIL PROTECTED] escreveu
>   >
>   > Não entendi muito bem, mais os sintomas são que o BDEconfig,
deve ser
>   > posicionado para cada um dos casos.
>   > 
>   > Roberto
>   > 
>   > 
>   > > Mensagem Original:
>   > > Data: 08:57:00 30/08/2006
>   > > De: Murillo Proença <[EMAIL PROTECTED]>
>   > > Assunto: [delphi-br] SQL Server 2000 e BDE - problema com cabo
de rede
>   > 
>   > > Bom dia galera,
>   > >
>   > > tenho um sistema que conecta a um servidor SQLServer 2000 que está
>   > > local em um laptop. Acontece que se o laptop está conectado na
rede,
>   > > ele funciona numa boa, mas é só tirar o cabo de rede que o BDE não
>   > > consegue conectar ao banco, só que o banco está local na própria
>   máquina.
>   > > Meu cliente pediu para instalar no laptop, justamente para
utilizar o
>   > > sistema onde estiver, só que a bomba só funciona se estiver
conectado
>   > > a rede.
>   > > Alguém tem idéia do que possa ser?
>   > >
>   > > Grato
>   > >
>   > > Murillo Proença
>   > >
>   > >
>   > >
>   > >
>   > 
>   > 
>   >
>  

>   > Aqui na Oi Internet você ganha ou ganha. Além de acesso grátis com
>   > qualidade, ganha contas ilimitadas de email com 1 giga cada uma.
Ganha
>   > espaço ilimitado para hospedar sua página pessoal. Ganha flog,
suporte
>   > grátis e muito mais. Baixe grátis o Discador em
>   > http://www.oi.com.br/discador e comece a ganhar.
>   > 
>   > Agora, se o seu negócio é voar na internet sem pagar uma fortuna,
>   > assine Oi Internet banda larga a partir de R$ 9,90. Clique em
>   > http://www.oi.com.br/bandalarga e aproveite essa moleza!
>   >
> 
> 
> 
> 
>
> 
> [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: RES: [delphi-br] Footer do DataGrid - finalmente

[Murillo Proença]

é que vc não entendeu o meu problema, eu precisava pegar o footer sem
ser pelo ItemDataBound.

--- Em delphi-br@yahoogrupos.com.br, "Andreano Lanusse"
<[EMAIL PROTECTED]> escreveu
>
> Não entendi, tinha te falado para usar o FindControl e você
disse que não funcionava
>  
>  
> No itemdataboud você pode testar o tipo do item, algo assim:
>  
> if ( e.Item.ItemType in [ ListItemType.Item,
ListItemType.AlternatingItem ] ) then  // onde você pode usar
ListItemType.Footer
>   begin
>  P := (e.Item.DataItem) as Palestra;
>  e.Item.Cells[0].Text := P.Titulo;
>  
>  for I:= 0 to P.Tema.Count - 1 do begin
>e.Item.Cells[1].Text := e.Item.Cells[1].Text +
P.Tema.Item[I].Descricao + '/' ;
>  end;
> 
>   end;
> 
>  
> []'s
>  
> Andreano Lanusse
> System Engineer - Development Tools
> http://info.borland.com.br/borcon> Tel.: +55 (11)
2165 - 8000 / Mobile: +55 (11) 8196-5912 
> http://info.borland.com.br/borcon> [EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]>  - www.borland.com.br
http://www.borland.com.br/> 
> Blogs: http://blogs.borland.com/andreanolanusse
http://blogs.borland.com/andreanolanusse> 
> Artigos: http://bdn.borland.com
http://bdn.borland.com/>  
> 
> 
> 
> De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em nome de Murillo Proença
> Enviada em: Wednesday, August 30, 2006 04:18 PM
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Footer do DataGrid - finalmente
> 
> 
> Andreano, acredite se quiser, a solução:
> 
> dgItem:=
>
DataGridItem(DataGrid1.Controls[0].Controls[DataGrid1.Controls[0].Controls.Count
> - 1]);
> edValor:= TextBox(dgItem.FindControl('edtTotal'));
> 
> se o DataGrid usar paginação tem que trocar o -1 por -2.
> 
> nada como o google.
> 
> Abraço
> 
> --- Em delphi-br@yahoogrupos.com.br, "Andreano Lanusse"
> <[EMAIL PROTECTED]> escreveu
> >
> > É isso mesmo, somente pelo ItemDataBound, ou seja, uma chamada no
> server você vai acessar os itens.
> >  
> > Se quiser fazer do lado cliente, faz por JavaScript ou você pode
> fazer por AJAX.
> >  
> > Teoricamente você tem toda a lista, imagine que você esteja
> associoando um ArrayList, DataSet ou algo do tipo, então você consegue
> fazer a soma, agora quando for alterado os valores faz um databind ou
> javascript/ajax...
> >  
> >  
> > []'s
> >  
> > Andreano Lanusse
> > System Engineer - Development Tools
> > http://info.borland.com.br/borcon> Tel.: +55 (11)
> 2165 - 8000 / Mobile: +55 (11) 8196-5912 
> > http://info.borland.com.br/borcon> [EMAIL PROTECTED]
> mailto:[EMAIL PROTECTED]>  - www.borland.com.br
> http://www.borland.com.br/> 
> > Blogs: http://blogs.borland.com/andreanolanusse
> http://blogs.borland.com/andreanolanusse> 
> > Artigos: http://bdn.borland.com
> http://bdn.borland.com/>  
> >  
> >  
> > 
> > 
> > 
> > De: delphi-br@yahoogrupos.com.br
> [mailto:[EMAIL PROTECTED] Em nome de Murillo Proença
> > Enviada em: Wednesday, August 30, 2006 03:00 PM
> > Para: delphi-br@yahoogrupos.com.br
> > Assunto: Re: RES: RES: RES: [delphi-br] Footer do DataGrid - quase
> desistindo
> > 
> > 
> > nesse caso eu não estarei gravando no banco, ou seja, não vou ter o
> > DataBind. Então quer dizer que se não for no ItemDataBound eu não
> > consigo acessar o footer?
> > 
> > 
> > --- Em delphi-br@yahoogrupos.com.br, "Andreano Lanusse"
> > <[EMAIL PROTECTED]> escreveu
> > >
> > > Ok...
> > >  
> > > Mas quando você clica no botão os dados serão salvos no banco de
> > dados? Se sim você pode fazer um databind e usar o contador no
> > itemdatabound
> > >  
> > > se não você vai ter que fazer uma função em JavaScript :o)
> > >  
> > >  
> > > []'s
> > >  
> > > Andreano Lanusse
> > > System Engineer - Development Tools
> > > http://info.borland.com.br/borcon> Tel.: +55 (11)
> > 2165 - 8000 / Mobile: +55 (11) 8196-5912 
> > > http://info.borland.com.br/borcon> [EMAIL PROTECTED]
> > mailto:[EMAIL PROTECTED]>  - www.borland.com.br
> > http://www.borland.com.br/> 
> > > Blogs: http://blogs.borland.com/andreanolanusse
> > http://blogs.borland.com/andreanolanusse> 
> > > Artigos: http://bdn.borland.com
> > http://bdn.borland.com/>  
> > > 
> > > 
> > > 
> > > De: delphi-br@yahoogrupos.com.br
> > [mailto:[EMAIL PROTECTED] Em nome de Murillo Proença
> > > Enviada em: Wednesday, August 30, 2006 01:29 PM
> > > Para: delphi-br@yahoogrupos.com.br
> > > Assunto: Re: RES: RES: [delphi-br] Footer do DataGrid - quase
> desistindo
> > > 
> > > 
> > > é aí que tá o problema Andreano, se fosse no ItemDataBound tava blz,
> > > mas isso é feito em um botão, onde o usuário após digitar todos os
> > > valores, pressiona esse botão para obter o total da coluna.
> > > 
> > > 
> > > 
> > > --- Em delphi-br@yahoogrupos.com.br, "Andreano Lanusse"
> > > <[EMAIL PROTECTED]> escreveu
> > > >
> > > > Isso é o que você está executando no ItemDataBound?
> > > >  
> > > > se for você tem que fazer o FindControl no parametro E, então
>

Re: [delphi-br] Retornar o valor contido num campo Memo

[Leandro]

Olá,

Cara, AsString tinha que retornar o texto, independente do tamanho do campo...

Talvez tenha sido gravado o texto "(MEMO)" mesmo... isso se vc fizesse tipo:

Table1OBS1.Text := Table1OBS2.Text;

aí poderia gravar "(MEMO)"... aí o .AsString retornaria isso mesmo...

É só uma hipótese... 

att,

Leandro

- Original Message - 
  From: Rogerio Martins 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 30, 2006 8:04 AM
  Subject: Re: [delphi-br] Retornar o valor contido num campo Memo


  Eu já havia tentado essa alternativa, aliás, foi a primeira...mas não 
  funcionou para nenhum dos campos de tamanho 1000 e 4000, respectivamente. 
  Também tentei a propriedade Text , mas o resultado foi o mesmo : " (MEMO) "

  Bem...vou continuar procurando outra alternativa.

  Valeu


  - Original Message - 
  From: "Leandro" <[EMAIL PROTECTED]>
  To: 
  Sent: Wednesday, August 30, 2006 7:21 AM
  Subject: Re: [delphi-br] Retornar o valor contido num campo Memo


  Table1.FieldByName('CAMPO').AsString


- Original Message - 
From: Rogerio Martins
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 3:47 PM
Subject: [delphi-br] Retornar o valor contido num campo Memo


Boa tarde pessoal !

Alguem sabe como fazer um campo memo (ou texto de tamanho grande) de um
TDataSet retornar o valor realmente armazenado nele, em vez de "(MEMO)" ?

Desde já, agradeço.





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



-- 
< 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] OnChange, como evitar???

[Luiz Eduardo Oliveira Fonseca]

ou . veridique se a tabela está em modo de insert ou edit .. para isso ...
use como referenia o Datasource da tabela .


 if not dsClientes.State in [dsInsert, dsEdit] then
   abort;




On 8/31/06, Moacir - Prisma <[EMAIL PROTECTED]> wrote:
>
>  Luis,
>
> No Evento OnChange verifique se a tabela ou query esta ativa:
>
> If not Tabela.active then
> exit;
>
> [ ]´s
> Moacir
>
>
>
> Luis Carlos Quinhone escreveu:
>
> > Pessoal, tenho algumas instruções no OnChange de dbgrid, dblookup, mas
> quando o form é aberto todos os eventos onChange são disparados, dando erro
> "tabela não está no modo edit ou insert", tem como eu evitar que esses
> eventos sejam disparados na abertura do Form?
> >
> > Att
> >
> > Luis carlos
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> 
>



-- 



Atenciosamente, Luiz Eduardo.


>> Desenvolvimento de Sistemas PHP e Delphi

>> Manutenção em Base de Dados MySQL , Interbase/Firebird e MS Access ...

Fone: (12) 8143-7191
email alternativo: [EMAIL PROTECTED]




[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] OnChange, como evitar???

[Moacir - Prisma]

Luis,

No Evento OnChange verifique se a tabela ou query esta ativa:

If not Tabela.active then
exit;

[ ]´s
Moacir



Luis Carlos Quinhone escreveu:
> Pessoal, tenho algumas instruções no OnChange de dbgrid, dblookup, mas quando 
> o form é aberto todos os eventos onChange são disparados, dando erro "tabela 
> não está no modo edit ou insert", tem como eu evitar que esses eventos sejam 
> disparados na abertura do Form?
> 
> Att
> 
> Luis carlos
> 
> [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