RES: [delphi-br] Delphi 2010 ta doido?

2010-08-26 Por tôpico Rubem Rocha
Poste as declarações que você usou no RAD Studio 2010! Assim você ajuda
aqueles outros colegas que tem (ou poderão vir a ter) o mesmo problema que
você, além de ser uma forma de ser grato à lista! Porque só o “‘venha a
nós’, e ‘ao vosso reino’ nada” é meio chato, não?

 

Sds.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Iran Lima
Enviada em: quarta-feira, 25 de agosto de 2010 12:51
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Delphi 2010 ta doido?

 

  

Resolvido.

O problema era exatamente nas declarações.

Obrigado amigo.

De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Clairton
Enviada em: terça-feira, 24 de agosto de 2010 18:54
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Assunto: Re: [delphi-br] Delphi 2010 ta doido?

a Declaração das funçoes tbm tem que estar com o Ansi...

function Bematech_FI_VendeItem( Codigo: AnsiString; Descricao: 
AnsiString; Aliquota: AnsiString; TipoQuantidade: AnsiString; 
Quantidade: AnsiString; CasasDecimais: Integer; ValorUnitario: 
AnsiString; TipoDesconto: AnsiString; Desconto: AnsiString): Integer; 
StdCall; External 'BEMAFI32.DLL';

Att.:

Clairton Eloisio Müller

Em 24/08/2010 18:46, Iran Lima escreveu:

 Já tentei com pansichar

 E nada.

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 [mailto:delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br] Em
 nome de Roni Rodrigo
 Enviada em: terça-feira, 24 de agosto de 2010 18:27
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Delphi 2010 ta doido?

 tenta converter em pansichar...
 ex:
 Bematech_FI_VendeItem(PAnsiChar(codigo), PAnsiChar(descricao),
 PAnsiChar(aliquota)...

 Em 24/08/2010 17:01, Iran Lima escreveu:
  Gente to com um problema ao passar parâmetros strings no Delphi 2010 ,
 
  Exemplo: Se eu usar um SaveToFile(arquivo.txt) o arquivo gerado fica 
 nome
  a sem extensão.
 
  Outro Exemplo ao chamar o método da Bemafi32.dll
 
  Bematech_FI_VendeItem( 'codigo', descricao, aliquota,
 
  sTipoQtde, FormatFloat('0', quantidade), iDecimal,
 
  FormatFloat('0.00',valorUnitario),
 
  sTipoDesconto, FormatFloat('0.00',0) );
 
  so vai a primeira letra de cada parâmetro
 
  2010-08-24 16:53:57 - Parâmetros: 0|S|I|I|0|2|1|$|0 (Log da
  impressora), no
  Debug passa tudo blz mas a impressora recebe errado
 
  O que pode ser isso???
 
  [As partes desta mensagem que não continham texto foram removidas]

 

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 

-- 

*Inovação é o combustível do crescimento.*

*Clairton Eloísio Müller*
Depto. Desenvolvimento
E-mail: clair...@dessis.com.br mailto:clairton%40dessis.com.br
mailto:clairton%40dessis.com.br
mailto:clair...@dessis.com.br mailto:clairton%40dessis.com.br
mailto:clairton%40dessis.com.br 
Site: http://www.dessis.com.br

*Dessis Sistemas de Gestão Empresarial*

Rua José Marangoni, 380 - Vila Nova Cx. Postal 417

CEP: 89259-500 - Jaraguá do Sul - SC

Fone/Fax: (0xx 47)3371-7842/3371-2640/3371-7144




 



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



RES: [delphi-br] Delphi 2010 ta doido?

2010-08-26 Por tôpico Iran Lima
 

Mudei tudo pra ANSI e não resolveu ainda 

 

function Bematech_FI_VendeItem( Codigo: AnsiString; Descricao: AnsiString;
Aliquota: AnsiString; TipoQuantidade: AnsiString; Quantidade: AnsiString;
CasasDecimais: Integer; ValorUnitario: AnsiString; TipoDesconto: AnsiString;
Desconto: AnsiString): Integer; StdCall; External 'BEMAFI32.DLL';

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Clairton
Enviada em: terça-feira, 24 de agosto de 2010 18:54
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Delphi 2010 ta doido?

 

  

a Declaração das funçoes tbm tem que estar com o Ansi...

function Bematech_FI_VendeItem( Codigo: AnsiString; Descricao: 
AnsiString; Aliquota: AnsiString; TipoQuantidade: AnsiString; 
Quantidade: AnsiString; CasasDecimais: Integer; ValorUnitario: 
AnsiString; TipoDesconto: AnsiString; Desconto: AnsiString): Integer; 
StdCall; External 'BEMAFI32.DLL';

Att.:

Clairton Eloisio Müller

Em 24/08/2010 18:46, Iran Lima escreveu:

 Já tentei com pansichar

 E nada.

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br  
 mailto:delphi-br%40yahoogrupos.com.br 
 [mailto:delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br  
 mailto:delphi-br%40yahoogrupos.com.br] Em
 nome de Roni Rodrigo
 Enviada em: terça-feira, 24 de agosto de 2010 18:27
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Delphi 2010 ta doido?

 tenta converter em pansichar...
 ex:
 Bematech_FI_VendeItem(PAnsiChar(codigo), PAnsiChar(descricao),
 PAnsiChar(aliquota)...

 Em 24/08/2010 17:01, Iran Lima escreveu:
  Gente to com um problema ao passar parâmetros strings no Delphi 2010 ,
 
  Exemplo: Se eu usar um SaveToFile(arquivo.txt) o arquivo gerado fica 
 nome
  a sem extensão.
 
  Outro Exemplo ao chamar o método da Bemafi32.dll
 
  Bematech_FI_VendeItem( 'codigo', descricao, aliquota,
 
  sTipoQtde, FormatFloat('0', quantidade), iDecimal,
 
  FormatFloat('0.00',valorUnitario),
 
  sTipoDesconto, FormatFloat('0.00',0) );
 
  so vai a primeira letra de cada parâmetro
 
  2010-08-24 16:53:57 - Parâmetros: 0|S|I|I|0|2|1|$|0 (Log da
  impressora), no
  Debug passa tudo blz mas a impressora recebe errado
 
  O que pode ser isso???
 
  [As partes desta mensagem que não continham texto foram removidas]

 

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 

-- 

*Inovação é o combustível do crescimento.*



*Clairton Eloísio Müller*
Depto. Desenvolvimento
E-mail: clair...@dessis.com.br mailto:clairton%40dessis.com.br
mailto:clair...@dessis.com.br mailto:clairton%40dessis.com.br 
Site: http://www.dessis.com.br



*Dessis Sistemas de Gestão Empresarial*

Rua José Marangoni, 380 - Vila Nova Cx. Postal 417

CEP: 89259-500 - Jaraguá do Sul - SC

Fone/Fax: (0xx 47)3371-7842/3371-2640/3371-7144

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





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



[delphi-br] Duplicidade de dados

2010-08-26 Por tôpico Ricardo Rocha
  Olá à todos!
Tenho uma dúvida sobre qual a melhor forma para tratar a duplicidade de 
dados em uma aplicação. Seria a melhor forma tratar na aplicação em si 
ou atraves do banco de dados criando campos do tipo (unique)?

Obrigado.



Re: [delphi-br] Migrar delphi 7 para Delphi 2010.

2010-08-26 Por tôpico Alan ricardo Souza
Bom dia,
 
No inicio quando lançou o delphi 2010 tinha muitos problemas em relação algumas 
rotinas alterada na nova versão do dephi 2010, mas a migração é tranquila no 
Delphi 2010 com update 4/5 pois ja não encontrei os bugs anteriores, só que 
alguns tipos de campos mudaram como por exemplo pchar agora é pansichar e assim 
vai, mas 80% aproveita da versão antiga e precisa limpar todos os fields dos 
clientedataset (caso vc usa) e adicionar novamente pois mudam os tipos de 
campos.

--- Em qua, 25/8/10, Samuel M. Basso samuelba...@yahoo.com.br escreveu:


De: Samuel M. Basso samuelba...@yahoo.com.br
Assunto: [delphi-br] Migrar delphi 7 para Delphi 2010.
Para: delphi-br@yahoogrupos.com.br
Data: Quarta-feira, 25 de Agosto de 2010, 13:13


  



Bom dia Pessoal.

Gostaria de trocar algumas dicas e ideias sobre migração de aplicação feita
em delphi 7 para delphi 2010 se é tranquilo, o que muda? Se é complicado ou
não?

To muito afim de fazer a migração porem não sei o quanto é dificil ou não.

-- 
Atenciosamente,

Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.com
Web site: www.otimizy.com.br

[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] Duplicidade de dados

2010-08-26 Por tôpico Josimar Zimermann
  Olá Ricardo Rocha, ex-zagueiro da seleção (hehehehe... brincadeirinha)

O mundo da Modalagem de Banco de Dados não é um mar de rosas. Mas a 
doutrina que se prega na Universidade é:

O SGBD deve ser capaz de garantir a integridade dos dados.

Portanto, o ideal é modelar seu Banco de Dados de tal forma que você não 
precise efetuar tratamentos e verificações na aplicação para garantir a 
integridade dos dados.

Saudações,
Josimar Zimermann

Em 25/8/2010 19:15, Ricardo Rocha escreveu:

 Olá à todos!
 Tenho uma dúvida sobre qual a melhor forma para tratar a duplicidade de
 dados em uma aplicação. Seria a melhor forma tratar na aplicação em si
 ou atraves do banco de dados criando campos do tipo (unique)?

 Obrigado.





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



Re: [delphi-br] Problemas com MySQL 5.1 e Delphi 2010

2010-08-26 Por tôpico Eduardo Silva dos Santos
Lucas, não uso DbEdit mais vou fazer um teste aqui. Qual versão do MyDAC
você ta usando?


Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


Em 26 de agosto de 2010 08:33, Lucas Eduardo Barao Neves 
lucas_del...@yahoo.com.br escreveu:



 Bom dia pessoal.

 Estou com um problema com campos do tipo float e DBEdit no Delphi 2010 com
 MySQL5.1.

 O problema é o seguinte: crio meu campo no MySQL como float de 16,2. Na
 aplicação coloco um dbedit e quando tento preenchê-lo colocando vírgula
 como
 separador decimal ele dá o seguinte erro:

 ---
 Project raised exception class EDatabaseError with message ''1,25' is not a

 valid floating point value for field 'Valor Gasolina''.
 ---

 Se eu apagar o valor e digitar ponto como separador, por ex. 1.25, ele não
 aceita, aliás, o dbedit nem deixa eu digitar o '.', aceitando somente a
 vírgula.

 Alguém saberia por que isso acontece e como posso resolver?

 Para referência, estou usando os componentes MyDAC.

 Grato a todos,

 Lucas Neves

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

  



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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

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




Re: [delphi-br] Problemas com MySQL 5.1 e Delphi 2010

2010-08-26 Por tôpico Alisson
Isso está parecendo erro de configuraçãode configurações regionais o caracter 
para valor decimal. No painel de controle-configurações regionais e estiver 
configurado com ., mude para ,. Você pode fazer essa mudança no seu 
aplicatico colocando na seção Initialization :DecimalSeparator := ',';



  - Original Message - 
  From: Lucas Eduardo Barao Neves 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 26, 2010 8:33 AM
  Subject: [delphi-br] Problemas com MySQL 5.1 e Delphi 2010



  Bom dia pessoal.

  Estou com um problema com campos do tipo float e DBEdit no Delphi 2010 com 
  MySQL5.1.

  O problema é o seguinte: crio meu campo no MySQL como float de 16,2. Na 
  aplicação coloco um dbedit e quando tento preenchê-lo colocando vírgula como 
  separador decimal ele dá o seguinte erro:

  ---
  Project raised exception class EDatabaseError with message ''1,25' is not a 
  valid floating point value for field 'Valor Gasolina''.
  ---

  Se eu apagar o valor e digitar ponto como separador, por ex. 1.25, ele não 
  aceita, aliás, o dbedit nem deixa eu digitar o '.', aceitando somente a 
vírgula.

  Alguém saberia por que isso acontece e como posso resolver?

  Para referência, estou usando os componentes MyDAC.

  Grato a todos,

  Lucas Neves


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



Res: [delphi-br] Problemas com MySQL 5.1 e Delphi 2010

2010-08-26 Por tôpico Lucas Eduardo Barao Neves
Eu não queria mudar uma configuração regional, pelo menos em nível de SO... 
usuário sabe como é... se muda a cor da grama, ele morre de fome... compensa 
encher a tela de edits e tratar dentro da aplicação, hehehehe. Mas vou tentar 
sua segunda dica. Obrigado.






De: Alisson alss...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 26 de Agosto de 2010 9:58:59
Assunto: Re: [delphi-br] Problemas com MySQL 5.1 e Delphi 2010

  
Isso está parecendo erro de configuraçãode configurações regionais o caracter 
para valor decimal. No painel de controle-configurações regionais e estiver 
configurado com ., mude para ,. Você pode fazer essa mudança no seu 
aplicatico colocando na seção Initialization :DecimalSeparator := ',';

- Original Message - 
From: Lucas Eduardo Barao Neves 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, August 26, 2010 8:33 AM
Subject: [delphi-br] Problemas com MySQL 5.1 e Delphi 2010

Bom dia pessoal.

Estou com um problema com campos do tipo float e DBEdit no Delphi 2010 com 
MySQL5.1.

O problema é o seguinte: crio meu campo no MySQL como float de 16,2. Na 
aplicação coloco um dbedit e quando tento preenchê-lo colocando vírgula como 
separador decimal ele dá o seguinte erro:

---
Project raised exception class EDatabaseError with message ''1,25' is not a 
valid floating point value for field 'Valor Gasolina''.
---

Se eu apagar o valor e digitar ponto como separador, por ex. 1.25, ele não 
aceita, aliás, o dbedit nem deixa eu digitar o '.', aceitando somente a vírgula.

Alguém saberia por que isso acontece e como posso resolver?

Para referência, estou usando os componentes MyDAC.

Grato a todos,

Lucas Neves

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


 


  

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



[delphi-br] Ordenacao em cxGrid

2010-08-26 Por tôpico Murilo Cunha
  Pessoal,

Como eu faço a ordenacao no grid cxGrid?
Quero que ao clicar no titulo da coluna do cxGrid as informacoes sejam 
colocadas em ordem alfabetica.

Lembrando que meu cxGrid estah conectado a um TClientDataSet e nao quero 
colocar o ORDER BY na instrucao SELECT.


Obrigado
MuriloCunha



RES: [delphi-br] Ordenacao em cxGrid

2010-08-26 Por tôpico Rubem Rocha
Tem “catrabilhões” de dicas para ordenação de ClientDataSet na Internet, e
da maneira que você quer, sem essa ‘lusitanice’ de construir um ORDER BY pra
receber novamente os dados, gerando tráfego inútil na rede e denegrindo
desempenho tanto da aplicação como da própria rede. Se bobear, pode acabar
encontrando também nas mensagens antigas da lista, em
http://br.groups.yahoo.com/group/delphi-br/messages.

 

Boa sorte.

Sds.

 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Murilo Cunha
Enviada em: quinta-feira, 26 de agosto de 2010 09:28
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Ordenacao em cxGrid

 

  

Pessoal,

Como eu faço a ordenacao no grid cxGrid?
Quero que ao clicar no titulo da coluna do cxGrid as informacoes sejam 
colocadas em ordem alfabetica.

Lembrando que meu cxGrid estah conectado a um TClientDataSet e nao quero 
colocar o ORDER BY na instrucao SELECT.

Obrigado
MuriloCunha



 



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



Re:[delphi-br] Ordenacao em cxGrid

2010-08-26 Por tôpico Malomar Alex Seminotti
 Murilo,

Vc pode setar a propriedade SortOrder, da coluna desejada, para soAscending.
No TableView, por exemplo, existe a propriedade ColumnSorting, dentro de 
OptionsCustomize, que permite ao usuário ordenar o grid clicando no título da 
coluna desejada em tempo de execução. Para retirar a ordenação, basta clicar 
segurando CTRL.

Qq coisa, estamos aí.

[]'s
Malomar Alex Seminotti
Erechim - RS


- Mensagem Original -Data: Quinta-feira, 26 de Agosto 
de 2010 10:28De: Murilo Cunha  lt; mcscu...@yahoo.com.br gt;Para: 
delphi...@yahoogrupos.com.brassunto: [delphi-br] Ordenacao em cxGrid  
  Pessoal, 
 
Como eu faço a ordenacao no grid cxGrid? 
Quero que ao clicar no titulo da coluna do cxGrid as informacoes sejam  
colocadas em ordem alfabetica. 
 
Lembrando que meu cxGrid estah conectado a um TClientDataSet e nao quero  
colocar o ORDER BY na instrucao SELECT. 
 
 
Obrigado 
MuriloCunha 
 
 
 
 
 
--  
lt; lt; lt; lt; lt;  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
gt;gt;gt;gt;gt; 
 
lt; *gt; Para ver as mensagens antigas, acesse: 
http://br.groups.yahoo.com/group/delphi-br/messages 
 
lt; *gt; Para falar com o moderador, envie um e-mail para: 
delphi-br-ow...@yahoogrupos.com.br 
Links do Yahoo! Grupos 
 
lt; *gt; Para visitar o site do seu grupo na web, acesse: 
http://br.groups.yahoo.com/group/delphi-br/ 
 
lt; *gt; Para sair deste grupo, envie um e-mail para: 
delphi-br-unsubscr...@yahoogrupos.com.br 
 
lt; *gt; O uso que você faz do Yahoo! Grupos está sujeito aos: 
http://br.yahoo.com/info/utos.html 
 
 
 


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



RES: [delphi-br] Delphi 2010 ta doido?

2010-08-26 Por tôpico Iran Lima
Acho que não precisaria postar pois da pra mudar tudo em 10s usando o
Replace de String para AnsiString

 

Mas to aqui pra ajudar no que puder Tb.

 

Valeu pessoal.

 

 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Rubem Rocha
Enviada em: quarta-feira, 25 de agosto de 2010 18:33
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Delphi 2010 ta doido?
Prioridade: Alta

 

  

Poste as declarações que você usou no RAD Studio 2010! Assim você ajuda
aqueles outros colegas que tem (ou poderão vir a ter) o mesmo problema que
você, além de ser uma forma de ser grato à lista! Porque só o “‘venha a
nós’, e ‘ao vosso reino’ nada” é meio chato, não?

Sds.

De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Iran Lima
Enviada em: quarta-feira, 25 de agosto de 2010 12:51
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Assunto: RES: [delphi-br] Delphi 2010 ta doido?

Resolvido.

O problema era exatamente nas declarações.

Obrigado amigo.

De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Clairton
Enviada em: terça-feira, 24 de agosto de 2010 18:54
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
Assunto: Re: [delphi-br] Delphi 2010 ta doido?

a Declaração das funçoes tbm tem que estar com o Ansi...

function Bematech_FI_VendeItem( Codigo: AnsiString; Descricao: 
AnsiString; Aliquota: AnsiString; TipoQuantidade: AnsiString; 
Quantidade: AnsiString; CasasDecimais: Integer; ValorUnitario: 
AnsiString; TipoDesconto: AnsiString; Desconto: AnsiString): Integer; 
StdCall; External 'BEMAFI32.DLL';

Att.:

Clairton Eloisio Müller

Em 24/08/2010 18:46, Iran Lima escreveu:

 Já tentei com pansichar

 E nada.

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 [mailto:delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br] Em
 nome de Roni Rodrigo
 Enviada em: terça-feira, 24 de agosto de 2010 18:27
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Delphi 2010 ta doido?

 tenta converter em pansichar...
 ex:
 Bematech_FI_VendeItem(PAnsiChar(codigo), PAnsiChar(descricao),
 PAnsiChar(aliquota)...

 Em 24/08/2010 17:01, Iran Lima escreveu:
  Gente to com um problema ao passar parâmetros strings no Delphi 2010 ,
 
  Exemplo: Se eu usar um SaveToFile(arquivo.txt) o arquivo gerado fica 
 nome
  a sem extensão.
 
  Outro Exemplo ao chamar o método da Bemafi32.dll
 
  Bematech_FI_VendeItem( 'codigo', descricao, aliquota,
 
  sTipoQtde, FormatFloat('0', quantidade), iDecimal,
 
  FormatFloat('0.00',valorUnitario),
 
  sTipoDesconto, FormatFloat('0.00',0) );
 
  so vai a primeira letra de cada parâmetro
 
  2010-08-24 16:53:57 - Parâmetros: 0|S|I|I|0|2|1|$|0 (Log da
  impressora), no
  Debug passa tudo blz mas a impressora recebe errado
 
  O que pode ser isso???
 
  [As partes desta mensagem que não continham texto foram removidas]

 

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 

-- 

*Inovação é o combustível do crescimento.*

*Clairton Eloísio Müller*
Depto. Desenvolvimento
E-mail: clair...@dessis.com.br mailto:clairton%40dessis.com.br
mailto:clairton%40dessis.com.br
mailto:clairton%40dessis.com.br
mailto:clair...@dessis.com.br mailto:clairton%40dessis.com.br
mailto:clairton%40dessis.com.br
mailto:clairton%40dessis.com.br 
Site: http://www.dessis.com.br

*Dessis Sistemas de Gestão Empresarial*

Rua José Marangoni, 380 - Vila Nova Cx. Postal 417

CEP: 89259-500 - Jaraguá do Sul - SC

Fone/Fax: (0xx 47)3371-7842/3371-2640/3371-7144

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

2010-08-26 Por tôpico Roni Rodrigo
sugiro que use o padrão de projeto composite
http://pt.wikipedia.org/wiki/Composite
http://sourcemaking.com/design_patterns/composite/delphi

o/

Em 25/08/2010 19:13, marcosdoerner escreveu:
 Ola a todos,

 estou criando uma classe na minha regra de negocio mais ou menos da 
 seguinte forma

 Type
 TminhaClasse = Class
 private
 atributo1 : string;
 atributo2 : string;
 atributo3 : string;
 classePai : TminhaClasse;
 public
 ...
 end;

 A minha duvida é como declaro o atributo classePai já que a minha 
 TminhaClasse ainda não foi declarada.
 E a classePai pode conter ou não a estrutura e acaba sendo recursiva,
 o Pai pode ter um pai e assim por diante.

 Marcos




[delphi-br] Como subtrair horas corretas

2010-08-26 Por tôpico alexsandro_qs
Boa noite pessoal;

Eu tinha feito uma forma de subtrair 2 horas aqui, e até à um tempinho
atrás, estava tudo ok. Só que agora pintou um problema:


era feito assim:
---
var 
h1, h2, resultado  : TDateTime;
begin

d1:= StrToTime(adotDatainicial.Value);
d2:= StrToTime(adotDatainicia2.Value);
resultado := d2 - d1;

---
Só que quando  é digitado 24:00, esse valor não é reconhecido 
como horas ai os erros.

Alguém poderia me ajudar com isso ?

OBS.: a hora nunca vai passar de 24:00 ( ou seja de um dia para o outro)

Ex.: saída 24:00 - entrada 01:00  = 23:00 e não 23:60











Re: [delphi-br] Migrar delphi 7 para Delphi 2010.

2010-08-26 Por tôpico Marcos Alexandre Lemos Rodrigues
Pois é, também estamos tendo vários probleminhas com as versões mais novas
no Delphi antigo. As APIs do Windows devem ter mudado muito e a cada release
é uma surpresa: servidor de aplicação que não inicia como serviço, socket
que não levanta em ambiente 64 bits, app que cai, etc.

Mais um motivo pra atualiar o Delphi pras versões mais novas, já que se
formos analisar, até que o Delphi 7 rodou bem por vários anos depois de
encerrado o suporte.

Em 25 de agosto de 2010 12:25, Marcos Abreu Ferreira 
maferreira...@gmail.com escreveu:

 Bruno,

 Desenvolvi uma aplicação para um cliente no Delphi 7 e funciona
 perfeitamente no Windows XP. Recentemente ele foi testar a aplicação no
 Windows Vista e ela não funciona direito. O meu ambiente é Windows XP Pro +
 Delphi 7. Será que pode dar problema na hora do sistema rodar no Windows
 Vista por causa dos problemas de direito de gravação na pasta do sistema,
 pois a cada informação recebida, o meu sistema grava ela num arquivo texto.


 2010/8/25 Bruno Lichot bruno.lic...@microfocus.com

 
 
  Oi Samuel,
 
  Todas as minhas migrações foram tranqüilas. É necessário alguns pontos de
  atenção:
 
  - Primeiro passo é certificar que todos os componentes de terceiros que
 usa
  já estão instalados com as devidas versões no Delphi 2010 ou se você tem
 os
  fontes, que já tenha feito o build e instalado no Delphi 2010.
 
  - Faça um backup do seu projeto e crie uma nova pasta para o projeto a
 ser
  migrado no Delphi 2010.
 
  - Apague todos os arquivos que NÃO sejam os .pas, .dfm e .dpr
 
  - Abra o dpr no Delphi 2010, configure todas as opções de projetos
  relevantes que você usa e de um build.
 
  O único trabalho que tive foi no uso de interfaces, APIs e funções que
  obrigatoriamente trabalham com AnsiString onde tive que usar typecast ou
  acertar alguma parte do código. O compilador te ajuda muito nesse
 processo e
  o Delphi migra todo o grosso para Unicode. Já migrei todo tipo de
 projeto,
  desde API de hardware, sistemas simples ou compexos client/Server ate
  aplicações de missão critica e web com DataSnap e DBExpress. Todas as
  migrações foram bem tranqüilas e executadas com sucesso.
 
  Não deixe de fazer todos os updates e hostfixes do Delphi, isso ajuda
  bastante.
 
  Abs
 
  Bruno
 
  Segue alguns links que podem te ajudar:
 
  Links Úteis
 
  Site do produto:
 
  http://www.embarcadero.com/products/delphi
 
  http://www.embarcadero.com/products/rad-studio
 
  Por que migrar do Delphi 7:
 
  http://edn.embarcadero.com/br/article/39230
 
  No Developer Network tem o maior e mais completo conteúdo Delphi do mundo
 e
  completamente gratuito:
 
  http://edn.embarcadero.com/br
 
  Central de Recursos:
 
  http://www.embarcadero.com/products/rad-studio/resource-center
 
  Link de Vídeos (Português, Inglês e Espanhol):
 
  http://edn.embarcadero.com/br/article/39777
 
  http://edn.embarcadero.com/article/37460
 
  http://cc.embarcadero.com/coderage
 
  http://edn.embarcadero.com/article/39129
 
  http://etnaweb04.embarcadero.com/rad-studio-2010/
 
  Central de Documentação:
 
  HTTP://docs.embarcadero.com
 
  Meu link de downloads gratuitos:
 
  http://cc.embarcadero.com/author/795118
 
  Central de Código:
 
  http://cc.embarcadero.com
 
  Central de Qualidade:
 
  http://qc.embarcadero.com
 
  Migração: http://www.embarcadero.com/rad-studio-2010-migration-center
 
  DataSnap: http://www.embarcadero-info.com/in_action/radstudio/db.html
 
  REST: http://www.embarcadero-info.com/in_action/radstudio/rest.html
 
  UNICODE:
 
 http://www.embarcadero.com/images/dm/technical-papers/delphi-unicode-migration.pdf
 
  Casos de Sucesso: http://www.embarcadero.com/application-showcase
 
  Link para quem quiser submeter seus casos de sucesso:
  http://www.surveymonkey.com/s.aspx?sm=BNcBkVCUCEDharLhLrmCyg_3d_3d
 
  Delphi Update: http://blogs.embarcadero.com/nickhodges/2009/12/14/39338
 
  Webinars:
 
  Segredos do Delphi:
 
 http://update.codegear.com/forms/AMUSCA0911Delphi2010MigrationWebinar11-17
 
  Posts e Recursos On-line:
 
  Delphi DirectWrite:
  http://blogs.embarcadero.com/pawelglowacki/2009/12/14/38872/
 
  Teste Unitário: http://www.youtube.com/watch?v=nyZnfxDqThE
 
  Protegendo os Dados da sua Aplicação:
 
 http://blogs.embarcadero.com/amannarino/2009/12/11/interbase-2009-discover-the-best-way-to-ensure-secure-data-protection-for-your-applications/
 
  Delphi Recursos On-Line:
  http://blogs.embarcadero.com/pawelglowacki/2009/12/02/38849
 
  Auditoria e Métricas com Delphi:
  http://blogs.embarcadero.com/michaelrozlog/2009/11/23/37000
 
  DataSnap: http://blogs.embarcadero.com/davidi/2009/11/06/39866
 
  Estatisticas de Migração com Unicode:
  http://blogs.embarcadero.com/ao/2009/10/09/39042
 
  Touch Move Demo:
 
  http://chrisbensen.blogspot.com/2009/09/touch-demo-part-i.html
 
  http://chrisbensen.blogspot.com/2009/10/touch-demo-part-ii.html
 
  http://chrisbensen.blogspot.com/2009/10/touch-demo-part-iii.html
 
  

Re: [delphi-br] Migrar delphi 7 para Delphi 2010.

2010-08-26 Por tôpico Marcos Alexandre Lemos Rodrigues
Como eu disse antes, parabéns! Foi o primeiro a não ter problemas com esse e
ainda é o primeiro que considera reescrever um servidor de aplicação do zero
EXATEMENTE igual porque a type library binária corrompeu como sendo uma
vantagem. hehehehe

Você bem que podia ensinar os desenvolvedores da Embarcadero o segredo, já
que tá cheio de bugs relatados a respeito do que eu falei e a maioria ainda
não foi atendido. heheheh



Em 25 de agosto de 2010 13:15, Bruno Lichot
bruno.lic...@microfocus.comescreveu:



 Não uso BDE desde o Delphi 5, realmente ele não me causou nada e venho
 migrando minhas aplicações desde o Delphi 6 e passei por todas as versões:
 Delphi 7, Delphi 2006, Delphi 2007, Delphi 2009 e Delphi 2010.



 Em minhas aplicações DataSnap foi possível reaproveitar os RDMS, mas pela
 nova arquitetura do DataSnap foi muito melhor reescrever todos. Sinceramente
 isso não doeu, ate me ajudou e melhorar alguns procedimentos e reaproveitei
 todo o código ate por que sempre usei muita modularização. Esta mudança foi
 muito benéfica.



 Tive problema zero com providers.



 Não tenho nenhuma aplicação com Sybase e as que usam DB2 funfaram ok.



 From: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br[mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] On Behalf
 Of Marcos Alexandre Lemos Rodrigues
 Sent: quarta-feira, 25 de agosto de 2010 12:09
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Subject: Re: [delphi-br] Migrar delphi 7 para Delphi 2010.





 Foi a primeira vez que vi alguém achar a migração tranquila. heheheh

 Depende muito dos componentes e tecnologias que você usa. Fora os fatores
 já
 citados anteriormente com relação aos componentes de terceitos, e partindo
 do princípio que seu componente de acesso a dados é o BDE, o que nós
 enfretamos:

 1. Ajustes de AnsiStrings, já citados
 2. Alguns componentes Indy também mudaram nomes de propriedades e eventos.
 3. Outro problema que tivemos, foi com relação a Remote Data Modules, que
 na
 hora de ser convertidos o Delphi 2010 não conseguiu migrar os procedimentos

 remotos, tivemos de refazer todo o nosso servidor de aplicação e depois
 colar os componentes e códigos
 4. Nos providers, os métodos GetTableName mudaram o tipo de dado, de String

 pra WideString, precisa ser acertado a mão
 5. Como usamos banco de dados Sybase Anywhere, por algum motivo ele não
 conseguiu ler as stored procedures que possuem parâmetro do tipo Date, Time

 e Timestamp
 6. Nos apliativos que usam DB2, se o parâmetro não tiver um valor default,
 dá um erro de Access Violation

 2010/8/25 Bruno Lichot 
 bruno.lic...@microfocus.combruno.lichot%40microfocus.commailto:
 bruno.lichot%40microfocus.com bruno.lichot%2540microfocus.com 

 
 
  Oi Samuel,
 
  Todas as minhas migrações foram tranqüilas. É necessário alguns pontos de

  atenção:
 
  - Primeiro passo é certificar que todos os componentes de terceiros que
 usa
  já estão instalados com as devidas versões no Delphi 2010 ou se você tem
 os
  fontes, que já tenha feito o build e instalado no Delphi 2010.
 
  - Faça um backup do seu projeto e crie uma nova pasta para o projeto a
 ser
  migrado no Delphi 2010.
 
  - Apague todos os arquivos que NÃO sejam os .pas, .dfm e .dpr
 
  - Abra o dpr no Delphi 2010, configure todas as opções de projetos
  relevantes que você usa e de um build.
 
  O único trabalho que tive foi no uso de interfaces, APIs e funções que
  obrigatoriamente trabalham com AnsiString onde tive que usar typecast ou
  acertar alguma parte do código. O compilador te ajuda muito nesse
 processo e
  o Delphi migra todo o grosso para Unicode. Já migrei todo tipo de
 projeto,
  desde API de hardware, sistemas simples ou compexos client/Server ate
  aplicações de missão critica e web com DataSnap e DBExpress. Todas as
  migrações foram bem tranqüilas e executadas com sucesso.
 
  Não deixe de fazer todos os updates e hostfixes do Delphi, isso ajuda
  bastante.
 
  Abs
 
  Bruno
 
  Segue alguns links que podem te ajudar:
 
  Links Úteis
 
  Site do produto:
 
  http://www.embarcadero.com/products/delphi
 
  http://www.embarcadero.com/products/rad-studio
 
  Por que migrar do Delphi 7:
 
  http://edn.embarcadero.com/br/article/39230
 
  No Developer Network tem o maior e mais completo conteúdo Delphi do mundo
 e
  completamente gratuito:
 
  http://edn.embarcadero.com/br
 
  Central de Recursos:
 
  http://www.embarcadero.com/products/rad-studio/resource-center
 
  Link de Vídeos (Português, Inglês e Espanhol):
 
  http://edn.embarcadero.com/br/article/39777
 
  http://edn.embarcadero.com/article/37460
 
  http://cc.embarcadero.com/coderage
 
  http://edn.embarcadero.com/article/39129
 
  http://etnaweb04.embarcadero.com/rad-studio-2010/
 
  Central de Documentação:
 
  HTTP://docs.embarcadero.com
 
  Meu link de downloads gratuitos:
 
  http://cc.embarcadero.com/author/795118
 
  Central de Código:
 
  http://cc.embarcadero.com
 
  Central de Qualidade:
 
  

Re: [delphi-br] Delphi 2010 ta doido?

2010-08-26 Por tôpico Clairton
  se não deu certo ainda tente mudar os pChar para pAnsichar ou ao 
contrario lembro que tive que fazer um monte de teste para consegui que 
as funções da BEMAFI32.DLL funcionassem corretamente.

Att.:
Clairton E. Müller

Em 25/08/2010 19:28, Iran Lima escreveu:



 Mudei tudo pra ANSI e não resolveu ainda

 function Bematech_FI_VendeItem( Codigo: AnsiString; Descricao: AnsiString;
 Aliquota: AnsiString; TipoQuantidade: AnsiString; Quantidade: AnsiString;
 CasasDecimais: Integer; ValorUnitario: AnsiString; TipoDesconto: 
 AnsiString;
 Desconto: AnsiString): Integer; StdCall; External 'BEMAFI32.DLL';

 De: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 [mailto:delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br] Em
 nome de Clairton
 Enviada em: terça-feira, 24 de agosto de 2010 18:54
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Delphi 2010 ta doido?

 a Declaração das funçoes tbm tem que estar com o Ansi...

 function Bematech_FI_VendeItem( Codigo: AnsiString; Descricao:
 AnsiString; Aliquota: AnsiString; TipoQuantidade: AnsiString;
 Quantidade: AnsiString; CasasDecimais: Integer; ValorUnitario:
 AnsiString; TipoDesconto: AnsiString; Desconto: AnsiString): Integer;
 StdCall; External 'BEMAFI32.DLL';

 Att.:

 Clairton Eloisio Müller

 Em 24/08/2010 18:46, Iran Lima escreveu:
 
  Já tentei com pansichar
 
  E nada.
 
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
  mailto:delphi-br%40yahoogrupos.com.br
  [mailto:delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
 mailto:delphi-br%40yahoogrupos.com.br
  mailto:delphi-br%40yahoogrupos.com.br] Em
  nome de Roni Rodrigo
  Enviada em: terça-feira, 24 de agosto de 2010 18:27
  Para: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
 mailto:delphi-br%40yahoogrupos.com.br
  Assunto: Re: [delphi-br] Delphi 2010 ta doido?
 
  tenta converter em pansichar...
  ex:
  Bematech_FI_VendeItem(PAnsiChar(codigo), PAnsiChar(descricao),
  PAnsiChar(aliquota)...
 
  Em 24/08/2010 17:01, Iran Lima escreveu:
   Gente to com um problema ao passar parâmetros strings no Delphi 2010 ,
  
   Exemplo: Se eu usar um SaveToFile(arquivo.txt) o arquivo gerado fica
  nome
   a sem extensão.
  
   Outro Exemplo ao chamar o método da Bemafi32.dll
  
   Bematech_FI_VendeItem( 'codigo', descricao, aliquota,
  
   sTipoQtde, FormatFloat('0', quantidade), iDecimal,
  
   FormatFloat('0.00',valorUnitario),
  
   sTipoDesconto, FormatFloat('0.00',0) );
  
   so vai a primeira letra de cada parâmetro
  
   2010-08-24 16:53:57 - Parâmetros: 0|S|I|I|0|2|1|$|0 (Log da
   impressora), no
   Debug passa tudo blz mas a impressora recebe errado
  
   O que pode ser isso???
  
   [As partes desta mensagem que não continham texto foram removidas]
 
  
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 

 -- 

 *Inovação é o combustível do crescimento.*

 *Clairton Eloísio Müller*
 Depto. Desenvolvimento
 E-mail: clair...@dessis.com.br mailto:clairton%40dessis.com.br 
 mailto:clairton%40dessis.com.br
 mailto:clair...@dessis.com.br mailto:clairton%40dessis.com.br 
 mailto:clairton%40dessis.com.br 
 Site: http://www.dessis.com.br

 *Dessis Sistemas de Gestão Empresarial*

 Rua José Marangoni, 380 - Vila Nova Cx. Postal 417

 CEP: 89259-500 - Jaraguá do Sul - SC

 Fone/Fax: (0xx 47)3371-7842/3371-2640/3371-7144

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

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

 

-- 

*Inovação é o combustível do crescimento.*




*Clairton Eloísio Müller*
Depto. Desenvolvimento
E-mail: clair...@dessis.com.br mailto:clair...@dessis.com.br
Site: http://www.dessis.com.br



*Dessis Sistemas de Gestão Empresarial*

Rua José Marangoni, 380 - Vila Nova Cx. Postal 417

CEP: 89259-500 - Jaraguá do Sul - SC

Fone/Fax: (0xx 47)3371-7842/3371-2640/3371-7144



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



Re: [delphi-br] Ordenacao em cxGrid

2010-08-26 Por tôpico Yuri Grangeiro
Na tua TcxGridDBTableView, em OptionsCustomize, coloca a opção ColumnSorting
= True.


Abraço.
Yuri Grangeiro Ribeiro Maia
www.twitter.com/YuriGrangeiro
(85) 8133.1935


Em 26 de agosto de 2010 10:28, Murilo Cunha mcscu...@yahoo.com.brescreveu:



 Pessoal,

 Como eu faço a ordenacao no grid cxGrid?
 Quero que ao clicar no titulo da coluna do cxGrid as informacoes sejam
 colocadas em ordem alfabetica.

 Lembrando que meu cxGrid estah conectado a um TClientDataSet e nao quero
 colocar o ORDER BY na instrucao SELECT.

 Obrigado
 MuriloCunha

  



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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

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




Res: [delphi-br] Ordenacao em cxGrid

2010-08-26 Por tôpico elainecro
No tableView do seu grid, va em OptionsCustomize e marque como True a opcao 
ColumnSorting.

Ou selecione a coluna e em Options marque como True a opcao Sorting.

Acho q eh isso q você tah kerendo neh colega??

Abracos
Enviado do meu BlackBerry® da TIM

-Original Message-
From: Rubem Rocha rubem.ro...@dtmanaus.com.br
Sender: delphi-br@yahoogrupos.com.br
Date: Thu, 26 Aug 2010 10:04:58 
To: delphi-br@yahoogrupos.com.br
Reply-To: delphi-br@yahoogrupos.com.br
Subject: RES: [delphi-br] Ordenacao em cxGrid

Tem “catrabilhões” de dicas para ordenação de ClientDataSet na Internet, e
da maneira que você quer, sem essa ‘lusitanice’ de construir um ORDER BY pra
receber novamente os dados, gerando tráfego inútil na rede e denegrindo
desempenho tanto da aplicação como da própria rede. Se bobear, pode acabar
encontrando também nas mensagens antigas da lista, em
http://br.groups.yahoo.com/group/delphi-br/messages.

 

Boa sorte.

Sds.

 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Murilo Cunha
Enviada em: quinta-feira, 26 de agosto de 2010 09:28
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Ordenacao em cxGrid

 

  

Pessoal,

Como eu faço a ordenacao no grid cxGrid?
Quero que ao clicar no titulo da coluna do cxGrid as informacoes sejam 
colocadas em ordem alfabetica.

Lembrando que meu cxGrid estah conectado a um TClientDataSet e nao quero 
colocar o ORDER BY na instrucao SELECT.

Obrigado
MuriloCunha



 



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




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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

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




Re: [delphi-br] Classe Recursiva

2010-08-26 Por tôpico Marcos Doerner
ok obrigado,

Marcos

Em 26 de agosto de 2010 09:20, Rubem Nascimento da Rocha 
djpardalro...@hotmail.com escreveu:




 Como diria a Oi, Simples Assim!.

 type
 TMinhaClasse = class;

 TMinhaClasse = class
 private
 fCampo1: string;
 fCampo2: string;
 fCampo3: string;
 fObjetoPai: TMinhaClasse;
 public
 property ObjetoPai: TMinhaClasse read fObjetoPai write fObjetoPai;
 end;

 Para entender isso, informe-se no help do Delphi sobre declarações prévias
 (ou forward) de classes. Sim, pq melhor do que pegar algo pronto pra uso é
 entender o que se recebe, certo: ;)

 Boa sorte.

 Sds.


 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 From: marcosdoer...@gmail.com marcosdoerner%40gmail.com
 Date: Wed, 25 Aug 2010 22:13:10 +
 Subject: [delphi-br] Classe Recursiva


 Ola a todos,

 estou criando uma classe na minha regra de negocio mais ou menos da
 seguinte forma

 Type
 TminhaClasse = Class
 private
 atributo1 : string;
 atributo2 : string;
 atributo3 : string;
 classePai : TminhaClasse;
 public
 ...
 end;

 A minha duvida é como declaro o atributo classePai já que a minha
 TminhaClasse ainda não foi declarada.
 E a classePai pode conter ou não a estrutura e acaba sendo recursiva,
 o Pai pode ter um pai e assim por diante.

 Marcos



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

  



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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

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




Re: [delphi-br] Problemas com MySQL 5.1 e Delphi 2010

2010-08-26 Por tôpico Alan ricardo Souza
Boa tarde,
 
Ao invés de colocar a virgula no dbedit tente colocar no displayformat do 
clientdataset (obs cito o clientdataset mas o mydac tambem da por uso o corelab 
da devart) que vc nescessita pois normalmente campo decimal é somente colocar a 
mascara no display format ex(###,##0.00).

--- Em qui, 26/8/10, Eduardo Silva dos Santos eduardo@gmail.com escreveu:


De: Eduardo Silva dos Santos eduardo@gmail.com
Assunto: Re: [delphi-br] Problemas com MySQL 5.1 e Delphi 2010
Para: delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 26 de Agosto de 2010, 12:14


Lucas, não uso DbEdit mais vou fazer um teste aqui. Qual versão do MyDAC
você ta usando?


Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


Em 26 de agosto de 2010 08:33, Lucas Eduardo Barao Neves 
lucas_del...@yahoo.com.br escreveu:



 Bom dia pessoal.

 Estou com um problema com campos do tipo float e DBEdit no Delphi 2010 com
 MySQL5.1.

 O problema é o seguinte: crio meu campo no MySQL como float de 16,2. Na
 aplicação coloco um dbedit e quando tento preenchê-lo colocando vírgula
 como
 separador decimal ele dá o seguinte erro:

 ---
 Project raised exception class EDatabaseError with message ''1,25' is not a

 valid floating point value for field 'Valor Gasolina''.
 ---

 Se eu apagar o valor e digitar ponto como separador, por ex. 1.25, ele não
 aceita, aliás, o dbedit nem deixa eu digitar o '.', aceitando somente a
 vírgula.

 Alguém saberia por que isso acontece e como posso resolver?

 Para referência, estou usando os componentes MyDAC.

 Grato a todos,

 Lucas Neves

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

2010-08-26 Por tôpico Diego Garcia
eu tentei fazer isso com Record e não consegui... é somente com classe?

*Diego Garcia*
Twitter: http://www.twitter.com/drgarcia1986


Em 26 de agosto de 2010 09:20, Rubem Nascimento da Rocha 
djpardalro...@hotmail.com escreveu:




 Como diria a Oi, Simples Assim!.

 type
 TMinhaClasse = class;

 TMinhaClasse = class
 private
 fCampo1: string;
 fCampo2: string;
 fCampo3: string;
 fObjetoPai: TMinhaClasse;
 public
 property ObjetoPai: TMinhaClasse read fObjetoPai write fObjetoPai;
 end;

 Para entender isso, informe-se no help do Delphi sobre declarações prévias
 (ou forward) de classes. Sim, pq melhor do que pegar algo pronto pra uso é
 entender o que se recebe, certo: ;)

 Boa sorte.

 Sds.


 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 From: marcosdoer...@gmail.com marcosdoerner%40gmail.com
 Date: Wed, 25 Aug 2010 22:13:10 +
 Subject: [delphi-br] Classe Recursiva


 Ola a todos,

 estou criando uma classe na minha regra de negocio mais ou menos da
 seguinte forma

 Type
 TminhaClasse = Class
 private
 atributo1 : string;
 atributo2 : string;
 atributo3 : string;
 classePai : TminhaClasse;
 public
 ...
 end;

 A minha duvida é como declaro o atributo classePai já que a minha
 TminhaClasse ainda não foi declarada.
 E a classePai pode conter ou não a estrutura e acaba sendo recursiva,
 o Pai pode ter um pai e assim por diante.

 Marcos



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

  



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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

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




Re: [delphi-br] Como subtrair horas corretas

2010-08-26 Por tôpico Roni Rodrigo
cara... acredito que 24:00 não seja uma hora válida mesmo... o dia vai 
até de 0:00 até 23:59 ...
o/

Em 26/08/2010 18:48, alexsandro_qs escreveu:
 Boa noite pessoal;

 Eu tinha feito uma forma de subtrair 2 horas aqui, e até à um tempinho
 atrás, estava tudo ok. Só que agora pintou um problema:

 era feito assim:
 ---
 var
 h1, h2, resultado : TDateTime;
 begin

 d1:= StrToTime(adotDatainicial.Value);
 d2:= StrToTime(adotDatainicia2.Value);
 resultado := d2 - d1;

 ---
 Só que quando é digitado 24:00, esse valor não é reconhecido
 como horas ai os erros.

 Alguém poderia me ajudar com isso ?

 OBS.: a hora nunca vai passar de 24:00 ( ou seja de um dia para o outro)

 Ex.: saída 24:00 - entrada 01:00 = 23:00 e não 23:60




RES: [delphi-br] Classe Recursiva

2010-08-26 Por tôpico Rubem Rocha
No Object Pascal do Delphi 7, declarações “forward” são usadas com classes,
interfaces, procedures e functions.

 

Sds.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Roni Rodrigo
Enviada em: quinta-feira, 26 de agosto de 2010 19:28
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Classe Recursiva

 

  

se eu não me engano, declarações forward são só para classes sim...
o/

Em 26/08/2010 09:30, Diego Garcia escreveu:
 eu tentei fazer isso com Record e não consegui... é somente com classe?

 *Diego Garcia*
 Twitter:http://www.twitter.com/drgarcia1986


 Em 26 de agosto de 2010 09:20, Rubem Nascimento da Rocha
 djpardalro...@hotmail.com mailto:djpardalrocha%40hotmail.com  escreveu:

 
 
 
 
  Como diria a Oi, Simples Assim!.
 
  type
  TMinhaClasse = class;
 
  TMinhaClasse = class
  private
  fCampo1: string;
  fCampo2: string;
  fCampo3: string;
  fObjetoPai: TMinhaClasse;
  public
  property ObjetoPai: TMinhaClasse read fObjetoPai write fObjetoPai;
  end;
 
  Para entender isso, informe-se no help do Delphi sobre declarações
prévias
  (ou forward) de classes. Sim, pq melhor do que pegar algo pronto pra
uso é
  entender o que se recebe, certo:;)
 
  Boa sorte.
 
  Sds.
 
 
  To:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
delphi-br%40yahoogrupos.com.br
  From:marcosdoer...@gmail.com mailto:marcosdoerner%40gmail.com
marcosdoerner%40gmail.com
  Date: Wed, 25 Aug 2010 22:13:10 +
  Subject: [delphi-br] Classe Recursiva
 
 
  Ola a todos,
 
  estou criando uma classe na minha regra de negocio mais ou menos da
  seguinte forma
 
  Type
  TminhaClasse = Class
  private
  atributo1 : string;
  atributo2 : string;
  atributo3 : string;
  classePai : TminhaClasse;
  public
  ...
  end;
 
  A minha duvida é como declaro o atributo classePai já que a minha
  TminhaClasse ainda não foi declarada.
  E a classePai pode conter ou não a estrutura e acaba sendo recursiva,
  o Pai pode ter um pai e assim por diante.
 
  Marcos
 
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
  
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 



 



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



Re: [delphi-br] Classe Recursiva

2010-08-26 Por tôpico Roni Rodrigo
ou isso hehehe declaração de métodos é tão comum que nem me 
liguei... ;P
o/


Em 26/08/2010 20:40, Rubem Rocha escreveu:
 No Object Pascal do Delphi 7, declarações forward são usadas com 
 classes,
 interfaces, procedures e functions.

 Sds.

 De: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 [mailto:delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br] Em
 nome de Roni Rodrigo
 Enviada em: quinta-feira, 26 de agosto de 2010 19:28
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Classe Recursiva

 se eu não me engano, declarações forward são só para classes sim...
 o/

 Em 26/08/2010 09:30, Diego Garcia escreveu:
  eu tentei fazer isso com Record e não consegui... é somente com classe?
 
  *Diego Garcia*
  Twitter:http://www.twitter.com/drgarcia1986
 
 
  Em 26 de agosto de 2010 09:20, Rubem Nascimento da Rocha
  djpardalro...@hotmail.com mailto:djpardalrocha%40hotmail.com 
 mailto:djpardalrocha%40hotmail.com  escreveu:
 
 
  
  
  
   Como diria a Oi, Simples Assim!.
  
   type
   TMinhaClasse = class;
  
   TMinhaClasse = class
   private
   fCampo1: string;
   fCampo2: string;
   fCampo3: string;
   fObjetoPai: TMinhaClasse;
   public
   property ObjetoPai: TMinhaClasse read fObjetoPai write fObjetoPai;
   end;
  
   Para entender isso, informe-se no help do Delphi sobre declarações
 prévias
   (ou forward) de classes. Sim, pq melhor do que pegar algo pronto pra
 uso é
   entender o que se recebe, certo:;)
  
   Boa sorte.
  
   Sds.
  
  
   To:delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
 delphi-br%40yahoogrupos.com.br
   From:marcosdoer...@gmail.com mailto:marcosdoerner%40gmail.com 
 mailto:marcosdoerner%40gmail.com
 marcosdoerner%40gmail.com
   Date: Wed, 25 Aug 2010 22:13:10 +
   Subject: [delphi-br] Classe Recursiva
  
  
   Ola a todos,
  
   estou criando uma classe na minha regra de negocio mais ou menos da
   seguinte forma
  
   Type
   TminhaClasse = Class
   private
   atributo1 : string;
   atributo2 : string;
   atributo3 : string;
   classePai : TminhaClasse;
   public
   ...
   end;
  
   A minha duvida é como declaro o atributo classePai já que a minha
   TminhaClasse ainda não foi declarada.
   E a classePai pode conter ou não a estrutura e acaba sendo recursiva,
   o Pai pode ter um pai e assim por diante.
  
   Marcos
  
  
  
   [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]



[delphi-br] Re: Como subtrair horas corretas

2010-08-26 Por tôpico alexsandro_qs
É o problema que estou tendo aqui é isso, pois o usuário digitar 
Inicial : 07:30 
Final: 24:00
o resultado teria que dar : 16:30

Só que como ele não reconhece o 24:00, não faz o  calculo.






--- Em delphi-br@yahoogrupos.com.br, Roni Rodrigo ronirodr...@... escreveu

 cara... acredito que 24:00 não seja uma hora válida mesmo... o dia vai 
 até de 0:00 até 23:59 ...
 o/
 
 Em 26/08/2010 18:48, alexsandro_qs escreveu:
  Boa noite pessoal;
 
  Eu tinha feito uma forma de subtrair 2 horas aqui, e até à um tempinho
  atrás, estava tudo ok. Só que agora pintou um problema:
 
  era feito assim:
  ---
  var
  h1, h2, resultado : TDateTime;
  begin
 
  d1:= StrToTime(adotDatainicial.Value);
  d2:= StrToTime(adotDatainicia2.Value);
  resultado := d2 - d1;
 
  ---
  Só que quando é digitado 24:00, esse valor não é reconhecido
  como horas ai os erros.
 
  Alguém poderia me ajudar com isso ?
 
  OBS.: a hora nunca vai passar de 24:00 ( ou seja de um dia para o outro)
 
  Ex.: saída 24:00 - entrada 01:00 = 23:00 e não 23:60





Re: [delphi-br] Re: Como subtrair horas corretas

2010-08-26 Por tôpico Roni Rodrigo
mas então... como eu disse... não seria 0 hora do dia seguinte?
converte teu 24:00 pra 0 e incrementa 1 dia...
ai vc faz o calculo normalmente...
o/

Em 26/08/2010 22:00, alexsandro_qs escreveu:
 É o problema que estou tendo aqui é isso, pois o usuário digitar
 Inicial : 07:30
 Final: 24:00
 o resultado teria que dar : 16:30

 Só que como ele não reconhece o 24:00, não faz o calculo.

 --- Em delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br, Roni Rodrigo 
 ronirodr...@... escreveu
 
  cara... acredito que 24:00 não seja uma hora válida mesmo... o dia vai
  até de 0:00 até 23:59 ...
  o/
 
  Em 26/08/2010 18:48, alexsandro_qs escreveu:
   Boa noite pessoal;
  
   Eu tinha feito uma forma de subtrair 2 horas aqui, e até à um tempinho
   atrás, estava tudo ok. Só que agora pintou um problema:
  
   era feito assim:
   ---
   var
   h1, h2, resultado : TDateTime;
   begin
  
   d1:= StrToTime(adotDatainicial.Value);
   d2:= StrToTime(adotDatainicia2.Value);
   resultado := d2 - d1;
  
   ---
   Só que quando é digitado 24:00, esse valor não é reconhecido
   como horas ai os erros.
  
   Alguém poderia me ajudar com isso ?
  
   OBS.: a hora nunca vai passar de 24:00 ( ou seja de um dia para o 
 outro)
  
   Ex.: saída 24:00 - entrada 01:00 = 23:00 e não 23:60
 



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