RES: [delphi-br] Delphi 2010 ta doido?
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?
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
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.
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
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
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
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
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
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
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
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?
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
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
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.
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.
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?
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
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
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
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
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
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
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
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
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
É 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
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]