[delphi-br] RE: s--l

[Andre Luis Silveria]

Hi,
How are you recently?
I have good news for you. 
I give you some surprice here! The latest Apple iPad Wi-Fi + 3G (64GB)  
is only 429.99 And other items all are original with low price that you 
can't belive !!
You can never find such a low price in other place...
Don't miss this chance, hope you can find somethings that you are interested .
I believe you will have an good experience on shopping from them.
The website is  http://www.olanys.com
rega...@--


  

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

[delphi-br] Hello . t--h

[Andre Luis Silveria]

Hi，
  During my travel in Guangzhou,China,I find a company which sell world-famous 
brand products such as Apple,Nokia,Sony,Philips .This company accept paypal 
,credit card,bank transfer and western union payment method .Chinese products 
have low price is not only legend .I go to China by myself and find it is fact 
and authentic products .Don't miss this chance .I have got many bonus from them 
.To help publicize them,please understand .By the way,tell you their website 
address:   www.vipuyanst.com 
thanksh--3


  

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

Re: [delphi-br] Virus ao compilar um programa

[Andre]

Ai Xará, nesse caso eu não tenho nenhuma rotina dessa magnitude, ou seja, nada 
de criptografia.
 
Mesmo assim, valeu.
 
André

--- Em ter, 24/8/10, Andrei Luís  escreveu:


De: Andrei Luís 
Assunto: Re: [delphi-br] Virus ao compilar um programa
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 24 de Agosto de 2010, 22:31


  



A um tempo atrás passei por algo semelhante, no meu caso era uma
rotina de criptografia que estava utilizando e o AV (acho que era o
Avast ou o Norton) berrava.

[]s
Andrei

Em 24 de agosto de 2010 22:15, Andre  escreveu:
> Pessoal Boa Noite.
>
> estou recompilando um programa antigo (Delphi 7) de um cliente que tem o 
> AntiVirus Avira (Para quem esqueceu, é aquele do guarda-chuva) o mesmo 
> insisti em dizer que tem um virus "spy.banker.gen" Ficando desagradavél toda 
> vez que é executado.  Já não sei o que fazer mais, já compilei, já passei 2 
> anti-virus, já recompilei um programa do Delphi 7, enfim...
>
> Não queria pedir ao cliente para desabilitar o antivirus dele, não seria 
> legal.  Alguém já passou por isso?
>
> Grato,
>
> André Ferreira
>
>
>
>
> 
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>








  

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

Re: [delphi-br] Virus ao compilar um programa

[Andre]

Pô Roni, eu não me atentei a isso não, mas vou verificar esse absurdo.
 
Valeu, caso dê certo eu posto aqui.
 
André

--- Em ter, 24/8/10, Roni Rodrigo  escreveu:


De: Roni Rodrigo 
Assunto: Re: [delphi-br] Virus ao compilar um programa
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 24 de Agosto de 2010, 23:48


  



por mais estúpido que possa parecer... por acaso vc tem algum form ou 
unit chamada Principal?
Se tiver, renomeia (renomeia pra outro nome, como diz o cara do 
suporte hehe)...
o/

Em 24/08/2010 22:31, Andrei Luís escreveu:
> A um tempo atrás passei por algo semelhante, no meu caso era uma
> rotina de criptografia que estava utilizando e o AV (acho que era o
> Avast ou o Norton) berrava.
>
> []s
> Andrei
>
> Em 24 de agosto de 2010 22:15, Andre  <mailto:a_ferreira1967%40yahoo.com.br>> escreveu:
> > Pessoal Boa Noite.
> >
> > estou recompilando um programa antigo (Delphi 7) de um cliente que 
> tem o AntiVirus Avira (Para quem esqueceu, é aquele do guarda-chuva) o 
> mesmo insisti em dizer que tem um virus "spy.banker.gen" Ficando 
> desagradavél toda vez que é executado. Já não sei o que fazer mais, 
> já compilei, já passei 2 anti-virus, já recompilei um programa do 
> Delphi 7, enfim...
> >
> > Não queria pedir ao cliente para desabilitar o antivirus dele, não 
> seria legal. Alguém já passou por isso?
> >
> > Grato,
> >
> > André Ferreira
> >

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









  

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

Re: [delphi-br] Virus ao compilar um programa

[Andre]

Pessoal tirar eu não tirei, mas desabilitei o Antivirus de não mais scanear o 
programa.  Achei nesse Blog 
http://jefferson-ryan.blogspot.com/2008/10/os-falsos-positivos-do-avira-antivir.html
 
 
André

-- Em ter, 24/8/10, Andre  escreveu:


De: Andre 
Assunto: [delphi-br] Virus ao compilar um programa
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 24 de Agosto de 2010, 22:15


  



Pessoal Boa Noite.

estou recompilando um programa antigo (Delphi 7) de um cliente que tem o 
AntiVirus Avira (Para quem esqueceu, é aquele do guarda-chuva) o mesmo insisti 
em dizer que tem um virus "spy.banker.gen" Ficando desagradavél toda vez que é 
executado. Já não sei o que fazer mais, já compilei, já passei 2 anti-virus, já 
recompilei um programa do Delphi 7, enfim...

Não queria pedir ao cliente para desabilitar o antivirus dele, não seria legal. 
Alguém já passou por isso?

Grato,

André Ferreira









  

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

Re: Res: [delphi-br] [CLIENTDATASET 3 TABELAS]

[Andre Yahoo]

Cara Eny,

Não entendi o porque do problema, uma vez que ao carregar o registro 
pai, você vai estar filtrando ele, o que retornará para o registro 
mestre somente um registro, já para o filho você estará retornando todos 
os detalhes que estão vinculados com este registro mestre.

Mas você disse: "quando o CDS carrega os registros do Master, ele tras 
também, para cada registro pai, todos os registros do filho", quer dizer 
que estava retornando todos os mestres ? Para a programação C/S você 
retorna somente um registro mestre, que é o que o usuário vai trabalhar 
nele, não precisa retornar todos os registros. Se era essa a situação, o 
problema era estrutural e com erro de programação, não do componente ou 
da maneira com os mesmos eram usados.

Se não for isso que acontecia e puder explicar melhor, pois acho que 
muitos como eu podem não ter entendido a situação que ocorria muito bem.


Atenciosamente,

André Luis da Silveira
Siagri - Sistemas de Gestao Ltda.

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

Re: [delphi-br] Diagrama de GANTT

[Andre Yahoo]

A que melhor pode te atender é a suite de componente devexpress, 
realmente o gráfico de gantt deles é ótimo.
__
Fale com seus amigos  de gra�a com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

Res: Res: [delphi-br] Arrastando arquivos do windows para dentro de um listbox

[Andre Luiz Stivanatto]

oi Adriano ainda não consegui resolver não, se pode me mandar seu codigo de 
exemplo ?

obrigado pela atenção ! 
Andre Luiz





De: Adriano Santos 
Para: "delphi-br@yahoogrupos.com.br" 
Cc: "delphi-br@yahoogrupos.com.br" 
Enviadas: Terça-feira, 15 de Junho de 2010 9:20:10
Assunto: Re: Res: [delphi-br] Arrastando arquivos do windows para dentro de um  
listbox

   
Opa,

Cheguei super tarde em casa. Emergência no serviço. Vi que a galera 
respondeu. Conseguiu resolver?

Abs

Adriano Santos
+55 (11)8219-5420
http://twitter.com/asrsantos
Enviado de meu iPhone

Em 14/06/2010, às 17:49, Andre Luiz Stivanatto 
 escreveu:

> obrigado Adriano, até agora ninguém respondeu são 17:48 hs, se 
> você me mandar esse exemplo eu te agradeço, muito obrigado por ter m 
> e respondido.
>
> Andre Luiz
>
> 
> De: Adriano Santos 
> Para: delphi-br@yahoogrupos.com.br
> Cc: delphi 1 
> Enviadas: Segunda-feira, 14 de Junho de 2010 10:25:29
> Assunto: Re: [delphi-br] Arrastando arquivos do windows para dentro 
> de um  listbox
>
> André,
>
> Se ninguém responder seu e-mail até a noite, te passo um exemplo. Te 
> nho isso
> no meu server em home-office. Tenho um exemplo bem legal.
>
> -- 
> Adriano Santos
> http://twitter.com/asrsantos
> www.delphitodelphi.blogspot.com
>
> 2010/6/12 Andre Luiz Stivanatto 
>
> >
> >
> > Oi pessoal tudo bem ?
> > Estou com um projeto aqui que estou montando, tenho um form e um 
> listbox1 ,
> > ja fiz um botão abrir arquivos com o opendialog1 so que para abrir 
>  4.783
> > arquivos no listbox1 não é facil, estava pensando em abrir a pasta 
>  dos 4.783
> > arquivos, depois mandar selecionar tudo de uma vez e arrastar para 
> dentro do
> > listbox que esta dentro do meu projeto, ai os 4.783 arquivos ficaram
> > listados no listbox de uma vez, é mais rapido do que lever varios 
> minutos
> > selecionando pelo opendialog que demora muito mais, o que eu quero 
>  é um
> > codigo que permita eu arrastar multiplos arquivos de uma pasta do 
> windows e
> > jogar dentro do listbox, como faço esse codigo ?
> > obrigado pela atenção de todos !
> >
> > Andre Luiz
> >
> > [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 >>>>>
>
> [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]

Res: [delphi-br] Arrastando arquivos do windows para dentro de um listbox

[Andre Luiz Stivanatto]

vlw Antonio, mas seu exemplo não deu certo.

 Andre Luiz





De: Antonio Leandro Furstenberger Favero 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 14 de Junho de 2010 19:05:18
Assunto: Re: [delphi-br] Arrastando arquivos do windows para dentro de um  
listbox

Tenho um exemplo, só que tem problemas com nomes longos, ele vem com ~

Seria legal o Adrianos postar o exemplo dele., Também vou querer.

Mas segue meu exemplo:

Private
// IDropTarget
function DragEnter(const dataObj: IDataObject;
   grfKeyState: Longint;
   pt: TPoint;
   var dwEffect: Longint): HResult; stdcall;
function DragOver(grfKeyState: Longint;
  pt: TPoint;
  var dwEffect: Longint): HResult; stdcall;
function DragLeave: HResult; stdcall;
function Drop(const dataObj: IDataObject;
  grfKeyState: Longint; pt: TPoint;
  var dwEffect: Longint): HResult; stdcall;


{-}
{ IDropTarget-Implementierung }
{-}
function TAgentScreen.DragEnter(const dataObj: IDataObject;
  grfKeyState: Longint;
  pt: TPoint;
  var dwEffect: Longint): HResult;
begin
  dwEffect := DROPEFFECT_COPY;
  Result  := S_OK;
end;

function TAgentScreen.DragOver(grfKeyState: Longint;
  pt: TPoint;
  var dwEffect: Longint): HResult;
begin
  dwEffect := DROPEFFECT_COPY;
  Result := S_OK;
end;

function TAgentScreen.DragLeave: HResult;
begin
  Result := S_OK;
end;

function TAgentScreen.Drop(const dataObj: IDataObject;
  grfKeyState: Longint;
  pt: TPoint;
  var dwEffect: Longint): HResult;
var
  aFmtEtc: TFORMATETC;
  aStgMed: TSTGMEDIUM;
  pData: PAnsiChar;
begin
  {Make certain the data rendering is available}
  if (dataObj = nil) then
 raise Exception.Create('IDataObject-Pointer is not valid!');

  with aFmtEtc do
  begin
cfFormat := CF_TEXT;
ptd := nil;
dwAspect := DVASPECT_CONTENT;
lindex := -1;
tymed := TYMED_HGLOBAL;
  end;

  if DataObj.QueryGetData(aFmtEtc)= S_OK then
  begin
{Get the data}
OleCheck(dataObj.GetData(aFmtEtc, aStgMed));
try
  {Lock the global memory handle to get a pointer to the data}
  pData := GlobalLock(aStgMed.hGlobal);
  { Replace Text }
  SUAFUNCAO(string(pData));
finally
  {Finished with the pointer}
  GlobalUnlock(aStgMed.hGlobal);
  {Free the memory}
  ReleaseStgMedium(aStgMed);
end;
Result := S_OK;
  end
  else
  begin
 aFmtETC.cfFormat:=RegisterClipboardFormat(CFSTR_FILENAMEA);
 if DataObj.QueryGetData(aFmtEtc)= S_OK then
 begin
  {Get the data}
OleCheck(dataObj.GetData(aFmtEtc, aStgMed));
try
  {Lock the global memory handle to get a pointer to the data}
  pData := GlobalLock(aStgMed.hGlobal);
  { Replace Text }
  OpenFiles(string(pData));
finally
  {Finished with the pointer}
  GlobalUnlock(aStgMed.hGlobal);
  {Free the memory}
  ReleaseStgMedium(aStgMed);
end;
   Result := S_OK;
 end
 else
   Result:= S_FALSE;
  end;
end;


procedure TAgenScreen.onCreate():
begin
  {Allow window to accept drop events}
  OleInitialize(nil);
  OleCheck(RegisterDragDrop(Handle, Self));
end;

2010/6/14 Andre Luiz Stivanatto 

>
>
> obrigado Adriano, até agora ninguém respondeu são 17:48 hs, se você me
> mandar esse exemplo eu te agradeço, muito obrigado por ter me respondido.
>
> Andre Luiz
>
> 
> De: Adriano Santos >
>
> Para: delphi-br@yahoogrupos.com.br 
> Cc: delphi 1 
> 
> >
> Enviadas: Segunda-feira, 14 de Junho de 2010 10:25:29
> Assunto: Re: [delphi-br] Arrastando arquivos do windows para dentro de um
> listbox
>
>
> André,
>
> Se ninguém responder seu e-mail até a noite, te passo um exemplo. Tenho
> isso
> no meu server em home-office. Tenho um exemplo bem legal.
>
> --
> Adriano Santos
> http://twitter.com/asrsantos
> www.delphitodelphi.blogspot.com
>
> 2010/6/12 Andre Luiz Stivanatto 
> 
> >
>
> >
> >
> > Oi pessoal tudo bem ?
> > Estou com um projeto aqui que estou montando, tenho um form e um listbox1
> ,
> > ja fiz um botão abrir arquivos com o opendialog1 so que para abrir 4.783
> > arquivos no listbox1 não é facil, estava pensando em abrir a pasta dos
> 4.783
> > arquivos, depois mandar selecionar tudo de uma vez e arrastar para dentro
> do
> > listbox que esta dentro do meu projeto, ai os 4.783 arquivos ficaram
> > listados no listbox de uma vez, é mais rapido do que lever varios minutos
> > selecionando pelo opendialog que demora muito mais, o que eu quero é um
> > codigo que permita eu arrastar multiplos arquivo

Res: Res: [delphi-br] Arrastando arquivos do windows para dentro de um listbox

[Andre Luiz Stivanatto]

então meu listbox ja esta com essa opção abilitada :
AllowMultiSelect pra 
permitir selecionar múltiplos arquivos


 é que para abrir 4.783 arquivos que tenho no pc demora muito tempo, porisso 
preciso de arrrastar os arquivos para dentro do listbox é muito mais facil 
fazer isso, pois eu abro a pasta que tem os 4.783 arquivos, vou em editar e 
mando selecionar tudo de uma vez depois, é so aeu arrastar tudo para dentro do 
listbox.
não preciso de ter o memo, so quero o listbox mesmo, e esse codigo é estranho 
pois não sei qual é a area privada da unit do form1 ?
preciso de um codigo mais simples que interage com o listbox, so preciso que o 
listbox aceite os arquivos em modo arrastar, pois quando tento fazer isso o 
cursor do mouse aparece o icone circular de negação.
você poderia me ver um exemplo mais pratico, ou montar o codigo ai e me mandar, 
pois estou tentando e não estou conseguindo fazer esse codigo, talvez você 
consigua pois se deve ter mais experiencia do que eu.
eu aprendi programação em delphi pois fiz o colegial + processamento de dados 
no opção no ano de 2000 que comecei, so que em 2002 cortaram isso do plano das 
escolas , foi no terceiro ano, portanto esta incompleto meus estudos, mas estou 
indo pesquisando e vendo exemplos.
so que isso que eu quero fazer num programa que renomeia extenções dos arquivos 
ja consegui fazer, so falta isso para facilitar a minha vida, pois pelo 
opendialog fica a vida toda para selecionar tudo, se eu conseguir fazer o 
lisbox permitir o arrastar e soltar então fica muito mais facil.
obrigado pela ajuda, mas se der para você me dar uma ajuda com um codigo que 
interaja sem ter outros componentes dentro do projeto como o memo, so quero o 
codigo que se interaja com o listbox, pois é so ele quem vou usar.

obrigado e agurado retorno de sua resposta.
Andre Luiz





De: Roni Rodrigo 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 14 de Junho de 2010 19:19:17
Assunto: Re: Res: [delphi-br] Arrastando arquivos do windows para dentro de um  
listbox

   
Olá André... não daria pra habilitar a opção AllowMultiSelect pra 
permitir selecionar múltiplos arquivos? ai vc pode percorrer a lista de 
arquivos selecionados, adicionando-os...
sobre arrastar o arquivo pro form, procurei no google e esse foi um dos 
primeiros...
http://www.planetadelphi.com.br/dica/6768/arrastar-e-soltar-arquivos-sobre-sua-aplica%C3%A7%C3%A3o

não testei mas parece funcionar...

Em 14/06/2010 17:49, Andre Luiz Stivanatto escreveu:
> obrigado Adriano, até agora ninguém respondeu são 17:48 hs, se você me 
> mandar esse exemplo eu te agradeço, muito obrigado por ter me respondido.
>
> Andre Luiz
>
> 
> De: Adriano Santos mailto:asrsantos%40gmail.com>>
> Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
> Cc: delphi 1  <mailto:lista-delphi%40yahoogrupos.com.br>>
> Enviadas: Segunda-feira, 14 de Junho de 2010 10:25:29
> Assunto: Re: [delphi-br] Arrastando arquivos do windows para dentro de 
> um listbox
>
> André,
>
> Se ninguém responder seu e-mail até a noite, te passo um exemplo. 
> Tenho isso
> no meu server em home-office. Tenho um exemplo bem legal.
>
> -- 
> Adriano Santos
> http://twitter.com/asrsantos
> www.delphitodelphi.blogspot.com
>
> 2010/6/12 Andre Luiz Stivanatto  <mailto:andreluiz.stivanatto%40yahoo.com.br>>
>
> >
> >
> > Oi pessoal tudo bem ?
> > Estou com um projeto aqui que estou montando, tenho um form e um 
> listbox1 ,
> > ja fiz um botão abrir arquivos com o opendialog1 so que para abrir 4.783
> > arquivos no listbox1 não é facil, estava pensando em abrir a pasta 
> dos 4.783
> > arquivos, depois mandar selecionar tudo de uma vez e arrastar para 
> dentro do
> > listbox que esta dentro do meu projeto, ai os 4.783 arquivos ficaram
> > listados no listbox de uma vez, é mais rapido do que lever varios 
> minutos
> > selecionando pelo opendialog que demora muito mais, o que eu quero é um
> > codigo que permita eu arrastar multiplos arquivos de uma pasta do 
> windows e
> > jogar dentro do listbox, como faço esse codigo ?
> > obrigado pela atenção de todos !
> >
> > Andre Luiz
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> [As partes desta mensagem que não continham texto foram removidas]

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


 


  

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

Res: [delphi-br] Arrastando arquivos do windows para dentro de um listbox

[Andre Luiz Stivanatto]

obrigado Adriano, até agora ninguém respondeu são 17:48 hs, se você me mandar 
esse exemplo eu te agradeço, muito obrigado por ter me respondido.

 Andre Luiz





De: Adriano Santos 
Para: delphi-br@yahoogrupos.com.br
Cc: delphi 1 
Enviadas: Segunda-feira, 14 de Junho de 2010 10:25:29
Assunto: Re: [delphi-br] Arrastando arquivos do windows para dentro de um  
listbox

André,

Se ninguém responder seu e-mail até a noite, te passo um exemplo. Tenho isso
no meu server em home-office. Tenho um exemplo bem legal.


-- 
Adriano Santos
http://twitter.com/asrsantos
www.delphitodelphi.blogspot.com



2010/6/12 Andre Luiz Stivanatto 

>
>
> Oi pessoal tudo bem ?
> Estou com um projeto aqui que estou montando, tenho um form e um listbox1 ,
> ja fiz um botão abrir arquivos com o opendialog1 so que para abrir 4.783
> arquivos no listbox1 não é facil, estava pensando em abrir a pasta dos 4.783
> arquivos, depois mandar selecionar tudo de uma vez e arrastar para dentro do
> listbox que esta dentro do meu projeto, ai os 4.783 arquivos ficaram
> listados no listbox de uma vez, é mais rapido do que lever varios minutos
> selecionando pelo opendialog que demora muito mais, o que eu quero é um
> codigo que permita eu arrastar multiplos arquivos de uma pasta do windows e
> jogar dentro do listbox, como faço esse codigo ?
> obrigado pela atenção de todos !
>
> Andre Luiz
>
> [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 >>>>>



  

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

[delphi-br] Arrastando arquivos do windows para dentro de um listbox

[Andre Luiz Stivanatto]

Oi pessoal tudo bem ?
Estou com um projeto aqui que estou montando, tenho um form e um listbox1 , ja 
fiz um botão abrir arquivos com o opendialog1 so que para abrir 4.783 arquivos 
no listbox1 não é facil, estava pensando em abrir a pasta dos 4.783 arquivos, 
depois mandar selecionar tudo de uma vez e arrastar para dentro do listbox que 
esta dentro do meu projeto, ai os 4.783 arquivos ficaram listados no listbox de 
uma vez, é mais rapido do que lever varios minutos selecionando pelo opendialog 
que demora muito mais, o que eu quero é um codigo que permita eu arrastar 
multiplos arquivos de uma pasta do windows e jogar dentro do listbox, como faço 
esse codigo ?
obrigado pela atenção de todos !

 Andre Luiz



  

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

[delphi-br] Hello . $--3

[Andre Luis Silveria]

hi
I have a Japanese friend told me that he worked in a Japanese company. I 
visited the company he worked for and found the products very favorable. And 
there are many product versions, such as the European version, American 
version, and the Asian version and so on. All company's products take photos 
for the true products. I suggest you should have a look in this website. There 
is the company website:  www.zol-japan2.com.  You can enjoy a lot of benefits 
in the second shopping time. Thank you $--4


  

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

Res: [delphi-br] cubo de decisão

[Andre Luis Silveria]

Aqui na empresa usamos o HierCube, muito bom.
http://www.radar-soft.com/pt/products/vcl.aspx


  

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

[delphi-br] hi. )-

[Andre Luis Silveria]

hi!
I find a good website：  www.besark.com <  http://www.besark.com>
They mainly sell new and original electronic products. 
Now they are holding sales promotion activity, all the product are sold at a 
discount.
low cost and good quality ,and the delivery is on time .
It is a good chance that you should not lose.
If you need some, visit this website .
Hope everything goes well.
Greetings! e-


  

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

[delphi-br] Dear friends! a--b

[Andre Luis Silveria]

Dear friends! 
Keep in touch.I find a website selling various innovative products, such as 
mobile phone, LCD TV, laptop, motorbike and so on.And all products originate 
from America, Japan or Korea.
This website is www.kicrop11.INFO I have purchased some products from this 
website.The cost is low, but the quality is high and they delivery products in 
time.Now they have a promotion, but it only lasts for 45 days.
if you need, you can browse. 
Best wishes!h--)


  

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

Res: [delphi-br] Re: Sistema para Builds de projetos

[Andre Luis Silveria]

Nessa pagina tem o Axial Build feito pelo Isac Pinheiro 
:http://cc.embarcadero.com/Author/55953
Mas aqui na empresa estamos usando o want para a compilação, onde fizemos uma 
interface gráfica par facilitar. 


  

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

Re: [delphi-br] Sistema para Associação...

[Andre]

Eloi, boa noite! Eu não entendi o que você se refere ao software para controlar 
associação, mas se quiser usar um sistema financeiro de contas a pagar, receber 
e caixa e bancos tudo isso via web eu posso te passar um link.
 
 
André

--- Em seg, 1/2/10, Eloi Filho  escreveu:


De: Eloi Filho 
Assunto: [delphi-br] Sistema para Associação...
Para: "Grupo Lista Delphi" , "Grupo Folha de 
Pagto" , "Grupo Delphi Iniciante" 
, "Grupo Delphi BR" 
, "Grupo Delphi Boleto" 
, "Grupo Delphi AcBr" 
, "Grupo Automacao Total" 

Data: Segunda-feira, 1 de Fevereiro de 2010, 10:44


  



bom dia amigos,
Gostaria de saber se alguem tem sistema para associação?
é o seguinte: minha família criou uma associação sem fins lucrativos chamada 
"ATOCA- Associação Torcida Organizada do Cajú", craida para ajudar pessoas 
carente de muitas coisas como: biblioteca comunitária, escola de informática, 
etc..., se quiserem saber mais de nossa associação me mande um email para 
e...@ig.com. br q terei o maior prazer em apresentar mais detalhes, bem, 
estamos querendo controlar a nossa associação e precisamos de um sistema para 
isso, se alguém puder nos ajudar, ficaremos muito grato, e se tivermos que 
comprar os fontes, podemos negociar.

desde já agradeço a todos e um forte abraço...


Eloi Filho
Programador de Sistemas
A.S. Rodrigues Distribuidora
e...@ig.com. br
Fone: (92) 2101-1628 - Fax: (92) 3622-2591
Celular: (92) 8172-2726
www.asrodrigues. com.br

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









  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

[delphi-br] Dataset.BookMark agora é do tipo TBytes

[Andre Yahoo]

Estava tentado compilar alguns projetos antigos para o Delphi 2010, e me 
deparei com uma surpresa desagradável. Quando tenho uma chamada do tipo:
book := dataset.bookmark;
sendo que a variável book é do tipo string, no delphi 2010, dá o 
seguinte erro:
[DCC Error] cxDBData.pas(1001): E2010 Incompatible types: 'string' and 
'TBytes'
Isso devido ter sido mudado o tipo de retorno da função getbookmark da 
classe Dataset na unit DB.
Agora como posso fazer para acertar nos meus projetos com o menos 
impacto possível ?

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Re: Res: [delphi-br] Componente para Agenda

[Andre Yahoo]

Já olhei sim os componentes da Jedi, mas é muito confuso o uso dos 
mesmos, estava procurando algo mais simples de usar e manter.
Mas sigo ainda em busca de alguma coisa, qualquer coisa eu posto os 
resultados.

Obrigado.


André Luis da Silveira
__
Fa�a liga��es para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

[delphi-br] Componente para Agenda

[Andre Luis Silveria]

Bom dia a todos, preciso desenvolver um software de agenda e gostaria de 
sugestões quanto a componentes para exibir os compromissos.
Já olhei os componentes ExpressScheduller, mas prefiria que fossem componentes 
open sources ou free.
Se tiverem alguma indicação agradeço desde já.

Atenciosamente,

André Luis da Silveira



  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

[delphi-br] hi

[Andre Luis Silveria]

Hello,
How are you doing? Hope you are alright. 
Last week, I bought an phone from a site: http://www.olanys.com/
it is very cheap and I get it in 5 days. The quality is very good. 
The site also sell motor,tv,laptop,digital SLRS and so on. 
I never forget to share good things with friends.
So,if you are interested in it, you can have a look.
I think you will get some surprise.  


andre luis


  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Share my happiness!!!

[Andre Yahoo]

As vezes a pessoa pode ter deixado outra pessoa com menos conhecimento 
mexer no computador (tal como esposa, filho), lamento que isso tenha te 
ofendido tanto, meio sensível não ?
Peço desculpas a todos, mas parece que tem gente que acha que o bambam, 
mas não passa de um mané preconceituoso, e se quiser me banir já que é 
moderador esteja a vontade.
__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

[delphi-br] Share my happiness!!!

[Andre Luis Silveria]

Share my happiness!!!
Hi, I am willing to give you a big surprise: . I bought an Apple 
Mac book one week ago from this website. Now, I have received it. This product 
quality is very good. They also sell phones, TV, motors and so on. By the way, 
they mainly sell new and original products and they have many good feedback. 
Because The upcoming Christmas and New Year's, so many companies are promoting 
their products. ooaap website also have very competitive prices. If you need 
these products, you can have a look. It is a good chance that you should not 
lose. Greetings! 


  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] nome do arquivo com data

[Andre Yahoo]

nomearquivo := 'NomeArquivo'+DatetoStr(Now)+'.txt'
__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Re: [delphi-br] ClientDataSet.DataRequest uso?

[Andre Yahoo]

Desculpe me intrometer, mas se você estiver usando n-tier o melhor seria 
ter um método no servidor que montaria o filtro de acordo com as opções 
do cliente. Lembrem-se sempre: SQL é no servidor, o cliente somente 
mostra os dados e validações simples.
__
Fa�a liga��es para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

[delphi-br] Boleto UNIBANCO

[Andre]

Olá
Sou novato em delphi e vejo que aqui tem muitos  profissionais.
Preciso um código fonte de boleto do UNIBANCO que funcione com mysql.
Preciso gerar mensalidades para aproximadamente 100 clientes.
Se alguém puder me ajudar ficarei muito agradecido.
 
André Flores
51.9696-3001
Gallas Telecom
Dois Irmãos - RS
51.3564-5230

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

Re: [delphi-br] <<< ACBR - Nfe >>>

[Andre Yahoo]

Se associe a lista automação total, nela o temos vários usuários que 
estão utilizando o componente para a geração da famigerada NFe. Segue o 
link para se associar. automacaototal-subscr...@yahoogrupos.com.br
__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

[delphi-br] hi, are u ?

[Andre Luis Silveria]

Dear friend,
How are you recently?
I bought a laptop from a website:    www.koreadeal.com last week. I have got 
the product. Its quality is very good and the price is competitive. They also 
sell phones, TV, psp, motor and so on. By the way, they import product from 
Korea and sell new and original products. They have good reputation and have 
many good feedbacks. If you need these products, look at this website will be a 
clever choice. I am sure you will get many surprise and benefits.
Greetings!

 


  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] importar dados planilha excel

[Andre Luis]

voce pode usar os componentes do ADO para carregar a planilha como se 
fosse uma tabela e mostrar em dbgrid, onde ele selecionaria as colunas 
do dbgrid e importaria.
__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Re: [delphi-br] Firebird-Unsupported on-disk structure for file

[Andre Luis]

Esse erro acontece quando se restaura a base de dados em uma versão 
diferente da que foi feito o backup. verifica isso.
__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Res: [delphi-br] OT - Univerisdade Microsoft

[Andre Luis Silveria]

Obrigado pela tentativa mais ainda não é isso, é um site onde tem as vídeo 
aulas, provas e tudo mais, é como um universidade online. O link que me passou 
e para que se possa cadastrar uma universidade como parceiro, tendo acesso ao 
programas da microsoft.   


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

[delphi-br] OT - Univerisdade Microsoft

[Andre Luis Silveria]

Bom dia a todos.
Alguns dias atrás visitando alguns do blogs que custumo acessar um link para um 
artigo sonbre uma universidade da microsoft, cheguei a entrar no site da mesma 
e até fiz a primeira prova do curso de SQL Server, mas como sempre perdi o link 
e não consigo achar pelo Google, se alguem souber alguma coisa ou tiver o link 
e puder me respassar, assim que achar posto aqui para que se alguem tiver 
interesse possa se inscrever tb.


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Res: Res: RES: [delphi-br] Sistema pa controle interno

[Andre Luis Silveria]

Vou tentar montar e te passo.   


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Res: Res: RES: [delphi-br] Sistema pa controle interno

[Andre Luis Silveria]

Use o trio: Mantis + Trac + SubVersion,  todos open 
Com o Mantis vc controle as requisições de implementações, correções de erros, 
etc.
Com o Trac gerencia o que foi feito entre alterações em cada caso  do Mantis.
Com o Subversion, controle as alterações dos fontes.

Mais completo  que isso só o Starteam da Borland.   


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Res: [delphi-br] Retornar a Linha & Unit

[Andre Luis Silveria]

tenta usar o madexcept





De: Leonardo Quinino 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 27 de Fevereiro de 2009 11:04:44
Assunto: Re: [delphi-br] Retornar a Linha & Unit


Eu desistir de procurar isso no delphi, a unica coisa que ainda nao
conseguir fazer em relacao ao clipper foi justamente isso, ( eu programei em
clipper numa epoca jurassica)  rs :)...

a solucao foi rever meus conceitos e valores ahahah,,,  usar mais try
exception, mostrar as mensagens do erro exption   E.ErroMessage. .  etc

gravar logs com telas no momento do erro...

Mas realmente com a praticidade do clipper, nao encontrei,, talvez seja em
funcao do tipo de ambiente de trabalho (dos  / windows) ou talvez em relacao
aos metodos de trabalho interno do delphi nao permitir essa informacao.

Bem a minha opniao bem simploria do assunto é essa, mas posso estar falando
por ignorancia (falta de conhecimento) .

Seria bom esse assunto, a solucao pode existir, se alguem tiver essa
solucao,, nos poupe de uma theread sem fim... .r S:)) !!!

2009/2/26 José Mário Silva Guedes 

>   Olá amigos...
>
> Passei o dia fazendo umas rotinas de LOGs e eis que surge a necessidade
> clássica: Pegar o nome da Unit e o número da linha.
>
> Pesquisei e achei o de sempre... Assert, arquivo MAP...
>
> Será que algum colega conseguiu resolver este tipo de necessidade? Algum
> expert ou componente resolve?
>
> Um forte abraço!
>
> --
> José Mário Silva Guedes
> Analista Programador Delphi
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
Leonardo Quinino

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


   


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Res: [delphi-br] ajuda intervalo numerico

[Andre Luis Silveria]

if (num in [23..56]) and (num in [30..45]) then
ShowMessage('Numero dentro dos dois intervalos');


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Res: [delphi-br] transformar numero em negativo

[Andre Luis Silveria]

SQL:
select case when VLOR_INO > 0 then VLOR_INO * -1 else VLOR_INO end
from inota

Delphi:
if VLOR_INO > 0 then
VLOR_INO := VLOR_INO * -1;


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

[delphi-br] CodeRage III

[Andre Luis Silveria]

Alguem que tenha se inscrito consegue acessar ?

Pois nos email que tenho com os links está dando que a reunião ainda não foi 
iniciada, embora na página do evento diga que se iniciaria as 11:00 pelo 
horário de brasília.


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: Res: [delphi-br] Layout DIMOB

[Andre]

Não Luciano, é DIMOB mesmo! (Declaração de Informações de Atividades 
Imobiliarias).
 
mesmo assim eu já dei o meu jeito.
 
Valeu e obrigado!

--- Em qua, 19/11/08, Luciano Calenzani Simões <[EMAIL PROTECTED]> escreveu:

De: Luciano Calenzani Simões <[EMAIL PROTECTED]>
Assunto: Res: [delphi-br] Layout DIMOB
Para: delphi-br@yahoogrupos.com.br
Data: Quarta-feira, 19 de Novembro de 2008, 12:56






Não seria DIMOF?
Se for olha esse link: http://www.receita. fazenda.gov. br/legislacao/ 
legisassunto/ dimof.htm

Luciano Calenzani Simões

 _ _ __
De: a_ferreira1967 
Para: [EMAIL PROTECTED] os.com.br
Enviadas: Quarta-feira, 19 de Novembro de 2008 10:56:59
Assunto: [delphi-br] Layout DIMOB

Pessoal, gostaria da ajuda de quem já passou por essa experiência:

Estou com um cliente imobiliario, e preciso fazer um orçamento de um 
sistema que aparetemente não deve ser nenhum bicho de 7 cabeças, porém 
fui alertado sobre a exportação de dados para o DIMOB, gostaria de 
saber se alguém tem esse layout, pois na receita em não conseguir 
achar para download. 

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbusca dos.yahoo. com

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

 














  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Pegar um pedaço de um arq uivo stream em um servidor FTP

[Andre Luis]

Procura na clubedelphi que tem um artigo sobre isso, como atualizar um 
executável pegando somente a parte que foi alterada. Teve inclusive uma 
palestra na Borcon do ano passado sobre isso.
__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Re: [delphi-br] SysCasa .. lógica para pro dução

[Andre Luis]

Faço isso em POO e NTier
Basta depositar R$ 1.500,00 na minha conta que conversamos (este é 
apenas o sinal para a efetivação do contato)

É cada um que aparece.
__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Re: [delphi-br] ideia sobre valores

[Andre]

Olá Felipe, pela minha experiência, depende do cliente, tem clientes que sonha 
com um sistema para toda a empresa, mas quando colocamos o custo maquina, custo 
software (no caso o banco de dados), etc e tal, o cliente pensa melhor e 
prefere colocar um simples sistema de estoque ou até mesmo não faz nada e adia 
o sistema para o "orçamento" de 2009 :-) 
Bom, o que eu quero dizer é que, se o cliente realmente vai fazer algo ele já 
tem um % do faturamento dele disponível para isso e claro ele vai sempre chorar 
e verificar com outras empresa ou free e etc e tal. Então eu aconselho analisar 
as prioridades do cliente, depois vai descendo para os níveis mais baixo, um 
sistema desse leva muito tempo para fazer (caso você não tenha nada pronto) e 
demanda (no caso de começar do zero) muito, eu disse muito estudo de caso junto 
com o cliente e pessoas envolvidas. Resumindo: Junte horas do projeto que 
realmente o cliente quer desenvolver + a sua hora com um bom desconto já que 
vai desenvolver um sistema desse porte e que vai ficar muito tempo com o 
cliente, faça uma media, jogue a gordura no caso dele chorar e mande o 
orçamento, mas caso ele ache muito caro, faça como o meu comercial diz: 
"Negocie sempre, pois um simples sistema de estoque hoje pode gerar um ERP no 
futuro..."
 
Abraços, 
 
André Ferreira
Analista de Negocios. 

--- Em sex, 8/8/08, felipe govoni <[EMAIL PROTECTED]> escreveu:

De: felipe govoni <[EMAIL PROTECTED]>
Assunto: [delphi-br] ideia sobre valores
Para: delphi-br@yahoogrupos.com.br
Data: Sexta-feira, 8 de Agosto de 2008, 11:39






bom dia

hoje a tarde tenho uma reunia com um cliente, e gostaria
da opiniao dos colegas, pois a empresa vai fechar um contrato comigo
para criarmos um sistema para gerenciar toda a empresa
(estoque, vendas, rh, financeiro e sabe -se la mais o que eles vao pedir)

qnt voces acham q eu devo cobrar?
e manutencao? como devo proceder?

ainda nao tinha feito um projeto tao grande como free lancer,
por isso nao sei qnt cobrar.

vlw galera.

-- 
Felipe Govoni
 -
Programador
Fone 8472-8718

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

 














  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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

[delphi-br] Relatorio com Colunas Dinamicas

[Andre Gustavo Meister]

Pessoal preciso de uma dica de como fazer um relatorio que preciso. 

Tenho uma Tabela da Seguinte forma

ID   DataFornecedorCidadeDoenca
101/01/08005   Canoinhas 001
202/01/08015   São Paulo 035
303/01/08005   Canoinhas 016
404/01/08015   São Paulo 023
505/01/08005   Canoinhas 016
...
..
.

Ai montei um View para me mostrar a quantidade de ocorrencia de Cada Doença em 
cada Cidade me trazendo uma tabela assim

DoencaCount(doenca) Cidade
001   1 Canoinhas
035   1 São Paulo
016   2 Canoinhas
023   1 São Paulo  

Até aqui beleza mas agora que está o meu problema, preciso tirar um relatorio 
da seguinte forma


Doenca/CidadeCanoinhasSão Paulo ...
001  10   ...
...
016  20   ...
...
023  01   ...
...
035  01   ...
...
..
.

Ou seja a primeira coluna preciso colocar as doenças que estão em uma outra 
tabela, numeradas de 01 a 40 atualmente, na 2ª coluna e subsequentes a 
quantidade de ocorrencias das doencas em uma Cidade (que será o cabeçalho da 
coluna).

Alguem já fez algo parecido? Alguem tem alguma ideia de por onde começar? 
Aceito qualquer dica! 

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

Re: [delphi-br] Autenticação do Usuário no Delphi

[Andre Farias]

Bom dia, pessoal

Será que ninguém tem um dica?

Valeu

André

2008/6/18 Andre Farias <[EMAIL PROTECTED]>:

> Boa tarde, Rubem
>
> Achei essa função LogonUserSSPI pesquisando no google.
> http://www.delphichm.com/html/Api/20070703/273.html
>
> Não entendi direito seu funcionamento, mas sei que está utilizando funções
> da DLL SECUR32.DLL.
> Chamei ela apenas para testar, afinal, no despero, vai que dá
> certo...hehehe
>
> Abraços
>
> André
>
>
>
> 2008/6/18 Rubem Nascimento da Rocha <[EMAIL PROTECTED]>:
>
>
>> Que função LogonUserSSPI() é essa? Nem na documentação da API do Windows
>> faz-se menção a ela!
>> Sds.
>>
>> 
>> > To: delphi-br@yahoogrupos.com.br
>> > From: [EMAIL PROTECTED]
>> > Date: Wed, 18 Jun 2008 13:18:24 -0300
>> > Subject: Re: [delphi-br] Autenticação do Usuário no Delphi
>> >
>> >
>> > Davi,
>> >
>> > Para efeitos de testes fiz uma aplicação contendo 2 componentes TEdits,
>> uma
>> > para o usuário e outro para senha e 3 botões de autenticação.
>> >
>> > No Botão 1 coloquei o seguinte código:
>> >
>> > StringToWideChar(Self.edUserID.Text,NomUsu,Length(Self.edUserID.Text));
>> >
>> StringToWideChar(Self.edPassword.Text,SenUsu,Length(Self.edPassword.Text));
>> > hr:=ADsOpenObject('LDAP:///CN=' + 'Users' +
>> > ',DC= DOMINIO>',NomUsu,SenUsu,ADS_PROMPT_CREDENTIALS,IADs,obj);
>> >
>> > if Succeeded(hr) then
>> > ShowMessage(obj.Name+','+obj.ADsPath)
>> > else
>> > Showmessage(inttostr(hr));
>> >
>> > O retorno para usuário e senha válidos é sempre um valor negativo
>> > (-2147016672)
>> >
>> > No evento OnClick do Botão 2:
>> >
>> > if
>> > LogonUserSSPI(edUserID.Text,,edPassword.Text)=True
>>  > then
>> > showmessage('Conectou')
>> > else
>> > ShowMessage('Não conectou');
>> >
>> > Retorna 'Não Conectou' para usuário e senha válidos .
>> >
>> > No evento OnClick do Botão 3:
>> >
>> > if LogonUser(Pchar(edUserID.Text),
>> > Pchar('10.10.20.230'),
>> > Pchar(edPassword.Text),
>> > LOGON32_LOGON_NETWORK,
>> > LOGON32_PROVIDER_DEFAULT,
>> > handle)=TRue then
>> > showmessage('Conectou')
>> > else
>> > ShowMessage('Não conectou');
>> >
>> > Retorna 'Não Conectou' para usuário e senha válidos .
>> >
>> > Ainda estou na luta pra resolver esse problema.
>> > Tem alguma coisa errada na configuração das funções de autenticação?
>> > Qualquer ajuda é bem vinda.
>> >
>> > Grato
>> >
>> > André
>> >
>> > 2008/6/11 Davi Eduardo Borges Wall <[EMAIL PROTECTED]>:
>> >
>> >> Defina "NADA FUNCIONA", qual erro?
>> >>
>> >>
>> >>
>> >> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
>> Em
>> >> nome de Andre Farias
>> >> Enviada em: quarta-feira, 11 de junho de 2008 13:51
>> >> Para: delphi-br@yahoogrupos.com.br
>> >> Assunto: Re: [delphi-br] Autenticação do Usuário no Delphi
>> >>
>> >>
>> >>
>> >> ninguém sabe?
>> >>
>> >> 2008/6/11 algf103 <[EMAIL PROTECTED] 
>> >> <mailto:agfarias%40gmail.com
>> >
>> >>>:
>> >>
>> >>>
>> >>> E ai Pessoal,
>> >>>
>> >>> Estou desenvolvendo uma aplicação Delphi que precisa autenticar o
>> >>> usuário cada vez que roda o programa, mas não estou conseguindo.
>> >>>
>> >>> Já chamei a função LogonUser, ADsOpenObject e LogonUserSSPI e nada
>> >>> funciona.
>> >>>
>> >>> LogonUser(Pchar(edUserID.Text),Pchar(edEnderIP.Text),
>> >>> Pchar(edPassword.Text),
>> >>> LOGON32_LOGON_INTERACTIVE,
>> >>> LOGON32_PROVIDER_DEFAULT,
>> >>> handle);
>> >>>
>> >>> hr:=ADsOpenObject('LDAP:///CN=' + 'Users'
>> >>> + ',DC=', NomUsu, SenUsu,
>> >>> ADS_PROMPT_CREDENTIALS, IADs, obj);
>> >>>
>> >>> O sistema operacional do servidor é windows 2003 server e a
>> >>> aplicação cliente roda no windows xp professional.
>> >>>
>> >>> Que pode estar acontecendo? Teria alguma maneira de chamar o prompt
>> >>> do Windows Authentication para fazer essa autenticação?
>> >>>
>> >>> Qualquer ajuda é bem-vinda.
>> >>>
>> >>> Obrigado
>> >>>
>> >>> André
>> >>>
>> >>>
>> >>>
>> >>
>> >> [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>>>>>
>> >>
>> >>
>> >>
>> >>
>> >
>> > [As partes desta mensagem que não continham texto foram removidas]
>> >
>> >
>> >
>>
>> _
>> Confira vídeos com notícias do NY Times, gols direto do Lance,
>> videocassetadas e muito mais no MSN Video!
>> http://video.msn.com/?mkt=pt-br
>> 
>>
>> --
>>  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>>
>>
>>
>>
>


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

Re: [delphi-br] Autenticação do Usuário no Delphi

[Andre Farias]

Boa tarde, Rubem

Achei essa função LogonUserSSPI pesquisando no google.
http://www.delphichm.com/html/Api/20070703/273.html

Não entendi direito seu funcionamento, mas sei que está utilizando funções
da DLL SECUR32.DLL.
Chamei ela apenas para testar, afinal, no despero, vai que dá certo...hehehe

Abraços

André



2008/6/18 Rubem Nascimento da Rocha <[EMAIL PROTECTED]>:

>
> Que função LogonUserSSPI() é essa? Nem na documentação da API do Windows
> faz-se menção a ela!
> Sds.
>
> 
> > To: delphi-br@yahoogrupos.com.br
> > From: [EMAIL PROTECTED]
> > Date: Wed, 18 Jun 2008 13:18:24 -0300
> > Subject: Re: [delphi-br] Autenticação do Usuário no Delphi
> >
> >
> > Davi,
> >
> > Para efeitos de testes fiz uma aplicação contendo 2 componentes TEdits,
> uma
> > para o usuário e outro para senha e 3 botões de autenticação.
> >
> > No Botão 1 coloquei o seguinte código:
> >
> > StringToWideChar(Self.edUserID.Text,NomUsu,Length(Self.edUserID.Text));
> >
> StringToWideChar(Self.edPassword.Text,SenUsu,Length(Self.edPassword.Text));
> > hr:=ADsOpenObject('LDAP:///CN=' + 'Users' +
> > ',DC= DOMINIO>',NomUsu,SenUsu,ADS_PROMPT_CREDENTIALS,IADs,obj);
> >
> > if Succeeded(hr) then
> > ShowMessage(obj.Name+','+obj.ADsPath)
> > else
> > Showmessage(inttostr(hr));
> >
> > O retorno para usuário e senha válidos é sempre um valor negativo
> > (-2147016672)
> >
> > No evento OnClick do Botão 2:
> >
> > if
> > LogonUserSSPI(edUserID.Text,,edPassword.Text)=True
>  > then
> > showmessage('Conectou')
> > else
> > ShowMessage('Não conectou');
> >
> > Retorna 'Não Conectou' para usuário e senha válidos .
> >
> > No evento OnClick do Botão 3:
> >
> > if LogonUser(Pchar(edUserID.Text),
> > Pchar('10.10.20.230'),
> > Pchar(edPassword.Text),
> > LOGON32_LOGON_NETWORK,
> > LOGON32_PROVIDER_DEFAULT,
> > handle)=TRue then
> > showmessage('Conectou')
> > else
> > ShowMessage('Não conectou');
> >
> > Retorna 'Não Conectou' para usuário e senha válidos .
> >
> > Ainda estou na luta pra resolver esse problema.
> > Tem alguma coisa errada na configuração das funções de autenticação?
> > Qualquer ajuda é bem vinda.
> >
> > Grato
> >
> > André
> >
> > 2008/6/11 Davi Eduardo Borges Wall <[EMAIL PROTECTED]>:
> >
> >> Defina "NADA FUNCIONA", qual erro?
> >>
> >>
> >>
> >> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> Em
> >> nome de Andre Farias
> >> Enviada em: quarta-feira, 11 de junho de 2008 13:51
> >> Para: delphi-br@yahoogrupos.com.br
> >> Assunto: Re: [delphi-br] Autenticação do Usuário no Delphi
> >>
> >>
> >>
> >> ninguém sabe?
> >>
> >> 2008/6/11 algf103 <[EMAIL PROTECTED] 
> >> <mailto:agfarias%40gmail.com
> >
> >>>:
> >>
> >>>
> >>> E ai Pessoal,
> >>>
> >>> Estou desenvolvendo uma aplicação Delphi que precisa autenticar o
> >>> usuário cada vez que roda o programa, mas não estou conseguindo.
> >>>
> >>> Já chamei a função LogonUser, ADsOpenObject e LogonUserSSPI e nada
> >>> funciona.
> >>>
> >>> LogonUser(Pchar(edUserID.Text),Pchar(edEnderIP.Text),
> >>> Pchar(edPassword.Text),
> >>> LOGON32_LOGON_INTERACTIVE,
> >>> LOGON32_PROVIDER_DEFAULT,
> >>> handle);
> >>>
> >>> hr:=ADsOpenObject('LDAP:///CN=' + 'Users'
> >>> + ',DC=', NomUsu, SenUsu,
> >>> ADS_PROMPT_CREDENTIALS, IADs, obj);
> >>>
> >>> O sistema operacional do servidor é windows 2003 server e a
> >>> aplicação cliente roda no windows xp professional.
> >>>
> >>> Que pode estar acontecendo? Teria alguma maneira de chamar o prompt
> >>> do Windows Authentication para fazer essa autenticação?
> >>>
> >>> Qualquer ajuda é bem-vinda.
> >>>
> >>> Obrigado
> >>>
> >>> André
> >>>
> >>>
> >>>
> >>
> >> [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>>>>>
> >>
> >>
> >>
> >>
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> _
> Confira vídeos com notícias do NY Times, gols direto do Lance,
> videocassetadas e muito mais no MSN Video!
> http://video.msn.com/?mkt=pt-br
> 
>
> --
>  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>


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

Re: [delphi-br] Autenticação do Usuário no Delphi

[Andre Farias]

Davi,

Para efeitos de testes fiz uma aplicação contendo 2 componentes TEdits, uma
para o usuário e outro para senha e 3 botões de autenticação.

No Botão 1 coloquei o seguinte código:

 StringToWideChar(Self.edUserID.Text,NomUsu,Length(Self.edUserID.Text));
 StringToWideChar(Self.edPassword.Text,SenUsu,Length(Self.edPassword.Text));
  hr:=ADsOpenObject('LDAP:///CN=' + 'Users' +
',DC=',NomUsu,SenUsu,ADS_PROMPT_CREDENTIALS,IADs,obj);

  if Succeeded(hr) then
 ShowMessage(obj.Name+','+obj.ADsPath)
  else
 Showmessage(inttostr(hr));

O retorno para usuário e senha válidos é sempre um valor negativo
(-2147016672)


No evento OnClick do Botão 2:

  if
LogonUserSSPI(edUserID.Text,,edPassword.Text)=True
then
showmessage('Conectou')
  else
ShowMessage('Não conectou');

Retorna 'Não Conectou' para usuário e senha válidos .


 No evento OnClick do Botão 3:

  if LogonUser(Pchar(edUserID.Text),
   Pchar('10.10.20.230'),
   Pchar(edPassword.Text),
   LOGON32_LOGON_NETWORK,
   LOGON32_PROVIDER_DEFAULT,
   handle)=TRue then
showmessage('Conectou')
  else
ShowMessage('Não conectou');

Retorna 'Não Conectou' para usuário e senha válidos .

Ainda estou na luta pra resolver esse problema.
Tem alguma coisa errada na configuração das funções de autenticação?
Qualquer ajuda é bem vinda.

Grato

André
















2008/6/11 Davi Eduardo Borges Wall <[EMAIL PROTECTED]>:

> Defina "NADA FUNCIONA", qual erro?
>
>
>
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
> nome de Andre Farias
> Enviada em: quarta-feira, 11 de junho de 2008 13:51
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Autenticação do Usuário no Delphi
>
>
>
> ninguém sabe?
>
> 2008/6/11 algf103 <[EMAIL PROTECTED] 
> <mailto:agfarias%40gmail.com>
> >:
>
> >
> > E ai Pessoal,
> >
> > Estou desenvolvendo uma aplicação Delphi que precisa autenticar o
> > usuário cada vez que roda o programa, mas não estou conseguindo.
> >
> > Já chamei a função LogonUser, ADsOpenObject e LogonUserSSPI e nada
> > funciona.
> >
> > LogonUser(Pchar(edUserID.Text),Pchar(edEnderIP.Text),
> > Pchar(edPassword.Text),
> > LOGON32_LOGON_INTERACTIVE,
> > LOGON32_PROVIDER_DEFAULT,
> > handle);
> >
> > hr:=ADsOpenObject('LDAP:///CN=' + 'Users'
> > + ',DC=', NomUsu, SenUsu,
> > ADS_PROMPT_CREDENTIALS, IADs, obj);
> >
> > O sistema operacional do servidor é windows 2003 server e a
> > aplicação cliente roda no windows xp professional.
> >
> > Que pode estar acontecendo? Teria alguma maneira de chamar o prompt
> > do Windows Authentication para fazer essa autenticação?
> >
> > Qualquer ajuda é bem-vinda.
> >
> > Obrigado
> >
> > André
> >
> >
> >
>
> [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 >>>>>
>
>
>
>


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

Re: [delphi-br] Autenticação do Usuário no Delphi

[Andre Farias]

ninguém sabe?

2008/6/11 algf103 <[EMAIL PROTECTED]>:

>
> E ai Pessoal,
>
> Estou desenvolvendo uma aplicação Delphi que precisa autenticar o
> usuário cada vez que roda o programa, mas não estou conseguindo.
>
> Já chamei a função LogonUser, ADsOpenObject e LogonUserSSPI e nada
> funciona.
>
> LogonUser(Pchar(edUserID.Text),Pchar(edEnderIP.Text),
> Pchar(edPassword.Text),
> LOGON32_LOGON_INTERACTIVE,
> LOGON32_PROVIDER_DEFAULT,
> handle);
>
> hr:=ADsOpenObject('LDAP:///CN=' + 'Users'
> + ',DC=', NomUsu, SenUsu,
> ADS_PROMPT_CREDENTIALS, IADs, obj);
>
> O sistema operacional do servidor é windows 2003 server e a
> aplicação cliente roda no windows xp professional.
>
> Que pode estar acontecendo? Teria alguma maneira de chamar o prompt
> do Windows Authentication para fazer essa autenticação?
>
> Qualquer ajuda é bem-vinda.
>
> Obrigado
>
> André
>
> 
>


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

[delphi-br] sistema jogo memoria

[Fabio andre Tamanho]

boa noite amigos, estou precisando para um trabalho de faculdade um
sistema em delphi de um jogo de memoria, alguem sabe de um modelo de
fonte ou exemplo, comecei a fazer um mas empaquei na hora de clicar na
segunda imagem e fazer elas ficarem abertas se clicadas o par
corretamente, obrigado

[delphi-br] sistema

[Fabio andre Tamanho]

boa noite amigos, estou precisando para um trabalho de faculdade um
sistema em delphi de um jogo de memoria, alguem sabe de um modelo de
fonte ou exemplo, comecei a fazer um mas empaquei na hora de clicar na
segunda imagem e fazer elas ficarem abertas se clicadas o par
corretamente, obrigado

Re:[delphi-br] Envio de mensagem para Nextel

[Andre]

Primeiro obrigado pela bizú. Segundo realmente não posso optar pelo J2ME (até 
gostaria) mas o sistema esta rodando e o cliente solicitou essa customização...
  Mas tirando casquinha da sua ideia, eu poderia enviar um e-mail para um 
servidor e o ser reencaminhado para um celular? 
  Só para colocar o sistema é em Delphi 7 com Firebird 1.5 em 3 camadas.
   
  Quanto a compartilhar ideias, é claro que sim, afinal tenho tanto interesse 
quanto você.
   
   
  André Ferreira
   
  

"Walter Chagas (BOL)" <[EMAIL PROTECTED]> escreveu:
  Em Delphi você não vai conseguir isto. A não ser que o SO do Celular 
seja o windows Mobile e você use o Delphi 2006. Fora disto, necas.

Eu aqui to dando umas fuçadas no J2ME com o Eclipse para criar aplicações para 
celulares pois em breve vamos começar um projeto aqui aonde o técnico na rua 
conecta no nosso servidor, baixa os chamados e vai nas casas do povo lá 
concertar o telefone deles. Feito o reparo, ele, do celular mesmo, baixa o 
serviço e informa se utilizou ou não fio e a quantidade. Tudo via conexão GPRS. 
Aproveitei que fiz um curso de Java em Janeiro e optei por ele por este e pelo 
fato também de que celulares ainda não tem um Sistema Operacional padrão de 
mercado. Cada Celular tem um SO diferente. Então o óbvio né, faça-o numa 
ferramenta multiplataforma.

Outra coisa. Você tem que saber qual é o modelo do aparelho do supervisor para 
obter seus respectívos SDKs. Isso daí é batata. Não tem como sair fora. No site 
do fabricante tem.

Se quiser podemos ir trocando ideias pois eu to começando nessa barca e to 
ainda bem cru no négócio.

Se for optar pelo J2ME mesmo, um bom forum é o www.guj.com.br

[]s



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

-- Início da mensagem original ---

De: delphi-br@yahoogrupos.com.br
Para: delphi-br@yahoogrupos.com.br
Cc: 
Data: Fri, 25 Apr 2008 19:22:42 -
Assunto: [delphi-br] Envio de mensagem para Nextel

> Pessoal boa tarde!
> 
> Tenho um cliente que esta solicitando que uma ordem de serviço assim 
> que estiver diponível para o cliente, a mesma fosse avisada para um 
> supervisor para o nextel dele. Alguém já passou por esse processo para 
> me dar os caminhos das pedras?
> 
> Grato,
> 
> André FErreira
> 
> 



   

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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

Res: [delphi-br] URGENTE - Como retornar Campos Prim ário do DataSet

[Andre Luis Silveria]

O que vc pode fazer é o seguinte:
RCampo : TRecord
Campo : String;

procedure chamarLog(DS : Dataset);
var Tabela : TTable;
Campo : Array of RCampo;
begin
  if (DS.State in [dsInsert, dsEdit)  then
  begin
for i := 0 to Ds.FieldsCount - 1 do
begin
if pfInKey in DS.Fields[i].ProviderFlags then
begin
SetLength(Campo, Length(Campo)+1);
 Campo[Length(Campo)-1].Campo := DS.Fields[0] .FieldName; //retornar o 
campo chave
 end;
end;   
   Tabela :=  (DS as TTable).TableName) ; //retornar o nome da tabela
 end;
end;


- Mensagem original 
De: Jorge Ericsson <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 10 de Abril de 2008 19:06:39
Assunto: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet

Olá amigos Delphianos,

Preciso enviar para minha tela de pesquisa os campos chaves e o nome da
tabela de Datasource.

Tentei o seguinte:

procedure chamarLog(DS : Dataset);
var Tabela : TTable;
 Campo: String;
begin
  if (DS.State in [dsInsert, dsEdit)  then
  begin
   Campo := DS.Fields[0] .FieldName; //retornar o campo chave
   Tabela :=  (DS as TTable).TableName) ; //retornar o nome da tabela
 end;
end;

Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em
qq posição da tabela.

Alguém poderia ajudar-me nesse problema ?

Agradeço,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsso n.com.br
61 9227.4785 / 3967.6172
Brasília - DF

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















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

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

Res: [delphi-br] <<< Nível Master vai encara r? >>>

[Andre Luis Silveria]

Não precisa de nada disso, basta colocar no CanResizeForm, 
CanResizeForm:
Resize := False;

Pronto sem gambiarras, nem implementações mirabolantes





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

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

Res: [delphi-br] <<< ClientDataSet BMP x JPG >>>

[Andre Luis Silveria]

Para trabalhar com Jpg no Delphi, vc deve declarar a unit JPEG no uses da unit.
Procure sobre essa unit no help do Delphi que vc vai achar muito informaçao 
útil.




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

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

Res: [delphi-br] <<< Nível Master vai encara r? >>>

[Andre Luis Silveria]

Já tentou colocar no OnCanResize do formulário:
Resize := False;

Se isso for somente para os Masters, não sei qual pergunta seria para o nivel 
NewBie ...
Mas já me contento em ser Master.



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

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

Res: [delphi-br] Acessar web service via Delphi - wsdl

[Andre Luis Silveria]

http://web.telia.com/~u54524181/soap.htm
tutorial básico de como criar e consumir um webservice em delphi.

Recomendo dar uma olhada nos sites:
www.imaster.com.br;
www.clubedelhi.net;
www.activedelphi.com.br;
Santo Google;

Pois esta é uma questão básica para quer consumir um webservice.



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

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

Res: [delphi-br] dois programadore no mesmo projeto

[Andre Luis Silveria]

tanto o cvs como o subversion  são gratuitos.
Pode baixa-los e usar a vontade, outra forma seria usar um repositório como o 
GoogleCode, SourceForge, para guardar os fontes, assim qualquer um que faça 
parte do projeto pode baixar o fonte de qualquer lugar do mundo, sem a 
necessidade de se manter um servidor na empresa para esse fim.



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

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

Res: [delphi-br] dois programadore no mesmo projeto

[Andre Luis Silveria]

use um controlador de versão (cvs, subversion).



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

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

Res: [delphi-br] TSQLQuery

[Andre Luis Silveria]

query.fetch;
query.RecordCount;

Dependendo da quantidade de registros vai demorar um pouco o fetch.

- Mensagem original 
De: dhsb <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 3 de Abril de 2008 14:49:00
Assunto: [delphi-br] TSQLQuery

Pessoal como faco para fazer uma simples consulta de quantos 
registros 
retornou de um SQL

Uso delphi 7 e TSQLQuery.

Ja tentei com o data set com a query mas sempre retorna 1

Olha o que estou fazendo.

Qry.RecordCount

Valeu















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

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

Res: [delphi-br] Ajuda em select

[Andre Luis Silveria]

select cliente.nome from cliente
where cliente.dt_nascimen to in (select cliente.dt_nascimen to
from cliente
group by cliente.dt_nascimen to
having count(cliente. id_cliente) > 1
order by count(cliente. id_cliente) )





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

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

Res: [delphi-br] Como saber se existe um atalho no desktop, caso nao exista criar um?

[Andre Luis Silveria]

Acho que vc que não leu a mensagem até o final, lá ele fala como saber se o 
atalho já existe usando o registro.



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

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

Re: [delphi-br] Componente de pop-up parecido com o MSN

[Andre Gustavo Meister]

JVCL tem o componente JvDesktopAlert que é bem semelhante ao alerta do MSN
é freeware



From: Consultores Software 
Sent: Tuesday, March 25, 2008 1:41 PM
To: delphi-br@yahoogrupos.com.br 
Subject: [delphi-br] Componente de pop-up parecido com o MSN


Boa tarde pessoal !

Alguém conhece algum componente free p/ delphi, que faz um pop-up de uma
mensagem, no mesmo estilo daqueles avisos do msn ao entrar um contato ?

Obrigado

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



 

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

Res: [delphi-br] Assinatura revista DevMedia, cobrando para ver video aulas????? Para o Rubem Rocha.

[Andre Luis Silveria]

arrumaram o problema de cobrar de assinantes, acabei de acessar:
http://www.devmedia.com.br/articles/viewcomp.asp?comp=8159
que se refera a 8ª aula de bpl e para assinantes é de graça...

Só na reclamação mesmo.
 




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

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

Res: [delphi-br] Assinatura revista DevMedia, cobrando para ver video aulas?????

[Andre Luis Silveria]

as video aulas de BPL estão em:

www.vytryny.com.br, são as aulas do autor da palestra na Borcon do ano passado.

Acho que vale a pena conferir.




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

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

Res: [delphi-br] Qual componente de relatório melh or com IBX?

[Andre Luis Silveria]

O que melhor trabalha será o que vc se identificar mais fácil.
Todos dão suporte a todos os componentes TDataset e seus descendentes.
Na internet tem tutorial a rodo uma simples busca no  Google e seus problemas 
se acabaram.



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

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

Res: RES: [delphi-br] Impressão de Nota com Fast Repor

[Andre Luis Silveria]

Vou te passar um exemplo quando chegar em casa 
ok...

- Mensagem original 
De: Tiago <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 6 de Março de 2008 16:34:20
Assunto: RES: [delphi-br] Impressão de Nota com FastRepor

  Olá,

>vc tem dois datasets ? um para serviço e outro para produtos ?

Não, uso o mesmo dataset, mas posso tranquilamente separar em 2 datasets.

Mas como eu faria para sair do laça de impressão dos produtos? Existe algum
comando do fastreposr que faça isso ?

Obrigado,

Tiago F. Zacchi.

De: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] Em
nome de Andre Luis Silveria
Enviada em: quinta-feira, 6 de março de 2008 16:23
Para: [EMAIL PROTECTED] os.com.br
Assunto: Res: [delphi-br] Impressão de Nota com FastRepor

vc tem dois datasets ? um para serviço e outro para produtos ?
se sim, basta sair do laço de impressão dos produtos e ir para o laço dos
serviços.
depois do new page volta para o os produtos e continua

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

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

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



  











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

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

Res: [delphi-br] Impressão de Nota com FastRepor

[Andre Luis Silveria]

vc tem dois datasets ? um para serviço e outro para produtos ?
se sim, basta sair do laço de impressão dos produtos e ir para o laço dos 
serviços.
depois do new page volta para o os produtos e continua





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

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

Res: [delphi-br] Componente RSPrint

[Andre Luis Silveria]

http://www.alberteije.com/cursodelphini.php
olha aqui que tem uma video aula usando este componente.



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

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

Re: [delphi-br] [COMBOBOX]

[Andre Gustavo Meister]

Cara faz assim
 no onEnter do combobox, um 'for' adicionando os funcionarios, e no onExit 
manda localizar o codigo do funcionario e insere no edit.

  - Original Message - 
  From: Rubem Nascimento da Rocha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, March 04, 2008 3:45 PM
  Subject: RE: [delphi-br] [COMBOBOX]



  Tb acho! Pra quê ficar reinventando a roda?
  Sds.

  

  To: delphi-br@yahoogrupos.com.br
  From: [EMAIL PROTECTED]
  Date: Tue, 4 Mar 2008 09:34:55 -0300
  Subject: Re: [delphi-br] [COMBOBOX]

  LookupComboBox, não serve  

  Vinicius dos Santos
  Analista de Desenvolvimento Júnior
  MSI SOLUÇÕES
  Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil
  Fone/Fax: +55 (14) 3324-8181 www.msisolucoes.com.br

  - Original Message -
  From: Marcio
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, March 04, 2008 8:35 AM
  Subject: [delphi-br] [COMBOBOX]

  Olá a todos ...

  Pessoal como faco para que um combobox mostre um valor e result outro ??

  Por exemplo..
  vou carregar o combobox atravez de um Sql. (codigo,NomeFuncionario).
  O combobox devera mostrar o Nome do Funcionario, ao clickar o combobox
  um edit recebera o codigo do funcionario...

  É possivel fazer essa amarracao ???
  O combobox aceita um value e uma descricao ???

  Desculpem minha pergunta primaria ..

  Marcio.

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

  __
  Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger!
  http://www.amigosdomessenger.com.br/

   

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

Res: Res: [delphi-br] OFF-TOPIC / SQL Firebird 2.0 - Stored Procedures

[Andre Luis Silveria]

vc tem que ter uma variavel para armazenar a contagem:
testa aé e retorna o erro que aparecer.

SET TERM ^ ; 
CREATE PROCEDURE SP_ALTERA_ESTOQUE( 
CODLOJA INTEGER, 
CODPRODUTO INTEGER, 
QUANTIDADE INTEGER) 
AS 
DECLARE VARIABLE CONTA INTEGER;
BEGIN 
Select Count(*) 
From PRODUTOSESTOQUELOJA S 
   WHERE((PRODUTOSESTOQUELO JAS.CODLOJA = :CODLOJA AND 
  (PRODUTOSESTOQUELOJAS.CODPRODUTO = :CODPRODUTO)
into :conta;

IF (:conta > 0) THEN 
BEGIN 
UPDATE PRODUTOSESTOQUELOJA S SET PRODUTOSESTOQUELOJA S.ESTOQUE = 
PRODUTOSESTOQUELOJA S.ESTOQUE + :QUANTIDADE 
END 
ELSE 
BEGIN 
INSERT INTO PRODUTOSESTOQUELOJA S (ESTOQUE) VALUES (QUANTIDADE) 
END 
END; 
SET TERM ; ^ 

- Mensagem original 
De: Edson Cabral <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 5 de Março de 2008 17:03:47
Assunto: Res: [delphi-br] OFF-TOPIC / SQL Firebird 2.0 - Stored Procedures

  Quanto ao uso do componente para executar a Stored Procedure 
eu sei. 

A questão é que a Stored Procedure abaixo não é criada, pois dá um erro 
(possivelmente de sintaxe). 
Eu quero saber se alguém descobre que erro é esse, ou se de repente eu estou 
fazendo algo errado no corpo da stored procedure para causar o erro.

O erro do IBExpert informa a linha em que está o IF e não compila a stored 
procedure no banco. Entendeu? A SP nem sequer chega a ser criada.

Edson

- Mensagem original 
De: Ricardo César Cardoso 
Para: [EMAIL PROTECTED] os.com.br
Enviadas: Terça-feira, 4 de Março de 2008 12:14:43
Assunto: Re: [delphi-br] OFF-TOPIC / SQL Firebird 2.0 - Stored Procedures

Bem... não sei se entendi sua pergunta, mas se vc quer fazer isso no Delphi, 
pode fazer usando o TSQLConnection (DBExpress) passando esta stored procedure. 
Cada parâmetro é acessado por um "array" Params e o índice de cada parâmetro. O 
primeiro parâmetro tem o índice 0 no "array" de parâmetros e assim por diante. 
Para criar a procedure, vc usa o método "Execute".

Acho que é isso. Se não for, detalhe melhor o problema.

Atte,
Ricardo.

Edson Cabral <[EMAIL PROTECTED] com.br> escreveu: Perdoem o off-topic, é que 
estou com certa urgência.
Quem trabalha com Stored Procedures poderá tirar essa dúvida.
 

Olá pessoal. 

Estou com uma dúvida em relação a criação de Stored Procedures no Firebird 2.0. 
Sempre que precisei usar SPs, as criei a partir do IBExpert. 
Só que agora preciso de uma stored procedure que tenho que criar na unha e 
estou meio perdido... 

Trata-se de uma stored procedure para atualizar o Estoque (campo ESTOQUE) da 
tabela PRODUTOSESTOQUELOJA S. 
Preciso passar três parâmetros: CodLoja e CodProduto, e mais a Quantidade que 
desejo incrementar o estoque. 

A SP deve verificar se o produto já existe cadastrado a partir dos parâmetros 
de entrada CodProduto e CodLoja (se achar algum registro com os campos CodLoja 
e CodProduto que confiram com os parâmetros). 
Caso exista, deve-se dar um UPDATE na tabela para atualizar o estoque somando-o 
a variável QUANTIDADE (mais um parâmetro de entrada). 

Caso não exista ainda cadastrado, deve-se dar um INSERT na tabela cadastrando o 
produto com a quantidade em estoque que passei como parâmetro QUANTIDADE. 
O código que tenho (e que não funciona, pois dá erro na criação da SP) é esse 
abaixo: 

Código: 

SET TERM ^ ; 
CREATE PROCEDURE SP_ALTERA_ESTOQUE( 
CODLOJA INTEGER, 
CODPRODUTO INTEGER, 
QUANTIDADE INTEGER) 
AS 
BEGIN 
IF (Select Count(*) From PRODUTOSESTOQUELOJA S WHERE ((PRODUTOSESTOQUELO 
JAS.CODLOJA = :CODLOJA) AND (PRODUTOSESTOQUELOJ AS.CODPRODUTO = :CODPRODUTO) > 
0) THEN 
BEGIN 
BEGIN TRANSACTION 
UPDATE PRODUTOSESTOQUELOJA S SET PRODUTOSESTOQUELOJA S.ESTOQUE = 
PRODUTOSESTOQUELOJA S.ESTOQUE + :QUANTIDADE 
COMMIT 
END 
ELSE 
BEGIN 
BEGIN TRANSACTION 
INSERT INTO PRODUTOSESTOQUELOJA S (ESTOQUE) VALUES (QUANTIDADE) 
COMMIT 
END 
END; 
SET TERM ; ^ 

Obrigado a todos. 
Edson 

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

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

 - - ---
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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

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

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



  











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

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

Res: [delphi-br] Ata de Resultados

[Andre Luis Silveria]

um group by no nome do aluno, e no fortes uma banda Group com os details não 
resolveria ?

- Mensagem original 
De: Ralp Alves Bezerra <[EMAIL PROTECTED]>
Para: Delphi BR 
Enviadas: Terça-feira, 4 de Março de 2008 18:29:32
Assunto: [delphi-br] Ata de Resultados

  Nobres Colegas,

Venho mais uma vez pedir a ajuda dos nobres colegas para poder resolver 
uma dúvida que me ocorre:

Tenho um sistema em paradox para administração escolar rodando, estou 
precisando gerar a ata de resultados finais para o mesmo, porém, estou 
com um problema que ainda não consegui resolver.
 
Tenho uma tabela onde ficam registradas todas as informações de notas e 
matérias do alunos.

Ex.:

Nome  Matéria   Nota
 - - ---
Maria da silva  Portugues10
Maria da Silva Matemática 08
Maria da Silva Inglês  09
Maria da Silva Física  08

e assim por diante com todos os alunos da turma. Se existirem 10 
matérias o nome do aluno se repete as mesmas 10 vezes.

Como faria para gerar uma segunda tabela ou outra maneira de poder gerar 
ata de resultados finais com o tipo de tabela que possuo?

Nesta sistema estou utilizando Delphi 7, Paradox e FortesReport, mas a 
dica poderia ser também em QR se caso fosse mais prático.

Desde já agradeço a ajuda.

Abraços.

Ralp Alves Bezerra


  











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

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

Res: [delphi-br] [COMBOBOX]

[Andre Luis Silveria]

Somente com os componentes da Jedi vc consegue de maneira transparente, o que 
vc pode fazer e colocar assim:

01 - AAA
02 - BBB
 ou seja o codigo espaço traço espaço nome
e depois dar um copy(Combobox.Text, 1, Pos(' -', Combobox.Text) -1)
Meio gambiarra mas que funciona, isso funciona.





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

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

Res: [delphi-br] Join com 3 tabelas

[Andre Luis Silveria]

select A.CODI_ALU, A. NOME_ALU, M.DATA_MEN, M.VENC_MEN, C.COBR_COB
from Aluno A
left outer join Mensalidade M on (M.CODI_ALU = A.CODI_ALU)
left outer join Cobranca C on (C.CODI_MEN = M.CODI_MEN)
where M.VENC_MEN <= '01/29/2008' and C.COBR_COB = 'S'

levei em conta que se tem cobrança o campo COBR_COB está com o valor 'S' 
(string)





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

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

Res: [delphi-br] ajuda para executar procedure no adostoredproc

[Andre Luis Silveria]

se vc estiver mandando abrir o clientdataset vai dar erro mesmo,
Usamos aqui procedures no Oracle e Firebird usando Query e nunca tivemos os 
problemas dos parâmetros, se puder passar o erro assim facilitaria a ajuda.



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

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

Res: [delphi-br] ajuda para executar procedure no adostoredproc

[Andre Luis Silveria]

se vc estiver mandando abrir o clientdataset vai dar erro mesmo,
Usamos aqui procedures no Oracle e Firebird usando Query e nunca tivemos os 
problemas dos parâmetros, se puder passar o erro assim facilitaria a ajuda.



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

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

Res: [delphi-br] ajuda para executar procedure no adostoredproc

[Andre Luis Silveria]

se vc estiver mandando abrir o clientdataset vai dar erro mesmo,
Usamos aqui procedures no Oracle e Firebird usando Query e nunca tivemos os 
problemas dos parâmetros, se puder passar o erro assim facilitaria a ajuda.



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

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

Res: [delphi-br] Conexão com o banco...

[Andre Luis Silveria]

Mas é pago, se for free, nada melhor que o ADO mesmo



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

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

Res: [delphi-br] Conexão com o banco...

[Andre Luis Silveria]

ADO com certeza, se for usar somente o Sql Server
Se não aí tem um monte, dbexpress, MDO, Zeos 



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

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

Res: [delphi-br] Como saber quanto tempo

[Andre Luis Silveria]

Me intrometendo:
Seu sistema não parece ser pequeno, e vc levou em conta somente forms, 
relatórios, até aí tudo bem.
Mas e as regras de negócio ? Quanto tempo vc vai levar com o cliente levantando 
requisitos, especificando requisitos, modelando a base ?
Isso para falar no básico, será que isso não conta ? ou vc vai fazer isso tudo 
de graça mesmo ? Só nesse processo te falo que vai mais de 50 horas. Quanto ao 
seu cálculo de horas, vc vai fazer em horário comercial ou fora dele, porque se 
eu ganho 18 por hora no horário comercial, nada mais justo que ganhar pelo 
menos 22,00 (18,00 + 50%) fora dele, afinal  vou estar sacrificando meu 
descanso ou  estudos para  trabalhar.



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

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

Res: [delphi-br] Consulta data

[Andre Luis Silveria]

 datamodule3. IBQuery_Ordem_ Servico.Close; 
datamodule3.
IBQuery_Ordem_ Servico.SQL. Clear; 
datamodule3. IBQuery_Ordem_
Servico.sql. add('select * from ORDEM_SERVICO where DATA between :mes1 and 
:mes2');

datamodule3. IBQuery_Ordem_ Servico.Params. ParamByName( 'mes1').AsDate:
=strtodate( edit1.Text) ; 
datamodule3. IBQuery_Ordem_ Servico.Params. ParamByName( 'mes2').AsDate:
=strtodate( edit2.Text) ; 
datamodule3. IBQuery_Ordem_ Servico.SQL.
Add('order by ID_ORDEM_SERVICO' ); 





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

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

Res: [delphi-br] Model Complexo no Grid

[Andre Luis Silveria]

usa um clientdataset temporário para mostrar os dados como vc quer
 traz os dados, faz um laço, e preenche o clientdataset temporário (que vai ser 
mostrado no grid ou no relatório).




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

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

Res: [delphi-br] Ajuda Delphi com Word

[Andre Luis Silveria]

Olha no site www.clubedelphi.net que tem uns artigos falando sobre isso.

- Mensagem original 
De: Vinicius Santos - MSI <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 22 de Fevereiro de 2008 15:14:59
Assunto: Re: [delphi-br] Ajuda Delphi com Word









  



Fala mermão, faça a mala direta usando Access normalmente, depois 
insere os dados na tabela do Access pelo Delphi !



Flw Flw



Vinicius dos Santos

Analista de Desenvolvimento Júnior

MSI SOLUÇÕES

Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil

Fone/Fax: +55 (14) 3324-8181  www.msisolucoes. com.br



- Original Message - 

  From: Raphae Fonseca 

  To: [EMAIL PROTECTED] os.com.br 

  Sent: Friday, February 22, 2008 3:06 PM

  Subject: [delphi-br] Ajuda Delphi com Word



Boa tarde amigos da Lista



Estou precisando fazer uma mala direta delphi X Word.



Inserir dados de uma determinada tabela num documento já formatado no word.



Algum amigo já desenvolveu algo parecido?



Poderia me ajudar



Raphael



Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!

  http://br.mail. yahoo.com/



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



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






  
























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

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

Res: [delphi-br] QuickReport

[Andre Luis Silveria]

ou se quiser um free e muito bom tb procure pelo VDOPrint.

- Mensagem original 
De: Gladson Reis <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 22 de Fevereiro de 2008 15:09:55
Assunto: Re: [delphi-br] QuickReport









  



use o RDPrint



- Original Message - 

From: "stainle2003" 

To: <[EMAIL PROTECTED] os.com.br>

Sent: Friday, February 22, 2008 2:37 PM

Subject: [delphi-br] QuickReport



estou tentando escrever em um Formulário da Nota Fiscal com Delphi 7 e

QuickReport, não estou conseguindo assimilar: meço em MM o quanto devo

deslocar o componente no Quick para que se encaixe no local correto,

porém percebi que devo multiplicar por 3 aproximadamente, ou seja se

tenho que deslocar 15 mm para a esquerda, no Left do DBText por exemplo

devo subtrair 45 mm e mesmo assim não fica bom, alguém poderia me

explicar porque não corresponde a unidade de medida(MM) que leio nas

propriedade do QuickReport com as que eu meço com a régua.

estou usando a fonte Draft10.

o que seria melhor para impressão de Nota Fiscal, o Quick ou o Fortes ??



grato



Stainle



-- 

< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >



Links do Yahoo! Grupos



__ Informação do NOD32 IMON 2896 (20080222) __



Esta mensagem foi verificada pelo NOD32 sistema antivírus

http://www.eset. com.br






  
























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

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

Res: [delphi-br] Atualizador automatico

[Andre Luis Silveria]

http://www.devmedia.com.br/articles/viewcomp.asp?comp=1024&hl=
ou 
http://www.devmedia.com.br/articles/viewcomp.asp?comp=6333&hl=
ou
http://www.devmedia.com.br/articles/viewcomp.asp?comp=4929&hl=

isso em uma pesquisa rápida, se tivesse tempo e precisando disso garanto que 
tinha achado tudo o que preciso, talvez até pronto.





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

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

Res: [delphi-br] ODBC

[Andre Luis Silveria]

Basta instalar o mdac na máquina.

Com ADO vc não precisa de ODBC, pois ele conecta facilmente em máquinas com 
access e sqlserver.

- Mensagem original 
De: r_iroman <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 19 de Fevereiro de 2008 19:09:06
Assunto: [delphi-br] ODBC









  



Gente, fiz uma conexão com o ADO em um banco do Access (.mdb), mas 

preciso utilizar o programa em uma maquina que não tem delphi e 

provavelmente nem Access, o que preciso fazer para que eu consiga rodar 

sem instalar nem o delphi e nem o access ??? Colocar DLL's na pasta ??



Alguem consegue me ajuda !



Desde ja agradeço






  
























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

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

Res: [delphi-br] Re: QuickReport Paradox

[Andre Luis Silveria]

vc pode usar um case para saber se o campo é correto ou de correção no sql.

select case when C.VALOR1_CORRETO = '' then P.VALOR1 else C.VALOR1_CORRETO 
from PORTE P
left outer join CORRECAO C on (C.ID_PORTE = P.ID_PORTE)
where suacondição

testa e vê se da certo

  André Luis da Silveira
Siagri Sistemas de Gestão





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

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

Res: [delphi-br] Regras para Ponto

[Andre Luis Silveria]

o que vc pode fazer e criar uma tabela com os horários que o funcionário entra, 
sai almoco, entra almoco e sai
assim vc já tem os intervalos que ele tem para bater os pontos...
lembrando que tem o limite de tolerância...

Se estiver fora do limite de tolerância então solicita a senha do supervisor , 
ou somente consegue bater o ponto no DP.

Qualquer coisa grita ae ...

- Mensagem original 
De: Rafael Jorge <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 15 de Fevereiro de 2008 15:21:30
Assunto: Re: [delphi-br] Regras para Ponto









  



vou controlar o ponto por soft tambem.. ai tenho que estabelecer 
essas

regras nele.

vai ter 3 tipos de coleta.. pelo txt gerado pelo maquinario do ponto ou pela

digital num leitor biometrico num pc direto em rede ou via soft pra pegar o

ponto do funcionario digitando seu codigo.

por isso queria saber das regras que o povo utiliza.

o que tu falou e valido. mas e a saida pro almoco? se eu descartar durante 8

horas nao vou saber quando ele saiu e voltou.

mas valeu. vou continuar procurando e fazer uma tela de parametrização para

isso.

t+



Em 15/02/08, Ricardo César Cardoso  escreveu:

>

>   Olha... na empresa onde trabalho ponto é registrado eletronicamente. A

> partir do momento em que é registrado a passagem do cartão, todas as

> passagens posteriores num período menor que 8 horas são registradas com um

> flag de repetição.

>

> Não sei como fica para o sistema, mas basicamente ele vai subtrair o tempo

> registrado da primeira passagem do tempo registrado da última passagem.

>

> Alguns leitores de cartão ficam travados após uma leitura com sucesso e só

> liberam depois de algum tempo (isso já fica programado em hardware) outros

> sistemas coletam toda e qualquer registro e deixam o trabalho de separar o

> joio do trigo ao encargo de um aplicativo.

>

> Atte,

> Ricardo.

>

> Rafael Jorge  > escreveu:

> sei que esse assunto ja foi muito debatido aqui mas como nao consequi achar

>

> as mensagens antigas vou pergunta.

> qual as regras para um sistema simples de ponto?

> exemplo.. quanto tempo nao posso permitir que um funcionario bata o ponto

> denovo? essas coisas.

> obrigado.

> t+

>

> --

>  - - - - - -

> Rafael jorge alves (Analista/desenvolv edor)

>

> www.sistemafocus. com.br

> sistema focus de gestão comercial e serviços em informatica.

>  - - - - - -

>

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

>

>

>

>

>

>  - - ---

> Abra sua conta no Yahoo! Mail, o único sem limite de espaço para

> armazenamento!

>

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

>

>  

>



-- 

 - - - - - -

Rafael jorge alves (Analista/desenvolv edor)



www.sistemafocus. com.br

sistema focus de gestão comercial e serviços em informatica.

 - - - - - -



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






  
























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

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

Res: [delphi-br] Leitura de arquivo texto

[Andre Luis Silveria]

O que vc pode fazer é a cada 50 registros por exemplo gravar o arquivo 
fisicamente no banco e continuar exportando.

Sempre que gravar os arquivos fisicamente feche e abra a tabela de novo, mas 
sem registros ...
- Mensagem original 
De: auriston.delphi <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 14 de Fevereiro de 2008 15:51:32
Assunto: [delphi-br] Leitura de arquivo texto









  



Quando efetuo uma leitura de um arquivo texto para gravar o banco 
de 

dados esta dando a mensagem OUT OF MEMORY, eu uso a rotina abaixo:

 AssignFile(Nomearqu ivo, OpenDialog1. FileName) ;

 Screen.Cursor := crSQLWait;

 ProgressBar1. Min := 0;

 ProgressBar1. Max := Tilinha;

 Reset(Nomearquivo) ;

 dm.qrytemp.DisableC ontrols;

 while not Eoln(Nomearquivo) do

begin

   Form1.Caption := Copy(Entrada, 1,126);

   inc(ilinha);

   Readln(Nomearquivo, Entrada);

   if Copy(Entrada, 1,2) <> '90' then

  Begin

 dm.qrytemp.Insert;

 dm.qrytemp.FieldByn ame('MAQUINA' ).Value  := 0;

 dm.qrytemp.FieldByN ame('linha' ).AsString := Copy

(Entrada,1,126) ;

 if Copy(Entrada, 1,2) = '50' then

Begin

   dm.qrytemp.FieldByn ame

('CNPJ').Asstring := Copy(Entrada, 3,14);

   dm.qrytemp.FieldByn ame

('NOTA').Asstring := Copy(Entrada, 46,6);

End;

 if Copy(Entrada, 1,2) = '53' then

Begin

   dm.qrytemp.FieldByn ame

('CNPJ').Asstring := Copy(Entrada, 3,14);

   dm.qrytemp.FieldByn ame

('NOTA').Asstring := Copy(Entrada, 46,6);

End;

 if Copy(Entrada, 1,2) = '54' then

Begin

   dm.qrytemp.FieldByn ame

('CNPJ').Asstring:= Copy(Entrada, 3,14);

   dm.qrytemp.FieldByn ame

('NOTA').Asstring:= Copy(Entrada, 22,6);

   dm.qrytemp.FieldByn ame

('produto'). Asstring := Copy(Entrada, 38,14);

   dm.qrytemp.FieldByN ame

('ITEM').AsString:= Copy(Entrada, 35,3);

End;

 if Copy(Entrada, 1,2) = '75' then

dm.qrytemp.FieldByN ame

('Produto'). AsString := Copy(Entrada, 19,14);

 dm.qrytemp.Post;

  End;

//   ProgressBar1. Position := iLinha;

End;

  dm.qrytemp.EnableCo ntrols;

Precsisode um ajuda para otimizar o codigo acima para que ele fique 

mais leve.

Uso D7 + IBX + FIREBIRD 1.5

sds

Auriston






  
























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

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

Res: [delphi-br] Ajuda com TRecord

[Andre Luis Silveria]

length(Pessoa.Nome);

- Mensagem original 
De: Celio Bernardo <[EMAIL PROTECTED]>
Para: delphi-br 
Enviadas: Quarta-feira, 13 de Fevereiro de 2008 8:14:42
Assunto: [delphi-br] Ajuda com TRecord









  



Amigos tenho uma estrutura como

   

  Type TPessoas = record

   

  Nome : String[60];

  cpf : String[11];

   

  end.

  ...

   

  var

 Pessoa : TPessoas;

   

   

  Como é a sintaxe pra pegar o tamanho do campo:

   Exemplo: Pessoa.Nome  o tamamho é 60.

   

  Obrigado

   

  Celio.

   



 - - ---

 Célio Bernardo de Lima

Diretor de Projetos e Novas Tecnologias

siatech.com. br 

 - - ---



 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 



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






  
























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

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

Res: [delphi-br] ComboBox com Item Invisivel

[Andre Luis Silveria]

Acho que deve ter um padrão para saber quais itens serão escondidos, certo ???

O que vc pode fazer e criar um StringList e carregar com todos os valores do 
Combo e os seus ItemIndexes;
Dependendo da condição vc refaz o combo colocando somente o que tem que 
aparecer;
Dependendo do que foi selecionado no combo, vc busca na stringlist o valor do 
seu itemindex para passar para a aplicação;

Seria uma "gambiarra das boas" para resolver o seu problema. Assim somente 
apareciam os itens que o usuários que ver e vc não perde os itemindexes deles.

Boa sorte,

  André Luis da Silveira
Siagri Sistemas de Gestão.





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

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

Res: Res: [delphi-br] Datas formato Americano POR ÉM

[Andre Luis Silveria]

   Edit1.Text := FormatDateTime('dd/mm/', StrToDate(Copy('20080202', 
7,2)+'/'+Copy('20080202', 5,2)+'/'+Copy('20080202', 1,4)));

- Mensagem original 
De: Celio Bernardo <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 11 de Fevereiro de 2008 12:35:44
Assunto: RE: Res: [delphi-br] Datas formato Americano PORÉM









  



Se o for como no exemplo: '20080122'  SEM barras (/). Não funcionou 
mostrando o seguinte erro:

   

   - --

Debugger Exception Notification

 - --

Project Project1.exe raised exception class EConvertError with message 
''20080321' is not a valid date'. Process stopped. Use Step or Run to continue.

 - --

OK   Help   

 - --

   

  Obrigado.

   

  Celio.



Rubem Nascimento da Rocha  escreveu:

  

Eu postei hj na lista uma função pra converter uma string no formato 'mmdd' 
em um valor TDateTime, sem precisar 'recortar' a string com a função Copy(). 
Vejam se ela funciona e postem suas impressões.



Sds.



 _ _ __



To: [EMAIL PROTECTED] os.com.br

From: [EMAIL PROTECTED] com.br

Date: Mon, 11 Feb 2008 11:18:51 -0300

Subject: Re: Res: [delphi-br] Datas formato Americano PORÉM



Explicando melhor... a string exemplo: '20080122' é sem barras (/) separadora.



obrigado.

Celio.



>Andre Luis Silveria <[EMAIL PROTECTED] com.br> escreveu:



>FormatDate( ' dd/mm/' , StrToDAte(Stringcom aData));



>Mais fácil que isso só sentando no pudim 



--- Em [EMAIL PROTECTED] os.com.br, Celio Bernardo

escreveu

>

> Amigos tenho uma data no formato 'MMDD' tipo '20080122'

> e quero transforma-la em 22/01/2008.

>

> PS: Parece ser muito simples, mas depois de horas trabalhando nao

consigo mais pensar.

>

> Agradeço ajuda.

>

> Celio.



 - - ---

Célio Bernardo de Lima

Diretor de Projetos e Novas Tecnologias

siatech.com. br

 - - ---



 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!



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



 _ _ _ _ _ _

Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas 
e muito mais no MSN Video!

http://video. msn.com/? mkt=pt-br



 - - ---

 Célio Bernardo de Lima

Diretor de Projetos e Novas Tecnologias

siatech.com. br 

 - - ---



 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 



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






  
























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

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

Res: [delphi-br] Datas formato Americano

[Andre Luis Silveria]

FormatDate('dd/mm/', StrToDAte(StringcomaData));

Mais fácil que isso só sentando no pudim 



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

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

Res: [delphi-br] Delphi - Report Builder - Componente

[Andre Luis Silveria]

Isso já existe chama-se ExtraDevs, com ele apararece na impressão as opçoes de 
gerar o relatório numa planilha do excel, word, texto e pdf.

- Mensagem original 
De: Felipe Nunes <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 8 de Fevereiro de 2008 7:27:25
Assunto: [delphi-br] Delphi - Report Builder - Componente









  



Olá pessoal,

   

  Queria saber se alguém ja trabalhou ou trabalhar com esse tecnologia..

   

  Eu estou querendo implementar nos relatórios que crio, a função que me 
permitir pegar o relatório que foi gerar e exportar para uma planilha de excel, 
ou ate mesmo em arquivo de texto do word ou coisa similar..

   

  Se puderem me ajudar ficarei grato



Felipe Nunes

   

 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 



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






  
























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

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

Res: [delphi-br] windows mobile - Urgente

[Andre Luis Silveria]

Grande Márcia,

Com o Delphi 2006 até que se consegue fazer alguma coisa para windows 
mobile utilizando o Compact Framework do DotNet.

Mas seria melhor levar em consideração algumas outras ferramentas como o 
CodeWarrior, o Visual Studio.

Atenciosamente,

   André Luis da Silveira
Siagri Sistemas de Gestão

- Mensagem original 
De: Marcia Cristina de Paula Vieira Borges dos Reis <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 6 de Fevereiro de 2008 6:33:54
Assunto: [delphi-br] windows mobile - Urgente









  



Bom Dia Pessoal,

   

  Gostaria de saber se alguem já desenvolveu alguma aplicação em Delphi para 

  windows mobile.

   

  Márcia Cristina.



 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 



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






  
























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

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

Res: [delphi-br] DbExpress SqlQuery...

[Andre Luis Silveria]

Corrigindo nosso caro amigo Adriano Santos, o firebird permite sim subselects 
em selects, ao contrário do que ele disse, uso em meus sistemas sem problemas.

Agora se puder passar o problema que ocorre já facilitaria a ajuda.

  André Luis da Silveira
Siagri Sistemas de Gestão





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

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

Res: [delphi-br] AutoCad no delphi

[Andre Luis Silveria]

Pesquisa rápida no Google:
autocad+delphi

http://baixaki.ig.com.br/categorias.asp?cat=89&order=nome

http://www.freedownloadscenter.com/Best/delphi-cad-free.html

http://www.cadsofttools.com/en/products/cad_import_vcl.html

entre outros que não olhei.

como já dizia o velho ditado muito citado por aqui:

"Quem procura acha !!"

- Mensagem original 
De: Consultores Software <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 1 de Fevereiro de 2008 12:43:09
Assunto: [delphi-br] AutoCad no delphi









  



Boa tarde pessoal !



Alguem conhece um componente / plugin / rotina para visualizar arquivos do

AutoCad no delphi ?



Obrigado, desde já



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






  
























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

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

[delphi-br] URGENCIA - PROBLEMA EXTRANHO NO DELPHI 7

[Andre Nunes]

Bom, 
 
primeiramente peço desculpa pelo erro grosseiro no português "extranho",
fala serio digo ESTRANHO.
 
Sobre o erro: meu usuário faz varias alterações e imprimi no report builder
para visualizar as alterações. por se tratar de um cadastro grande ele faz
varias vezes. e de repente o  programa "ABORTA" é não da erro de nada.
 
Nota: já verifiquei o codigo e onde poderia destruir os objetos que poderia
consumir memoria eu fiz.
 
 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Darkzad
Enviada em: quinta-feira, 24 de janeiro de 2008 09:42
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] URGENCIA - PROBLEMA EXTRANHO NO DELPHI 7



Acho que vc esqueceu de falar o Problema.
;D

Marcelo

- Original Message - 
From: Andre Nunes 
To: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br 
Sent: Thursday, January 24, 2008 10:37 AM
Subject: [delphi-br] URGENCIA - PROBLEMA EXTRANHO NO DELPHI 7

Bom dia,

Trabalhamos aki na empresa comDelphi 7, temos 2 ambientes de
desenvolvimento e produção, a 15 dias que começou a apresentar alguns
problemas extranhos, como por exemplo:

tenho um processo onde o usuario tem incluir algumas informações e
depois ele visualiza na tela com report builder até ai sem problema, como o
documento é grande ele faz "N" alterações. ai é começa o problema sai do
programa sem dar qualquer mensagem de erro.

Obs: Já verifiquei a destruição dos objetos quando são criados.

Andre nunes
Manaus-AM
"Tudo posso naquele que me fortalece"

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

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



 !DSPAM:47989552108951235816653! 


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

RES: [delphi-br] Pegar Ano ORacle

[Andre Nunes]

 
 
select to_char(sysdate,'') from dual

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Sérgio
Enviada em: quinta-feira, 24 de janeiro de 2008 08:07
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pegar Ano ORacle



To_Char(Sysdate,'')

On Thu, 24 Jan 2008 09:47:44 -0300, Felipe Nunes wrote
> Ola pessoal, estou precisando concatenar uma string,
> eu preciso saber como faço pra pegar o ano no oracle.
> 
> por exemplo: tenho a que fazer assim
> between'01/01/' + ano and '01/12/' + ano(ano do banco)
> 
> no oracle tem alguma função que eu consigo fazer isso...so retornar o ano
> 
> obrigado
> 
> Atenciosamente,
> 
temas.com.br/assinatura.png> 
> 
> Felipe Nunes 
> 
> Analista T.I. - Atacado/Distribuidor
> 
> - Bacharel em Ciências da Computação
> 
> * 
> 
> MG: (37) 3213-4855
> 
> DF: (61) 3561-1188
> 
> BA: (71) 3341-8714
> 
> * 
> 
> [EMAIL PROTECTED]  com.br 
> 
> * 
> 
>  .com.br/>
www.vilesoft.com.br 
> 
> O emitente desta mensagem é responsável por seu conteúdo e endereçamento.
> Cabe ao destinatário cuidar quanto ao tratamento adequado. Sem a devida
> autorização, a divulgação, a reprodução, a distribuição ou qualquer outra
> ação em desconformidade com as normas internas da Vilesoft são proibidas e
> passíveis de sanção disciplinar, cível e criminal." 
> 
> "The sender of this message is responsible for its content and addressing.
> The receiver shall take proper care of it. Without due authorization, the
> publication, reproduction, distribution or the performance of any other
> action not conforming to Vilesoft internal policies and procedures is
> forbidden and liable to disciplinary, civil or criminal sanctions."
> 
> " El emisor de este mensaje es responsable por su contenido y
> direccionamiento. Cabe al destinatario darle el tratamiento adecuado. Sin
la
> debida autorización, su divulgación, reproducción, distribución o
cualquier
> otra acción no conforme a las normas internas de Vilesoft están prohibidas
y
> serán pasibles de sanción disciplinaria, civil y penal." 
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> 

Sérgio 
Tecnologia da Informação - TI 
Tel.: 16 3810 1060 
e-mail: [EMAIL PROTECTED]  com.br 
Usina Alta Mogiana S/A - Acucar e Alcool

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



 !DSPAM:47987eb9190071804284693! 


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

[delphi-br] URGENCIA - PROBLEMA EXTRANHO NO DELPHI 7

[Andre Nunes]

Bom dia,
 
   Trabalhamos aki na empresa comDelphi 7, temos 2 ambientes de
desenvolvimento e produção, a 15 dias que começou a apresentar alguns
problemas extranhos, como por exemplo:
 
  tenho um processo onde o usuario tem incluir algumas informações e
depois ele visualiza na tela com report builder até ai sem problema, como o
documento é grande ele faz "N" alterações. ai é começa o problema sai do
programa sem dar qualquer mensagem de erro.
 
Obs: Já verifiquei a destruição dos objetos quando são criados.
 
 
Andre nunes
Manaus-AM
"Tudo posso naquele que me fortalece"


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

Res: [delphi-br] Erro No corresponding master record found.

[Andre Luis Silveria]

Não estou perdendo a chave não.
Mas o problema não é nem no Insert, é quando vou editar os registros para 
inserir o valor da chave definitiva no lugar da temporária.
Estou quase louco aqui. Mas obrigado por responder.

- Mensagem original 
De: Leslyn Fernandes <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 17 de Janeiro de 2008 13:11:33
Assunto: Re: [delphi-br] Erro No corresponding master record found.









  



Oi... deixeu ver se entendi... vc insere num mestre, e no detalhe 
do mestre

e quando vai inserir no detalhe do detalhe da pau?



Vc num ta perdendo a referencia de chave do insert detalhe1 para o insert do

detalhe2??



tipo vc deveria estar fazendo algo assim:



insert no mestre

pego a pk do mestre

insert no detalhe com pk do mestre

pego pk do detalhe

insert no próx. detalhe com pk do detalhe anteriror



Espero ter ajudado



-- 

TFA,

Leslyn Fernandes

55-11-9159-3837

Computer Engineer

Integra Solutions



"Imagination is more important than knowledge."

 - Albert Einstein



2008/1/17 Andre Luis Silveria <[EMAIL PROTECTED] com.br>:



>   Estou com o erro citado e não sei mais o que fazer. O problema é que a

> situação é meio complicada, mas vou tentar descrever o problema:

>

> Tenho uma tabela Master que tem uma Detalhe ligada a ela e que é mestre de

> outro Detalhe: Meste -> Detalhe -> Detalhe.

>

> Em todas as tabelas tenho dois registros, antes que gravar (applyupdates)

> gero a chave final da tabela Mestre, automaticamente setada na tabela

> detalhe quando dou o post na mestre, depois faço um loop para preencher o

> mesmo código na detalhe do detalhe, até aí nada de anormal.

>

> Mas agora vem o problema: No primeiro registro funciona normal, ou seja

> seto o código para a mestre e post nela, seto na detalhe do detalhe e post

> nela tb. Mas quando vou gerar para o segundo registro, quando dou o post da

> detalhe do detalhe, ocorre o bendito erro : No corresponding master record

> found..

>

> Se alguem tiver uma dica, luz no final do túnel, qualquer coisa, pois no

> google o que encontrei não ajudou muito não.

>

> Atenciosamente,

>

> André Luis

> Siagri Sistemas.

>

> Abra sua conta no Yahoo! Mail, o único sem limite de espaço para

> armazenamento!

> http://br.mail. yahoo.com/

>

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

>

>  

>



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






  
























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

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