Re: [delphi-br] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico Vinicius Santos - MSI
Desculpa me intrometer, eu não estou acompanhando este Post
vou dar um belo de um chute, sua tabela tem chaves primárias ?? se não tiver 
chaves primárias, provavelmente é isso !

Vinicius dos Santos
Blog: http://tuplas.blogspot.com
http://www.msisolucoes.com.br

  - Original Message - 
  From: Douglas Takahara 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, July 16, 2008 6:49 PM
  Subject: [delphi-br] Re: Exclusão dbgrid!!


  Daniel Bastos,

  Eu consigo deletar os dados, porem nem sempre deleta os dados que eu
  quero.. eu seleciono a field que eu quero deletar, por exemplo, porem
  n deleta o field que selecionei e sim outro.

  --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos [EMAIL PROTECTED]
  escreveu
  
   Um chute.. até pq não trabalho a um tempo com dbx :)
   Será que este delete não pode estar pendente de um commit?
   Pq se ele atualiza os dados e não aparece, pode estar usando o
  isolamento
   transacional ReadCommited. Mas, sem commit, realmente não aparecerá no
   dbgrid.
   
   Abs.
   Daniel A. Bastos
   
   2008/7/16 Douglas Takahara [EMAIL PROTECTED]:
   
Rubem,
   
Com relação a primeira pergunta , acredito que realmente o selected
field n corresponde ao campo que contém cpf..
   
Quanto a segunda pergunta..
sim , eu abro e fecho novamente a consulta...
   
--- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
Rubem Nascimento da Rocha
djpardalrocha@ escreveu
   


 Acho que vc está cometendo um equivoco. Vc usa DBGrid.SelectedField
para pegar o valor da chave (por assim dizer) que será usada para a
exclusão, mas será que o SelectedField do DBGrid, no momento da
deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
depois da deleção, vc fecha e depois abre a consulta do DBGrid?

 Sds.

 
  To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
  From: douglashideki@
   
  Date: Wed, 16 Jul 2008 17:07:55 +
  Subject: [delphi-br] Exclusão dbgrid!!
 
 
  Boa tarde,
 
  Estou tentando excluir uma linha do dbgrid por um button,
  coloquei o
  seguinte:
 
  if MessageDlg ('Tem certeza que deseja excluir a
  informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
 
  with DataModule.SQLQuery do begin
  close;
  sql.Clear;
  SQL.Add('DELETE FROM TABLE WHERE CPF =
  '+QuotedStr(DBGrid.SelectedField.AsString)+' ');
  ExecSQL;
 
 
  Close;
 
  end;
 
  Showmessage('Registro excluí­do com sucesso!');
  end
  Else
  Showmessage('Operação cancelada!');
 
  Gostaria de quando o usuario clicasse neese buton fosse deletado a
  linha selecionada... Acontece que deletar até deleta, mas ás
  vezes nao
  delete a linha que está selecionada...
 
  essa parte +QuotedStr(DBGrid.SelectedField.AsString)+' eh assim
  mesmo?
 
 
 

 __
 Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS
para o Messenger! É GRÁTIS!
 http://www.msn.com.br/emoticonpack

   

   
   
   
   [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] Velocidade do Firebird 2.1

2008-07-17 Por tôpico Edelson Regis de Lima
Olá Leonardo.
Eu acesso via IBX.
Eu nao usei o mesmo arquivo (fisico) do banco. Eu criei todas as tabelas
novamente no Firebird, e fiz uma aplicação para converter os dados.
O novo banco foi criado igualzinho, e todos os dados foram importados
corretamente.
A paginação do banco é 8192, no antigo e no novo.
O servidor (hardware) tambem é o mesmo.

Voce usa os dois bancos? Se usa, nas suas aplicações voce já notou alguma
diferença? Os dois bancos tem o mesmo desempenho nas suas aplicações?
Para mim o Firebird 2.1 iria até funcionar mais rapido do que o Interbase
7.5, pelos comentários que eu li na internet do pessoal que já fizeram
testes.
Eu estranhei dos usuários dizerem que o sistema ficou mais lento. Vou ver se
descubro o motivo.

Abraços,

Edelson.


Em 16/07/08, Leonardo Quinino [EMAIL PROTECTED] escreveu:

   Pode ser os métodos que faz o acesso.

 Que ferramenta usa para acessar os dados pelo seu aplicativo ?
 DBEXPRESS ?
 BDE ?
 MDO ?
 ADO ?
 IBX ?
 IBO ?

 Outra situação, é que não sei se vc teve o cuidado de observar, que o
 correto não
 é só trocar o servidor de dados (interbase para firebird), é bom fazer um
 backup
 e restaurar no firebird.

 Tem muita coisa que pode olhar, tamanho da página de dados, e por ae vai.

 2008/7/15 Edelson Regis de Lima [EMAIL PROTECTED] edregis%40ig.com.br:


  Olá pessoal.
 
  Alguem já comparou a velocidade do Firebird 2.1 em relação ao Interbase
  7.5?
  Eu migrei um sistema que usava o Interbase 7.5 para o Firebird 2.1, e os
  usários estao reclamando que ficou mais lento.
  A base é iguazinha, nao mudei nada...
  Será que é mais lento mesmo?
 
  Abraços,
 
  Edelson.
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Leonardo Quinino

 [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] Plugin para obter dados de gerenciamento do projeto

2008-07-17 Por tôpico Braytiner
É que na verdade não é para uma equipe de programadores e sim para um
programador só. Encontrei um plugin.. mas só funciona no Delphi 5...




2008/7/16 Ricardo César Cardoso [EMAIL PROTECTED]:

 Acho que vc está mais preocupado é com o preço mesmo :)

 Mas voltando ao assunto, não me lembro de ter visto algo integrado ao
 Delphi nesse nível... Uma vez há muito tempo atrás eu até vi uma aplicação
 que fazia isso lá no BaixaAki ou Superdownloads, mas confesso que não me
 interessou testar. Desculpe mas nem o nome da ferramenta me lembro :(

 Atte,
 Ricardo.

 --- Em qua, 16/7/08, Braytiner [EMAIL PROTECTED] escreveu:
 De: Braytiner [EMAIL PROTECTED]
 Assunto: Re: [delphi-br] Plugin para obter dados de gerenciamento do
 projeto
 Para: delphi-br@yahoogrupos.com.br
 Data: Quarta-feira, 16 de Julho de 2008, 16:09











O StarTeam é pesado e caro, gostaria de ter somente um plugin
 para controle

 o tempo gasto no projeto...



 

 Braytiner



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


 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






-- 

Braytiner


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



Re: [delphi-br] Plugin para obter dados de gerenciamento do projeto

2008-07-17 Por tôpico Adriano Santos (Yahoo)
Olá,

Não me recordo ter visto isso no JEDI VCS, mas é uma boa alternativa e 
barata se quiser ter um controle do projeto. Não é um StarTeam da vida, 
mas já ajuda bastante.

[]s

Boa Leitura,

Adriano Santos
Development Manager SoftPark
Editor Técnico Revistas ClubeDelphi e WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br



Braytiner respondeu:

 É que na verdade não é para uma equipe de programadores e sim para um
 programador só. Encontrei um plugin.. mas só funciona no Delphi 5...

 2008/7/16 Ricardo César Cardoso [EMAIL PROTECTED] 
 mailto:ricardo_engsoft%40yahoo.com.br:

  Acho que vc está mais preocupado é com o preço mesmo :)
 
  Mas voltando ao assunto, não me lembro de ter visto algo integrado ao
  Delphi nesse nível... Uma vez há muito tempo atrás eu até vi uma 
 aplicação
  que fazia isso lá no BaixaAki ou Superdownloads, mas confesso que não me
  interessou testar. Desculpe mas nem o nome da ferramenta me lembro :(
 
  Atte,
  Ricardo.
 
  --- Em qua, 16/7/08, Braytiner [EMAIL PROTECTED] 
 mailto:braytiner%40gmail.com escreveu:
  De: Braytiner [EMAIL PROTECTED] mailto:braytiner%40gmail.com
  Assunto: Re: [delphi-br] Plugin para obter dados de gerenciamento do
  projeto
  Para: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
  Data: Quarta-feira, 16 de Julho de 2008, 16:09
 
 
 
 
 
 
 
 
 
 
 
  O StarTeam é pesado e caro, gostaria de ter somente um plugin
  para controle
 
  o tempo gasto no projeto...
 
 
 
  
 
  Braytiner
 
 
 
  [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 
 http://br.new.mail.yahoo.com/addresses
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
  
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 

 -- 

 Braytiner

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

 
 No virus found in this incoming message.
 Checked by AVG - http://www.avg.com 
 Version: 8.0.138 / Virus Database: 270.5.0/1558 - Release Date: 17/7/2008 
 09:56
   

-- 




Re: [delphi-br] Plugin para obter dados de gerenciamento do projeto

2008-07-17 Por tôpico Braytiner
Eu uso o Jedi VCS, ele não tem esta opção, postei no fórum do CnPack
sugerindo este recurso...


2008/7/17 Adriano Santos (Yahoo) [EMAIL PROTECTED]:

 Olá,

 Não me recordo ter visto isso no JEDI VCS, mas é uma boa alternativa e
 barata se quiser ter um controle do projeto. Não é um StarTeam da vida,
 mas já ajuda bastante.

 []s

 Boa Leitura,

 Adriano Santos
 Development Manager SoftPark
 Editor Técnico Revistas ClubeDelphi e WebMobile
 www.delphitodelphi.blogspot.com
 www.adrianosantos.pro.br
 www.devmedia.com.br



 Braytiner respondeu:
 
  É que na verdade não é para uma equipe de programadores e sim para um
  programador só. Encontrei um plugin.. mas só funciona no Delphi 5...
 
  2008/7/16 Ricardo César Cardoso [EMAIL PROTECTED]
  mailto:ricardo_engsoft%40yahoo.com.brricardo_engsoft%2540yahoo.com.br
 :
 
   Acho que vc está mais preocupado é com o preço mesmo :)
  
   Mas voltando ao assunto, não me lembro de ter visto algo integrado ao
   Delphi nesse nível... Uma vez há muito tempo atrás eu até vi uma
  aplicação
   que fazia isso lá no BaixaAki ou Superdownloads, mas confesso que não
 me
   interessou testar. Desculpe mas nem o nome da ferramenta me lembro :(
  
   Atte,
   Ricardo.
  
   --- Em qua, 16/7/08, Braytiner [EMAIL PROTECTED]
  mailto:braytiner%40gmail.com braytiner%2540gmail.com escreveu:
   De: Braytiner [EMAIL PROTECTED] 
   mailto:braytiner%40gmail.combraytiner%2540gmail.com
 
   Assunto: Re: [delphi-br] Plugin para obter dados de gerenciamento do
   projeto
   Para: delphi-br@yahoogrupos.com.br
  mailto:delphi-br%40yahoogrupos.com.brdelphi-br%2540yahoogrupos.com.br
 
   Data: Quarta-feira, 16 de Julho de 2008, 16:09
  
  
  
  
  
  
  
  
  
  
  
   O StarTeam é pesado e caro, gostaria de ter somente um plugin
   para controle
  
   o tempo gasto no projeto...
  
  
  
   
  
   Braytiner
  
  
  
   [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
  http://br.new.mail.yahoo.com/addresses
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
   
  
   --
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
  
  
  
 
  --
 
  Braytiner
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com
  Version: 8.0.138 / Virus Database: 270.5.0/1558 - Release Date: 17/7/2008
 09:56
 

 --



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






-- 

Braytiner


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



[delphi-br] [Off] 5º FDD em Piracicaba (Fretado)

2008-07-17 Por tôpico Adriano Santos (Yahoo)
Olá,

Pessoa, não li as mensagens do grupo nos últimos dias.
Curiosidade, alguém aqui vai no 5º FDD sábado em Piracicaba?
   

-- 
Boa Leitura,

Adriano Santos
Development Manager SoftPark
Editor Técnico Revistas ClubeDelphi e WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br



Re: [delphi-br] [Off] 5º FDD em Piracicaba ( Fretado)

2008-07-17 Por tôpico Nivaldo Stainle
eu pretendo ir.
 
Stainle

--- Em qui, 17/7/08, Adriano Santos (Yahoo) [EMAIL PROTECTED] escreveu:

De: Adriano Santos (Yahoo) [EMAIL PROTECTED]
Assunto: [delphi-br] [Off] 5º FDD em Piracicaba (Fretado)
Para: Delphi-br delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 17 de Julho de 2008, 10:38






Olá,

Pessoa, não li as mensagens do grupo nos últimos dias.
Curiosidade, alguém aqui vai no 5º FDD sábado em Piracicaba?


-- 
Boa Leitura,

Adriano Santos
Development Manager SoftPark
Editor Técnico Revistas ClubeDelphi e WebMobile
www.delphitodelphi. blogspot. com
www.adrianosantos. pro.br
www.devmedia. com.br

 














  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] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico Douglas Takahara
Vinicius Santos,

Obrigado pelo chute, porém minha tabela tem chaves primárias sim.



--- Em delphi-br@yahoogrupos.com.br, Vinicius Santos - MSI
[EMAIL PROTECTED] escreveu

 Desculpa me intrometer, eu não estou acompanhando este Post
 vou dar um belo de um chute, sua tabela tem chaves primárias ?? se
não tiver chaves primárias, provavelmente é isso !
 
 Vinicius dos Santos
 Blog: http://tuplas.blogspot.com
 http://www.msisolucoes.com.br
 
   - Original Message - 
   From: Douglas Takahara 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Wednesday, July 16, 2008 6:49 PM
   Subject: [delphi-br] Re: Exclusão dbgrid!!
 
 
   Daniel Bastos,
 
   Eu consigo deletar os dados, porem nem sempre deleta os dados que eu
   quero.. eu seleciono a field que eu quero deletar, por exemplo, porem
   n deleta o field que selecionei e sim outro.
 
   --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos danbastos@
   escreveu
   
Um chute.. até pq não trabalho a um tempo com dbx :)
Será que este delete não pode estar pendente de um commit?
Pq se ele atualiza os dados e não aparece, pode estar usando o
   isolamento
transacional ReadCommited. Mas, sem commit, realmente não
aparecerá no
dbgrid.

Abs.
Daniel A. Bastos

2008/7/16 Douglas Takahara douglashideki@:

 Rubem,

 Com relação a primeira pergunta , acredito que realmente o
selected
 field n corresponde ao campo que contém cpf..

 Quanto a segunda pergunta..
 sim , eu abro e fecho novamente a consulta...

 --- Em delphi-br@yahoogrupos.com.br
delphi-br%40yahoogrupos.com.br,
 Rubem Nascimento da Rocha
 djpardalrocha@ escreveu

 
 
  Acho que vc está cometendo um equivoco. Vc usa
DBGrid.SelectedField
 para pegar o valor da chave (por assim dizer) que será usada
para a
 exclusão, mas será que o SelectedField do DBGrid, no momento da
 deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
 depois da deleção, vc fecha e depois abre a consulta do DBGrid?
 
  Sds.
 
  
   To: delphi-br@yahoogrupos.com.br
delphi-br%40yahoogrupos.com.br
   From: douglashideki@

   Date: Wed, 16 Jul 2008 17:07:55 +
   Subject: [delphi-br] Exclusão dbgrid!!
  
  
   Boa tarde,
  
   Estou tentando excluir uma linha do dbgrid por um button,
   coloquei o
   seguinte:
  
   if MessageDlg ('Tem certeza que deseja excluir a
   informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
  
   with DataModule.SQLQuery do begin
   close;
   sql.Clear;
   SQL.Add('DELETE FROM TABLE WHERE CPF =
   '+QuotedStr(DBGrid.SelectedField.AsString)+' ');
   ExecSQL;
  
  
   Close;
  
   end;
  
   Showmessage('Registro excluí­do com sucesso!');
   end
   Else
   Showmessage('Operação cancelada!');
  
   Gostaria de quando o usuario clicasse neese buton fosse
deletado a
   linha selecionada... Acontece que deletar até deleta, mas ás
   vezes nao
   delete a linha que está selecionada...
  
   essa parte +QuotedStr(DBGrid.SelectedField.AsString)+'
eh assim
   mesmo?
  
  
  
 
  __
  Instale a Barra de Ferramentas com Desktop Search e ganhe
EMOTICONS
 para o Messenger! É GRÁTIS!
  http://www.msn.com.br/emoticonpack
 

 



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

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





[delphi-br] Problema com Form

2008-07-17 Por tôpico l_o_angelini
Bom dia  Estou tento um pequeno problema com o form principal de
minha aplicação. Ele esta sobrepondo a barra do Windows, estou usando
as seguintes propriedades:

Position = poDesigned
Windows State = wsMaximinized

Alguem ja passou por isso ou tenho uma solução ???


Luciano Angelini
Prefeitura de Lupionópolis-Pr



Res: [delphi-br] Problema com Form

2008-07-17 Por tôpico Luciano Calenzani Simões
Já olhou a configuração da sua barra de tarefas? Lá tem uma opção para ficar 
sempre visível. No Windows Vista chama-se Manter a barra de tarefas sobre as 
outras janelas.

 Luciano Calenzani Simões





- Mensagem original 
De: l_o_angelini [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 17 de Julho de 2008 9:42:24
Assunto: [delphi-br] Problema com Form


Bom dia  Estou tento um pequeno problema com o form principal de
minha aplicação. Ele esta sobrepondo a barra do Windows, estou usando
as seguintes propriedades:

Position = poDesigned
Windows State = wsMaximinized

Alguem ja passou por isso ou tenho uma solução ???

Luciano Angelini
Prefeitura de Lupionópolis- Pr


  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] Checar a impressora no WinXP(SP2)

2008-07-17 Por tôpico Bollasette
Olá,,, saudações a todos:

Meus amigos, através de pesquisas na internet encontrei esta função com a
finalidade
de verificar o estado da impressora padrão no PC. Fiz os testes e não
consigo vislumbrar
se a mesma está ligada ou desligada pois, ao mandar imprimir alguma coisa,
primeiro vai
para o spool do windows e fica lá aguardando a impressora ser ligada.

{Checa Impressora WinXP}
function IsPrinterWinXP : String;
  type
   TPrinterInfo = record
   SeverName : PChar;
   PrinterName : PChar;
   ShareName : PChar;
   PortName : PChar;
   DriverName : PChar;
   Comment : PChar;
   Location : PChar;
   DeviceMode : PDeviceModeA;
   SepFile : PChar;
   PrintProcessor : PChar;
   DataType : PChar;
   Parameters : PChar;
   SecurityDescriptor: PSecurityDescriptor;
   Attributes : Cardinal;
   DefaultPriority : Cardinal;
   StartTime : Cardinal;
   UntilTime : Cardinal;
   Status : Cardinal;
   Jobs : Cardinal;
   AveragePPM : Cardinal;
  end;
  function GetCurrentPrinterInformation: TPrinterInfo;
function GetCurrentPrinterHandle: THandle;
 var  Device, Driver, Port : array[0..255] of char;
  hDeviceMode: THandle;
begin
 Printer.GetPrinter(Device, Driver, Port, hDeviceMode);
 if not OpenPrinter(@Device, Result, nil) then RaiseLastWin32Error;
end;
   var
hPrinter : THandle;
pInfo: PPrinterInfo2;
bytesNeeded: DWORD;
PrinterInfo: TPrinterInfo;
  begin
   hprinter := GetCurrentPrinterHandle;
   try
Winspool.GetPrinter( hPrinter, 2, Nil, 0, @bytesNeeded );
pInfo := AllocMem( bytesNeeded );
try
 Winspool.GetPrinter( hPrinter, 2, pInfo, bytesNeeded, @bytesNeeded );
 Result.SeverName := pInfo^.pServerName;
 Result.PrinterName := pInfo^.pPrinterName;
 Result.ShareName := pInfo^.pShareName;
 Result.PortName := pInfo^.pPortName;
 Result.DriverName := pInfo^.pDriverName;
 Result.Comment := pInfo^.pComment;
 Result.Location := pInfo^.pLocation;
 Result.DeviceMode := pInfo^.pDevMode;
 Result.SepFile := pInfo^.pSepFile;
 Result.PrintProcessor := pInfo^.pPrintProcessor;
 Result.DataType := pInfo^.pDatatype;
 Result.Parameters := pInfo^.pParameters;
 Result.SecurityDescriptor := pInfo^.pSecurityDescriptor;
 Result.Attributes := pInfo^.Attributes;
 Result.DefaultPriority := pInfo^.DefaultPriority;
 Result.StartTime := pInfo^.StartTime;
 Result.UntilTime := pInfo^.UntilTime;
 Result.Status := pInfo^.Status;
 Result.Jobs := pInfo^.cJobs;
 Result.AveragePPM := pInfo^.AveragePPM;
finally
 FreeMem( pInfo );
end;
   finally
ClosePrinter( hPrinter );
   end;
  end;
var
 PrinterInfo: TPrinterInfo;
begin
 PrinterInfo := GetCurrentPrinterInformation;
 Result:= 'Impressora: '+#13+PrinterInfo.PrinterName+#13+
  'Porta: '+PrinterInfo.PortName+#13+
  'Driver: '+PrinterInfo.DriverName+#13+
  'Location: '+'('+PrinterInfo.Location+')'+#13+
  'Status: '+'('+IntToStr(PrinterInfo.Status)+')'+#13+
  'Jobs: '+'('+IntToStr(PrinterInfo.Jobs)+')'+#13+
  'Server: '+'('+PrinterInfo.SeverName+')'+#13+
  'Share: '+'('+PrinterInfo.ShareName+')';
end;

para testar:

   if IsPrinterWinXP'' then
begin
 Mensagem('Verifique a
'+IsPrinterWinXP,'Aviso...',mb_OK+mb_IconInformation);
end else
begin
 Mensagem('Impressora desligada ? Impressora não instalada 
?,'Aviso...',mb_OK+mb_IconInformation);
 Exit;
end;

[]s,,, :)

Henrique
WebSIstemas
www.guardalivro.cnt.br





Re: [delphi-br] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico Vinicius Santos - MSI
Eu li o histórico do post
Pq vc não pega o CPF, diretamente da tabela ??

SQL.Add('DELETE FROM TABLE WHERE CPF =' + QuotedStr(TabelaCPF.AsString)) ;

Qual o motivo, de vc querer pegar o campo selecionado ?? isso resolveria seu 
problema cara !

Vinicius dos Santos
Blog: http://tuplas.blogspot.com
http://www.msisolucoes.com.br


  - Original Message - 
  From: Douglas Takahara 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, July 17, 2008 9:17 AM
  Subject: [delphi-br] Re: Exclusão dbgrid!!


  Vinicius Santos,

  Obrigado pelo chute, porém minha tabela tem chaves primárias sim.

  --- Em delphi-br@yahoogrupos.com.br, Vinicius Santos - MSI
  [EMAIL PROTECTED] escreveu
  
   Desculpa me intrometer, eu não estou acompanhando este Post
   vou dar um belo de um chute, sua tabela tem chaves primárias ?? se
  não tiver chaves primárias, provavelmente é isso !
   
   Vinicius dos Santos
   Blog: http://tuplas.blogspot.com
   http://www.msisolucoes.com.br
   
   - Original Message - 
   From: Douglas Takahara 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Wednesday, July 16, 2008 6:49 PM
   Subject: [delphi-br] Re: Exclusão dbgrid!!
   
   
   Daniel Bastos,
   
   Eu consigo deletar os dados, porem nem sempre deleta os dados que eu
   quero.. eu seleciono a field que eu quero deletar, por exemplo, porem
   n deleta o field que selecionei e sim outro.
   
   --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos danbastos@
   escreveu
   
Um chute.. até pq não trabalho a um tempo com dbx :)
Será que este delete não pode estar pendente de um commit?
Pq se ele atualiza os dados e não aparece, pode estar usando o
   isolamento
transacional ReadCommited. Mas, sem commit, realmente não
  aparecerá no
dbgrid.

Abs.
Daniel A. Bastos

2008/7/16 Douglas Takahara douglashideki@:

 Rubem,

 Com relação a primeira pergunta , acredito que realmente o
  selected
 field n corresponde ao campo que contém cpf..

 Quanto a segunda pergunta..
 sim , eu abro e fecho novamente a consulta...

 --- Em delphi-br@yahoogrupos.com.br
  delphi-br%40yahoogrupos.com.br,
 Rubem Nascimento da Rocha
 djpardalrocha@ escreveu

 
 
  Acho que vc está cometendo um equivoco. Vc usa
  DBGrid.SelectedField
 para pegar o valor da chave (por assim dizer) que será usada
  para a
 exclusão, mas será que o SelectedField do DBGrid, no momento da
 deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
 depois da deleção, vc fecha e depois abre a consulta do DBGrid?
 
  Sds.
 
  
   To: delphi-br@yahoogrupos.com.br
  delphi-br%40yahoogrupos.com.br
   From: douglashideki@

   Date: Wed, 16 Jul 2008 17:07:55 +
   Subject: [delphi-br] Exclusão dbgrid!!
  
  
   Boa tarde,
  
   Estou tentando excluir uma linha do dbgrid por um button,
   coloquei o
   seguinte:
  
   if MessageDlg ('Tem certeza que deseja excluir a
   informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
  
   with DataModule.SQLQuery do begin
   close;
   sql.Clear;
   SQL.Add('DELETE FROM TABLE WHERE CPF =
   '+QuotedStr(DBGrid.SelectedField.AsString)+' ');
   ExecSQL;
  
  
   Close;
  
   end;
  
   Showmessage('Registro excluí­do com sucesso!');
   end
   Else
   Showmessage('Operação cancelada!');
  
   Gostaria de quando o usuario clicasse neese buton fosse
  deletado a
   linha selecionada... Acontece que deletar até deleta, mas ás
   vezes nao
   delete a linha que está selecionada...
  
   essa parte +QuotedStr(DBGrid.SelectedField.AsString)+'
  eh assim
   mesmo?
  
  
  
 
  __
  Instale a Barra de Ferramentas com Desktop Search e ganhe
  EMOTICONS
 para o Messenger! É GRÁTIS!
  http://www.msn.com.br/emoticonpack
 

 



[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] Problema com Form

2008-07-17 Por tôpico Willian Jhonnes Lara dos Santos
Olá...

Só uma pergunta: que tipo de borda o seu form principal tem? bsSizeable ou 
bsSingle?

Se a resposta for a segunda, este é o comportamento normal do form... Então, 
das duas uma: ou vc muda o BorderStyle para bsSizeable ou define as dimensões 
em tempo de execução (algo como form.Height := Screen.Heght - 24).

[]'s

 ---
Att.:
Willian Jhonnes L. dos Santos
Analista/Desenvolvedor Object/Free Pascal
[EMAIL PROTECTED]
---
Seja livre. Use Linux.
Grupo de Usuários GNU/Linux de São José dos Pinhais
Linux user number 449753
---
Powered by Slackware Linux 12.0
Kernel 2.6.21.5-custom
---



- Mensagem original 
De: l_o_angelini [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 17 de Julho de 2008 9:42:24
Assunto: [delphi-br] Problema com Form


Bom dia  Estou tento um pequeno problema com o form principal de
minha aplicação. Ele esta sobrepondo a barra do Windows, estou usando
as seguintes propriedades:

Position = poDesigned
Windows State = wsMaximinized

Alguem ja passou por isso ou tenho uma solução ???

Luciano Angelini
Prefeitura de Lupionópolis- Pr




  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]



Re: [delphi-br] [Off] 5º FDD em Piracicaba (Fretado)

2008-07-17 Por tôpico Daniel Bastos
eu estou lá :)

2008/7/17 Nivaldo Stainle [EMAIL PROTECTED]:

   eu pretendo ir.

 Stainle

 --- Em qui, 17/7/08, Adriano Santos (Yahoo) [EMAIL 
 PROTECTED]falecom%40adrianosantos.pro.br
 escreveu:

 De: Adriano Santos (Yahoo) [EMAIL PROTECTED]falecom%40adrianosantos.pro.br
 
 Assunto: [delphi-br] [Off] 5º FDD em Piracicaba (Fretado)
 Para: Delphi-br 
 delphi-br@yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br
 
 Data: Quinta-feira, 17 de Julho de 2008, 10:38

 Olá,

 Pessoa, não li as mensagens do grupo nos últimos dias.
 Curiosidade, alguém aqui vai no 5º FDD sábado em Piracicaba?

 --
 Boa Leitura,

 Adriano Santos
 Development Manager SoftPark
 Editor Técnico Revistas ClubeDelphi e WebMobile
 www.delphitodelphi. blogspot. com
 www.adrianosantos. pro.br
 www.devmedia. com.br

 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]

  




-- 
Abs
Daniel A. Bastos


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



[delphi-br] Gerar log com processos do Windows

2008-07-17 Por tôpico Andrei Luís
Estou querendo montar um programa para monitorar os processos que rodam no
Windows, algo tipo o Gerenciador de Tarefas do Windows, aba processo. Quero
pegar a lista dos processos, a % da CPU e a memória utilizada, para gravar
isso tudo num log.

Alguém poderia apontar um caminho?

[]s
Andrei


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



Res: [delphi-br] Gerar log com processos do Windows

2008-07-17 Por tôpico Luciano Calenzani Simões
Se for trabalho acadêmico, vá em frente. Se for trabalho comercial, suguro 
repensar, já existem vários freewares que fazem isso muito bem. Um bem legal é 
o PrcView.

 Luciano Calenzani Simões





- Mensagem original 
De: Andrei Luís [EMAIL PROTECTED]
Para: Delphi-br delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 17 de Julho de 2008 14:22:16
Assunto: [delphi-br] Gerar log com processos do Windows


Estou querendo montar um programa para monitorar os processos que rodam no
Windows, algo tipo o Gerenciador de Tarefas do Windows, aba processo. Quero
pegar a lista dos processos, a % da CPU e a memória utilizada, para gravar
isso tudo num log.

Alguém poderia apontar um caminho?

[]s
Andrei


  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] Re:Checar a impressora no WinXP(SP2)

2008-07-17 Por tôpico Bollasette

Pessoal, retificando:

Para testar:

   if IsPrinterWinXP'' then
begin
 Mensagem('Verifique a 
'+IsPrinterWinXP,'Aviso...',mb_OK+mb_IconInformation);
end else
begin
 Mensagem('Impressora desligada ?'+#13+'Impressora instalada 
?','Aviso...',mb_OK+mb_IconInformation);
 Abort;  Abort inves de Exit;
end;



[ ]sss
Henrique 



Re: [delphi-br] Gerar log com processos do Windows

2008-07-17 Por tôpico Marlon David de Souza
http://marlonsouza.wordpress.com/2008/04/03/lista-de-processos-do-windows/

Sem mais,

Marlon David de Souza
Desenvolvimento
Sysmo Informática Ltda



Andrei Luís escreveu:
 Estou querendo montar um programa para monitorar os processos que rodam no
 Windows, algo tipo o Gerenciador de Tarefas do Windows, aba processo. Quero
 pegar a lista dos processos, a % da CPU e a memória utilizada, para gravar
 isso tudo num log.

 Alguém poderia apontar um caminho?

 []s
 Andrei

   


[delphi-br] Acervo sobre Programação

2008-07-17 Por tôpico Janderson Braz
Galera,

 

Boa Tarde,

 

Alguém sabe onde eu encontro livros, apostilas ou tutoriais sobre Java, VB,
ASP, SQL e linguagens de programação em geral ???

 

Só que eu gostaria de encontrar livros, apostilas ou tutoriais
preferencialmente em PDF e que sejam de graça... rsrs.

 

Outro requisito é que seja um material com conteúdo bem aprofundado sobre
essas linguagens.

 

Já encontrei um monte de material pesquisando no Google , mas tudo era muito
superficial e eu não estou com grana pra comprar bom livros sobre o tema.

 

Será que mesmo depois de todas essas exigências alguém ainda pode me ajudar
???... rsrsrs...

 

Grato,

 

Janderson



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



RE: RES: [delphi-br] Acervo sobre Programação

2008-07-17 Por tôpico Rubem Nascimento da Rocha

E ele ainda foi autêntico afirmando ser exigente! ;)
Sds.




To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Thu, 17 Jul 2008 16:24:12 -0300
Subject: RES: [delphi-br] Acervo sobre Programação


Po cara! Já procurasse numa Biblioteca???



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Janderson 
Braz
Enviada em: quinta-feira, 17 de julho de 2008 15:32
Para: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL 
PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL 
PROTECTED]; delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED]; 
[EMAIL PROTECTED]
Assunto: [delphi-br] Acervo sobre Programação

Galera,

Boa Tarde,

Alguém sabe onde eu encontro livros, apostilas ou tutoriais sobre Java, VB,
ASP, SQL e linguagens de programação em geral ???

Só que eu gostaria de encontrar livros, apostilas ou tutoriais
preferencialmente em PDF e que sejam de graça... rsrs.

Outro requisito é que seja um material com conteúdo bem aprofundado sobre
essas linguagens.

Já encontrei um monte de material pesquisando no Google , mas tudo era muito
superficial e eu não estou com grana pra comprar bom livros sobre o tema.

Será que mesmo depois de todas essas exigências alguém ainda pode me ajudar
???... rsrsrs...

Grato,

Janderson

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

RES: [delphi-br] Acervo sobre Programação

2008-07-17 Por tôpico Davi Eduardo Borges Wall
Po cara! Já procurasse numa Biblioteca??? 

 



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Janderson 
Braz
Enviada em: quinta-feira, 17 de julho de 2008 15:32
Para: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL 
PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL 
PROTECTED]; delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED]; 
[EMAIL PROTECTED]
Assunto: [delphi-br] Acervo sobre Programação

 

Galera,

Boa Tarde,

Alguém sabe onde eu encontro livros, apostilas ou tutoriais sobre Java, VB,
ASP, SQL e linguagens de programação em geral ???

Só que eu gostaria de encontrar livros, apostilas ou tutoriais
preferencialmente em PDF e que sejam de graça... rsrs.

Outro requisito é que seja um material com conteúdo bem aprofundado sobre
essas linguagens.

Já encontrei um monte de material pesquisando no Google , mas tudo era muito
superficial e eu não estou com grana pra comprar bom livros sobre o tema.

Será que mesmo depois de todas essas exigências alguém ainda pode me ajudar
???... rsrsrs...

Grato,

Janderson

[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] VErficar se mouse foi clicado

2008-07-17 Por tôpico Maycon Sanches Amaro
Ai galera ninguem conseguiu fazer o hook rodar no vista???


Att.
Maycon Sanches Amaro


Ricardo César Cardoso escreveu:

 Não sei que versão do Windows e do Delphi você está usando mas comigo 
 que uso Windows XP SP2 e Delphi 2005 funfou perfeitamente... Tô 
 colocando o projeto lá nos arquivos da lista.

 Atte,
 Ricardo.

 --- Em qua, 16/7/08, Maycon Sanches Amaro [EMAIL PROTECTED] 
 mailto:mayconsan%40gmail.com escreveu:
 De: Maycon Sanches Amaro [EMAIL PROTECTED] 
 mailto:mayconsan%40gmail.com
 Assunto: Re: [delphi-br] VErficar se mouse foi clicado
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Data: Quarta-feira, 16 de Julho de 2008, 15:31

 Ricardo tentei esta dica mas ta dando erro qd tento inicializar:

 FHookStarted := True;

 Ele me retorna No Journal Hook availible

 Alguma dica..??

 Valew.

 Att.

 Maycon Sanches Amaro

 Ricardo César Cardoso escreveu:

 

  Teste isso aqui... acho que deve ser a solução...

 

  [ http://www.swissdel phicenter. ch/torry/ printcode. php?id=1729

  http://www.swissdel phicenter. ch/torry/ printcode. php?id=1729 ]

 

  Atte,

  Ricardo.

 

  --- Em seg, 14/7/08, Maycon Sanches Amaro [EMAIL PROTECTED] com

  mailto:mayconsan% 40gmail.com  escreveu:

  De: Maycon Sanches Amaro [EMAIL PROTECTED] com

  mailto:mayconsan% 40gmail.com 

  Assunto: Re: [delphi-br] VErficar se mouse foi clicado

  Para: [EMAIL PROTECTED] os.com.br mailto:delphi- br%40yahoogrupos 
 .com.br

  Data: Segunda-feira, 14 de Julho de 2008, 15:53

 

  Ricardo muito obrigado pela dica, mas até aí estou conseguindo fazer. O

 

  problema é saber qd o mouse foi clicado.

 

  Um exemplo usando essa dica seria colocar mais um label e atribuir a

 

  ele a posicao qd o mouse for clicado dentro ou fora da aplicacao.

 

  Att.

 

  Maycon Sanches Amaro

 

 

 

 

 

 

 

 

 

 

  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

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

 

  [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 
 http://br.new.mail.yahoo.com/addresses

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

  


[delphi-br] Re: Acervo sobre Programação

2008-07-17 Por tôpico lidio.zucchi
Documentação completa em java .

http://www.sun.com/documentation/index.html

Zucchi

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

 Galera,
 
  
 
 Boa Tarde,
 
  
 
 Alguém sabe onde eu encontro livros, apostilas ou tutoriais sobre 
Java, VB,
 ASP, SQL e linguagens de programação em geral ???
 
  
 
 Só que eu gostaria de encontrar livros, apostilas ou tutoriais
 preferencialmente em PDF e que sejam de graça... rsrs.
 
  
 
 Outro requisito é que seja um material com conteúdo bem aprofundado 
sobre
 essas linguagens.
 
  
 
 Já encontrei um monte de material pesquisando no Google , mas tudo 
era muito
 superficial e eu não estou com grana pra comprar bom livros sobre o 
tema.
 
  
 
 Será que mesmo depois de todas essas exigências alguém ainda pode 
me ajudar
 ???... rsrsrs...
 
  
 
 Grato,
 
  
 
 Janderson
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] query

2008-07-17 Por tôpico rzzanatta
olá tenho essa sql dentro da query, mas nao funciona a parte do case, o 
q está errado?
select fk_cliente,
   case when tipo=0 then 'Software'
when tipo=1 then 'Hardware' end as tipo,
   data,
   descricao,
   valorminimo,
   qtdemodulos,
   precomodulo,
   descontomodulo,
   valorbruto,
   descontovalorbruto,
   valorfinal
 from contratos
order by tipo


delphi + Postgree



Re: [delphi-br] query

2008-07-17 Por tôpico Eduardo Silva dos Santos
Parece que seu case ta errado...

não sei no PostGree mas no MySQL é assim

Case NomeDoCampo
  when '1' then 'Pago'
  when '2' then 'Aberto'
end as Nome_Virtual_para_o_Campo


2008/7/17 rzzanatta [EMAIL PROTECTED]:

   olá tenho essa sql dentro da query, mas nao funciona a parte do case, o
 q está errado?
 select fk_cliente,
 case when tipo=0 then 'Software'
 when tipo=1 then 'Hardware' end as tipo,
 data,
 descricao,
 valorminimo,
 qtdemodulos,
 precomodulo,
 descontomodulo,
 valorbruto,
 descontovalorbruto,
 valorfinal
 from contratos
 order by tipo

 delphi + Postgree

  




-- 
...
Eduardo Silva dos Santos
DRD Sistemas.
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com.br/
...


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



[delphi-br] Agrupamento Semanal

2008-07-17 Por tôpico henrique_filet
Bom dia galera...

Vou expor o probleminha que estou enfrentando aqui e espero contar com
a ajuda de vcs... Segte: Tem um relatório no meu sistema que exibo
dados AGRUPADOS POR SEMANA baseado no período informado pelo usuário.
A lógica que tenho implementado hoje estava funcionando bem até
ocorrer a situação ocorrida. Meu select retorna os dados DIA A DIA sem
agrupamento nenhum, daí, no delphi, eu faço o tratamento para agrupar.
Faço um DayOfWeek na data retornado pelo select verificando se o
retorno deste DayOfWeek é = 2 (Segunda-Feira), se for, realizo a
quebra (o agrupamento pela Semana). O problema ocorreu que, no período
solicitado pelo usuário, 17/04/2008 à 30/04/2008, não houve registros
nenhum nos dias 20 e 21/04 (domingo e segunda-feira) daí a lógica
existente falhou e não agrupou... Mesmo tendo mudado a semana. Abaixo
segue como deveria ter sido o agrupamento:

17/04/2008 à 20/04/2008
21/04/2008 à 27/04/2008
28/04/2008 à 30/04/2008

Porém, como não houve registros nos dias 20 e 21, o agrupamento ficou
assim:

17/04/2008 à 27/04/2008
28/04/2008 à 30/04/2008


Algum de vocês poderiam me ajudar a encontrar uma solução para estas
situações???

Obrigado e conto com vossa ajuda.

Sérgio



Re: Res: [delphi-br] Problema com Form

2008-07-17 Por tôpico Luciano Angelini - uol
Luciano 

 Ja vi e esta correto ... que no entanto tenho outras aplicações que não 
ocorre esse problema  só nesta que esta ocorrendo



Luciano Angelini
Prefeitura de Lupionópolis- Pr

Luciano Calenzani Simões escreveu:

 Já olhou a configuração da sua barra de tarefas? Lá tem uma opção para 
 ficar sempre visível. No Windows Vista chama-se Manter a barra de 
 tarefas sobre as outras janelas.

 Luciano Calenzani Simões

 - Mensagem original 
 De: l_o_angelini [EMAIL PROTECTED] 
 mailto:luciano.angelini%40uol.com.br
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Enviadas: Quinta-feira, 17 de Julho de 2008 9:42:24
 Assunto: [delphi-br] Problema com Form

 Bom dia  Estou tento um pequeno problema com o form principal de
 minha aplicação. Ele esta sobrepondo a barra do Windows, estou usando
 as seguintes propriedades:

 Position = poDesigned
 Windows State = wsMaximinized

 Alguem ja passou por isso ou tenho uma solução ???

 Luciano Angelini
 Prefeitura de Lupionópolis- Pr

 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 
 http://br.new.mail.yahoo.com/addresses

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

  


[delphi-br] Programar para celulares e PDAs

2008-07-17 Por tôpico Luis Hilário Tobler Garcia
Boa tarde pessoal,
sei que não é assunto específico desta lista, mas estou interessado em aprender 
a programar para dispositivos móveis, celulares ou PDAs, me parece que a melhor 
alternativa é usar Java como linguagem, alguém saberia me dizer se a borland 
oferece alguma IDE que suporte este tipo de função ou mesmo alguma outra 
ferramenta e ou grupo de discussão para esta finalidade?

Obrigado, Hilário.

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



[delphi-br] integração de software com nota fiscal paulista

2008-07-17 Por tôpico Paulo Batalhão
Amigos, bom dia!


   Quais as regras para implantação do nota fiscal Paulista ??? é via software 
mesmo ? onde obtenho mais informações ???


desde ja agradeço 


Att' Paulo Batalhão

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



Re: Res: [delphi-br] Problema com Form

2008-07-17 Por tôpico Luciano Angelini - uol
Willian ,

 Estava bsSingle ...   mudei para bsSizeable rsrsrsrs  dai o form 
ficou por baixo da barra  tenho um statusBar ...  ele fica embaixo 
da barra





Willian Jhonnes Lara dos Santos escreveu:

 Olá...

 Só uma pergunta: que tipo de borda o seu form principal tem? 
 bsSizeable ou bsSingle?

 Se a resposta for a segunda, este é o comportamento normal do form... 
 Então, das duas uma: ou vc muda o BorderStyle para bsSizeable ou 
 define as dimensões em tempo de execução (algo como form.Height := 
 Screen.Heght - 24).

 []'s

 ---
 Att.:
 Willian Jhonnes L. dos Santos
 Analista/Desenvolvedor Object/Free Pascal
 [EMAIL PROTECTED] mailto:willianjhonnes%40yahoo.com.br
 ---
 Seja livre. Use Linux.
 Grupo de Usuários GNU/Linux de São José dos Pinhais
 Linux user number 449753
 ---
 Powered by Slackware Linux 12.0
 Kernel 2.6.21.5-custom
 ---

 - Mensagem original 
 De: l_o_angelini [EMAIL PROTECTED] 
 mailto:luciano.angelini%40uol.com.br
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Enviadas: Quinta-feira, 17 de Julho de 2008 9:42:24
 Assunto: [delphi-br] Problema com Form

 Bom dia  Estou tento um pequeno problema com o form principal de
 minha aplicação. Ele esta sobrepondo a barra do Windows, estou usando
 as seguintes propriedades:

 Position = poDesigned
 Windows State = wsMaximinized

 Alguem ja passou por isso ou tenho uma solução ???

 Luciano Angelini
 Prefeitura de Lupionópolis- Pr

 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 
 http://br.new.mail.yahoo.com/addresses

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

  


[delphi-br] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico Douglas Takahara
eh o seguinte...
eu tentei do jeito que vc falou  e n deu certoo...

eu tenho o dbgrid com dados de usuário por exemplo, como campos., cpf,
nome, rg, etc...
Eu gostaria que se fosse necessário deletaria a linha selecionada do
dbgrid...


--- Em delphi-br@yahoogrupos.com.br, Vinicius Santos - MSI
[EMAIL PROTECTED] escreveu

 Eu li o histórico do post
 Pq vc não pega o CPF, diretamente da tabela ??
 
 SQL.Add('DELETE FROM TABLE WHERE CPF =' +
QuotedStr(TabelaCPF.AsString)) ;
 
 Qual o motivo, de vc querer pegar o campo selecionado ?? isso
resolveria seu problema cara !
 
 Vinicius dos Santos
 Blog: http://tuplas.blogspot.com
 http://www.msisolucoes.com.br
 
 
   - Original Message - 
   From: Douglas Takahara 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Thursday, July 17, 2008 9:17 AM
   Subject: [delphi-br] Re: Exclusão dbgrid!!
 
 
   Vinicius Santos,
 
   Obrigado pelo chute, porém minha tabela tem chaves primárias sim.
 
   --- Em delphi-br@yahoogrupos.com.br, Vinicius Santos - MSI
   vinicius@ escreveu
   
Desculpa me intrometer, eu não estou acompanhando este Post
vou dar um belo de um chute, sua tabela tem chaves primárias ?? se
   não tiver chaves primárias, provavelmente é isso !

Vinicius dos Santos
Blog: http://tuplas.blogspot.com
http://www.msisolucoes.com.br

- Original Message - 
From: Douglas Takahara 
To: delphi-br@yahoogrupos.com.br 
Sent: Wednesday, July 16, 2008 6:49 PM
Subject: [delphi-br] Re: Exclusão dbgrid!!


Daniel Bastos,

Eu consigo deletar os dados, porem nem sempre deleta os dados que eu
quero.. eu seleciono a field que eu quero deletar, por exemplo,
porem
n deleta o field que selecionei e sim outro.

--- Em delphi-br@yahoogrupos.com.br, Daniel Bastos danbastos@
escreveu

 Um chute.. até pq não trabalho a um tempo com dbx :)
 Será que este delete não pode estar pendente de um commit?
 Pq se ele atualiza os dados e não aparece, pode estar usando o
isolamento
 transacional ReadCommited. Mas, sem commit, realmente não
   aparecerá no
 dbgrid.
 
 Abs.
 Daniel A. Bastos
 
 2008/7/16 Douglas Takahara douglashideki@:
 
  Rubem,
 
  Com relação a primeira pergunta , acredito que realmente o
   selected
  field n corresponde ao campo que contém cpf..
 
  Quanto a segunda pergunta..
  sim , eu abro e fecho novamente a consulta...
 
  --- Em delphi-br@yahoogrupos.com.br
   delphi-br%40yahoogrupos.com.br,
  Rubem Nascimento da Rocha
  djpardalrocha@ escreveu
 
  
  
   Acho que vc está cometendo um equivoco. Vc usa
   DBGrid.SelectedField
  para pegar o valor da chave (por assim dizer) que será usada
   para a
  exclusão, mas será que o SelectedField do DBGrid, no momento da
  deleção, corresponde mesmo ao campo que contém o CPF? Outra
coisa,
  depois da deleção, vc fecha e depois abre a consulta do DBGrid?
  
   Sds.
  
   
To: delphi-br@yahoogrupos.com.br
   delphi-br%40yahoogrupos.com.br
From: douglashideki@
 
Date: Wed, 16 Jul 2008 17:07:55 +
Subject: [delphi-br] Exclusão dbgrid!!
   
   
Boa tarde,
   
Estou tentando excluir uma linha do dbgrid por um button,
coloquei o
seguinte:
   
if MessageDlg ('Tem certeza que deseja excluir a
informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then
begin
   
with DataModule.SQLQuery do begin
close;
sql.Clear;
SQL.Add('DELETE FROM TABLE WHERE CPF =
'+QuotedStr(DBGrid.SelectedField.AsString)+' ');
ExecSQL;
   
   
Close;
   
end;
   
Showmessage('Registro excluí­do com sucesso!');
end
Else
Showmessage('Operação cancelada!');
   
Gostaria de quando o usuario clicasse neese buton fosse
   deletado a
linha selecionada... Acontece que deletar até deleta, mas ás
vezes nao
delete a linha que está selecionada...
   
essa parte +QuotedStr(DBGrid.SelectedField.AsString)+'
   eh assim
mesmo?
   
   
   
  
   __
   Instale a Barra de Ferramentas com Desktop Search e ganhe
   EMOTICONS
  para o Messenger! É GRÁTIS!
   http://www.msn.com.br/emoticonpack
  
 
  
 
 
 
 [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]





[delphi-br] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico Douglas Takahara
Bom..
Agora que percebi..
na verdade ele sempre apaga o primeiro registro que esta no dbgrid
eu gostaria que ele apagasse a determinada linha selecionada

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

 Rubem,
 
 Com relação a primeira pergunta , acredito que realmente o selected
 field n corresponde ao campo que contém cpf.. 
 
 Quanto a segunda pergunta..
 sim , eu abro e fecho novamente a consulta...
 
 
 
 
 --- Em delphi-br@yahoogrupos.com.br, Rubem Nascimento da Rocha
 djpardalrocha@ escreveu
 
  
  Acho que vc está cometendo um equivoco. Vc usa DBGrid.SelectedField
 para pegar o valor da chave (por assim dizer) que será usada para a
 exclusão, mas será que o SelectedField do DBGrid, no momento da
 deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
 depois da deleção, vc fecha e depois abre a consulta do DBGrid?
  
  Sds.
  
  
   To: delphi-br@yahoogrupos.com.br
   From: douglashideki@
   Date: Wed, 16 Jul 2008 17:07:55 +
   Subject: [delphi-br] Exclusão dbgrid!!
   
   
   Boa tarde,
   
   Estou tentando excluir uma linha do dbgrid por um button, coloquei o
   seguinte:
   
   if MessageDlg ('Tem certeza que deseja excluir a
   informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
   
   with DataModule.SQLQuery do begin
   close;
   sql.Clear;
   SQL.Add('DELETE FROM TABLE WHERE CPF =
   '+QuotedStr(DBGrid.SelectedField.AsString)+' ');
   ExecSQL;
   
   
   Close;
   
   end;
   
   Showmessage('Registro excluí­do com sucesso!');
   end
   Else
   Showmessage('Operação cancelada!');
   
   Gostaria de quando o usuario clicasse neese buton fosse deletado a
   linha selecionada... Acontece que deletar até deleta, mas ás
vezes nao
   delete a linha que está selecionada...
   
   essa parte +QuotedStr(DBGrid.SelectedField.AsString)+' eh assim
   mesmo?
   
   
   
  
  _
  Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS
 para o Messenger! É GRÁTIS!
  http://www.msn.com.br/emoticonpack
 





[delphi-br] Como imprimir um Quick Report?

2008-07-17 Por tôpico wellingtoncfgomes
Caros amigos!!! Sou iniciante em Delphi e gostaria de saber como
imprimir um relatório feito no quick report básico instalado no
Delphi? Desde já agradeço a ajuda.



Re: [delphi-br] Como imprimir um Quick Report?

2008-07-17 Por tôpico Adriano Santos (Yahoo)
Nome_Componente_QuickReport.Print;

wellingtoncfgomes respondeu:

 Caros amigos!!! Sou iniciante em Delphi e gostaria de saber como
 imprimir um relatório feito no quick report básico instalado no
 Delphi? Desde já agradeço a ajuda.

 
 No virus found in this incoming message.
 Checked by AVG - http://www.avg.com 
 Version: 8.0.138 / Virus Database: 270.5.1/1559 - Release Date: 17/7/2008 
 18:08
   

-- 
Boa Leitura,

Adriano Santos
Development Manager SoftPark
Editor Técnico Revistas ClubeDelphi e WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br



Re: [delphi-br] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico berdam
pege o código selecionado através do cdsCODIGO.asString e de um delete

Douglas Takahara escreveu:

 Bom..
 Agora que percebi..
 na verdade ele sempre apaga o primeiro registro que esta no dbgrid
 eu gostaria que ele apagasse a determinada linha selecionada

 --- Em delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br, Douglas Takahara
 [EMAIL PROTECTED] escreveu
 
  Rubem,
 
  Com relação a primeira pergunta , acredito que realmente o selected
  field n corresponde ao campo que contém cpf..
 
  Quanto a segunda pergunta..
  sim , eu abro e fecho novamente a consulta...
 
 
 
 
  --- Em delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br, Rubem Nascimento da Rocha
  djpardalrocha@ escreveu
  
  
   Acho que vc está cometendo um equivoco. Vc usa DBGrid.SelectedField
  para pegar o valor da chave (por assim dizer) que será usada para a
  exclusão, mas será que o SelectedField do DBGrid, no momento da
  deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
  depois da deleção, vc fecha e depois abre a consulta do DBGrid?
  
   Sds.
  
   
To: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
From: douglashideki@
Date: Wed, 16 Jul 2008 17:07:55 +
Subject: [delphi-br] Exclusão dbgrid!!
   
   
Boa tarde,
   
Estou tentando excluir uma linha do dbgrid por um button, coloquei o
seguinte:
   
if MessageDlg ('Tem certeza que deseja excluir a
informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
   
with DataModule.SQLQuery do begin
close;
sql.Clear;
SQL.Add('DELETE FROM TABLE WHERE CPF =
'+QuotedStr(DBGrid.SelectedField.AsString)+' ');
ExecSQL;
   
   
Close;
   
end;
   
Showmessage('Registro excluí­do com sucesso!');
end
Else
Showmessage('Operação cancelada!');
   
Gostaria de quando o usuario clicasse neese buton fosse deletado a
linha selecionada... Acontece que deletar até deleta, mas ás
 vezes nao
delete a linha que está selecionada...
   
essa parte +QuotedStr(DBGrid.SelectedField.AsString)+' eh assim
mesmo?
   
   
   
  
   __
   Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS
  para o Messenger! É GRÁTIS!
   http://www.msn.com.br/emoticonpack 
 http://www.msn.com.br/emoticonpack
  
 

  

-- 
-
Uberdam Cavaletti
Formado em Tecnologia da informação - Unoesc - Xxe
Pós graduando em Desenvolvimento Java - Unoesc - Xxe

Acesse  http://www.curricular.com.br/berdam
Acesse  http://passandoveneno.blogspot.com

-



Re: [delphi-br] query

2008-07-17 Por tôpico Guaranta Almeida
aparentemente não tem nenhum problema ... qual a mensagem do erro  !?

--- Em qui, 17/7/08, Eduardo Silva dos Santos [EMAIL PROTECTED] escreveu:

De: Eduardo Silva dos Santos [EMAIL PROTECTED]
Assunto: Re: [delphi-br] query
Para: delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 17 de Julho de 2008, 17:32






Parece que seu case ta errado...

não sei no PostGree mas no MySQL é assim

Case NomeDoCampo
when '1' then 'Pago'
when '2' then 'Aberto'
end as Nome_Virtual_ para_o_Campo

2008/7/17 rzzanatta [EMAIL PROTECTED] com.br:

 olá tenho essa sql dentro da query, mas nao funciona a parte do case, o
 q está errado?
 select fk_cliente,
 case when tipo=0 then 'Software'
 when tipo=1 then 'Hardware' end as tipo,
 data,
 descricao,
 valorminimo,
 qtdemodulos,
 precomodulo,
 descontomodulo,
 valorbruto,
 descontovalorbruto,
 valorfinal
 from contratos
 order by tipo

 delphi + Postgree

 


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

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



Re: [delphi-br] integração de software com nota fiscal paulista

2008-07-17 Por tôpico Ricardo César Cardoso
Cara, se inscreve na lista Automação Total do Yahoo. Nas mensagens desta lista 
tem várias boas explicações sobre o assunto.

Atte,
Ricardo.

--- Em qui, 17/7/08, Paulo Batalhão [EMAIL PROTECTED] escreveu:
De: Paulo Batalhão [EMAIL PROTECTED]
Assunto: [delphi-br] integração de software com nota fiscal paulista
Para: Grupo - Delphi Brasil delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 17 de Julho de 2008, 12:05











Amigos, bom dia!



Quais as regras para implantação do nota fiscal Paulista ??? é via software 
mesmo ? onde obtenho mais informações ???



desde ja agradeço 



Att' Paulo Batalhão



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



Re: [delphi-br] ( OFF ) Programar para celulares e PDAs

2008-07-17 Por tôpico Ricardo César Cardoso
Tem sim... JBuilder. Mas particularmente sugiro NetBeans ( mobility pack ) ou 
Eclipse se quiser trabalhar com Java. Até dá pra fazer boas coisas com FPC mas 
existe pouca semelhança com o Delphi. 

As grandes vantagens são o fato de tanto FPC ( FreePascal Compiler ) quanto 
NetBeans e Eclipse são free. E muitos frameworks para desenvolvimento tb são.

Atte,
Ricardo.

--- Em qui, 17/7/08, Luis Hilário Tobler Garcia [EMAIL PROTECTED] escreveu:
De: Luis Hilário Tobler Garcia [EMAIL PROTECTED]
Assunto: [delphi-br] Programar para celulares e PDAs
Para: delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 17 de Julho de 2008, 12:02











Boa tarde pessoal,

sei que não é assunto específico desta lista, mas estou interessado em aprender 
a programar para dispositivos móveis, celulares ou PDAs, me parece que a melhor 
alternativa é usar Java como linguagem, alguém saberia me dizer se a borland 
oferece alguma IDE que suporte este tipo de função ou mesmo alguma outra 
ferramenta e ou grupo de discussão para esta finalidade?



Obrigado, Hilário.



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