Re: [delphi-br] Imprimir arquivo texto na USB
Em 23/11/05, Marcos Bazoti - Procomp[EMAIL PROTECTED] escreveu: como faço para imprimir um arquivo texto na porta USB, dentro do delphi Uses Printers; Printer.BeginDoc; Printer.Canvas.TextOut(col, lin, 'texto'); Printer.EndDoc; Alencar --- Philler Informatica Ltda Jose Alencar Philereno ICQ 13458351 Messenger/Skype (voz): alencar Feliz aquele que transfere o que sabe e aprende o que ensina Cora Coralina -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Delphi 2005 e dotNet 2.0
Colegas, Baixei o dotNet framework 2.0, o SDK 2.0 e os instalei depois tentei instalar Delphi 2005 do site da Borland, mas ele diz que o dotNet framework 1.1 não está instalado. O Delphi 2005 não funciona com .net 2.0? Como faço para ele suportar? Desde já agradeço a ajuda, Edmilson Pontes - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Obrigado Danilo - ProviderFlags - Mas... por favor esclareça.
No seu exemplo, a SQL sugere que para a tela de cadastro de clientes sempre será trazida uma cidade já cadastrada. (o que vale para os Updates e Deletes). Caso seja uma inclusão e a cidade ainda não esteja cadastrada, nesta tela disponibilizamos de clientes uma opção para abrir a tela para o cadastro da cidades. SELECT A.ID_CLIENTE, A.NOME_CLIENTE, A.ID_CIDADE, B.NOME_CIDADE FROM CLIENTE A, CIDADE B WHERE A.ID_CIDADE = B.ID_CIDADE Sugiro q vc altere a clausula SQL para trazer a cidade somente se ela existir: select a.id_cliente, a.nome_cliente, a.id_cidade b.nome_cidade from cliente a left join cidade b on (a.id_cidade = b.id_cidade) Alencar --- Philler Informatica Ltda Jose Alencar Philereno ICQ 13458351 Messenger/Skype (voz): alencar Feliz aquele que transfere o que sabe e aprende o que ensina Cora Coralina -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Obrigado Danilo - ProviderFlags - Mas... por favor esclareça.
Vc nem precisaria fazer este campo lookup. Por ex: Se vc abrir o cadastro de cidade, fizer a inclusão de uma nova cidade, ao sair da tela vc ja pode atribuir ao campo ID_CIDADE, NOME_CIDADE(da sua query do cadastro de cliente) a nova cidade cadastrada. Att. Danilo User-BA [EMAIL PROTECTED] escreveu: Sua explanação sobre a configuração dos Flags foi por demais esclarecedora. Vou aproveita para abusar mais um pouco :) No seu exemplo, a SQL sugere que para a tela de cadastro de clientes sempre será trazida uma cidade já cadastrada. (o que vale para os Updates e Deletes). Caso seja uma inclusão e a cidade ainda não esteja cadastrada, nesta tela disponibilizamos de clientes uma opção para abrir a tela para o cadastro da cidades. Ok! Tendo que fazer isto, você sugeriria que no cadastro de clientes deveria ter um campo fazendo um (lookup/nome da cidade) entre cidades/clientes para buscar/trazer o código da cidade? ou você sugere alguma outra adaptação em SQL para este fim? Tipo: Um Lookup em SQL? Obrigado pela aula. Luciano-User-BA. Danilo Rogério wrote: Não entendi muito bem se COL_CHAVE também faz parte da chave primaria da tabela DICAS(fazendo com que sua tabela tenha uma chave composta, mas vou explicar detalhadamente, a maneira como eu trabalho Tabela CIDADE --- PK ID_CIDADE NOME_CIDADE Tabela CLIENTE PK ID_CLIENTE NOME_CLIENTE FK ID_CIDADE onde PK é Primary Key(chave Primária) e FK é Foreign Key(Chave Estrangeira), no caso de alguem desconhecer essas notações Suponhamos que vamos fazer operações de inclusão, exclusão, alteração na tabela CLIENTE, mas queremos mostrar o nome da cidade que este cliente mora. SELECT A.ID_CLIENTE, A.NOME_CLIENTE, A.ID_CIDADE, B.NOME_CIDADE FROM CLIENTE A, CIDADE B WHERE A.ID_CIDADE = B.ID_CIDADE Bem, vamos aos flags. 1) Estamos manipulando CLIENTES, certo? Portanto apenas as colunas referentes a tabela de clientes devem ser atualizadas, ou seja, a coluna NOME_CIDADE é meramente demonstrativa. 2) Configure os providers flags do SQLDataset ou SQLQuery ID_CLIENTE(é a chave) pfInfUpdate = True pfInfWhere = True pfInfKey = True /// Porque esta coluna é a chave pfInfHidden = False NOME_CLIENTE pfInfUpdate = True pfInfWhere = True pfInfKey = False pfInfHidden = False ID_CIDADE(note que esse campo vem da tabela CLIENTE, portanto deve ser atualizado) pfInfUpdate = True pfInfWhere = True pfInfKey = False pfInfHidden = False NOME_CIDADE(não precisa atualizar) pfInfUpdate = False pfInfWhere = False pfInfKey = False pfInfHidden = False 3) Neste mesmo campo NOME_CIDADE, verifique a propriedade Requerid = False 4) Faça o Passo 2 e 3 no ClientDataSet também 5) No DataSetProvider, em Update Mode coloque Where KeyOnly(Você muda para update mode porque setamos o flag pfInfKey para True) 6) Se quiser ajudar o DataSerProvider mais um pouco, pode colocar a instrução abaixo no EVENTO onGetTableName: Table_Name := 'CLIENTE'; Espero ter esclarecido. E dúvidas, postem aí... Danilo Rogério Betta Informática User-BA [EMAIL PROTECTED] escreveu: Olá! Me esclareçam... Tenho 2 tabelas - DICAS e - COLABORADORES Em - DICAS tenho o campo chave primaria - DIC_CHAVE e o campo chave estrangeira - COL_CHAVE (COL_CHAVE é a chave primária de - COLABORADOR) Neste caso, devo configurar no ClientDataSet - ProviderFlags PfInUpdade = True PfInWhere = True PfInKey = True PfInHiden = False Da tabela - DICAS para os campos - DIC_CHAVE (chave primaria de DICAS) e COL_CHAVE (chave estrangeira de - DICAS e chave primária de - COLABORADOR)? ... Ou qual a configuração correta neste caso? Os outros campos de - DICAS devem ficar: PfInUpdade = True PfInWhere = True PfInKey = False PfInHiden = False ? Aproveitando: Devo setar UpDateMode para - upWhereAll? ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fh5qtu6/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132804784/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1) http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow%281%29; var
Re: [delphi-br] Alguem poderia me ajudar
Daniel, conordo com o Miguel,não respondi antes pq nao deu. mais é isso ai, a instrução SQL pra achar alguma coisa parecida é Like (como em ingles...) funciona bem desse geito select * from cliente where cliente.nome (esse é o campo que quer pesquisar...) like %nome_do_caboclo% saco ?, trocando em miudos fica assim: select * from cliente where nome like %nome% T+ Joao Ricardo - Original Message - From: Miguel - DPF To: delphi-br@yahoogrupos.com.br Sent: Wednesday, November 23, 2005 4:13 PM Subject: Res: [delphi-br] Alguem poderia me ajudar Porque vc não utiliza sql usando like %campo% ex Select * from clientes where cliente like %cliente% vc pode colocar isso no campo onchage de um edit with query do begin close; sql.clear; sql.add('select * from clientes where cliente like' + Quotedstr('%'+edit1 text+'%')); open; end; espero ter entendido direto o q vc quer Miguel Delphi na veia ---Mensagem original--- De: Daniel Data: 11/23/05 13:38:38 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Alguem poderia me ajudar Olá, Gostaria de pedir, ao grupo, se alguém tiver alguma apostila, ou tutorial, ou puder me indicar algum livro que ensine a fazer um programa que tem a seguinte função - Buscar um dado através de características deste dado, por exemplo, num universo de 50 nomes, cada qual com 7 caracteristicas algumas semelhantes outras não, quando eu entro com 3 ou 4, ou as 7 caracteristicas, o programa busca pelo nome que as possui no banco de dados. Alguém poderia me ajudar? Caso possuam algum tutorial ou apostila se puderem enviar por e-mail, ou alguma referencia bibliográfica que seje focada neste tipo de programa.. Um abraço a todos Daniel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br]
Já passei por isso e consegui resolver da seguinte forma: Application.Initialize; Application.Icon.LoadFromFile('SeuIcone.ico'); //Informe aqui o caminho do icone que deseja Application.Title := 'RD Sistemas - S.C.G.'; Application.CreateForm(TfrmSenha, frmSenha); Application.CreateForm(Tfrmteste, frmteste); Application.CreateForm(TfrmPri, frmPri); Application.CreateForm(TfrmClientes, frmClientes); Application.CreateForm(Tdmdado, dmdado); Application.CreateForm(Tfrmlocfunc, frmlocfunc); Application.CreateForm(TfrmLocClasse, frmLocClasse); frmteste.show; frmteste.refresh; sleep(5000); frmteste.free; Application.Run; O icone deve estar na pasta de execução do sistema e deve ser distribuído junto com a instalação Abraços. Ralp Alves Bezerra Msn: [EMAIL PROTECTED] - Original Message - From: Luis (BgmRodotec - SP) To: delphi-br@yahoogrupos.com.br Sent: Wednesday, November 23, 2005 6:44 AM Subject: [delphi-br] Ao abrir o executável o icone da aplicação passa a ser um pequeno form e não o associado no projeto (delphi 4 e 7). Alguém já passou por isso ? [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Executar Flash
Não precisa de componente amigo, Basta você usar uma OCX gratuita do Flash que vem no Delphi :) Se eu não me engano o nome é Shockwave Flash (Version 1.0) Espero ter ajudado. Leonardo - Original Message - From: Ilton Vieira Junior To: delphi-br@yahoogrupos.com.br Sent: Wednesday, November 23, 2005 3:47 PM Subject: Re: [delphi-br] Re: Executar Flash Fico grato Carlos. Achei o componente, o nomé FlashPlayerControl, porém o que no site é só o demo :-(. Este Demo coloca uma tarja na frente do flash, dizendo Demo Flash e para comprar, custa 300 dolares. Completamente fora de meu orçamento. Mais alguma sugestão?? Obrigado, Ilton [EMAIL PROTECTED] escreveu: oi Ílton, já vi um componente pra isso, tem sempre um link patrocinado deles no Torry´s: www.torry.net mas nao lembro o nome exato, voce pode importar o activeX do flash para o delphi mas aí vai precisar salvar no disco - que é o que voce nao quer, com esse componente eles prometem (nao testei) que dá pra faazer um stream em memoria. []s, -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Stored Procedure no Interbase
Bom dia a todos! Podem informar o que estou fazendo de errado nesta Stored Procedure? SET TERM !! ; CREATE PROCEDURE ANDAMENTONET4 (NUMRPROC VARCHAR(25), DATACOMP TIMESTAMP, CODGANDAM INTEGER, CODGFASE INTEGER, FLAGINTERNO CHAR(1), DESCCOMP BLOB SUB_TYPE 1) RETURNS (CONTADOR INTEGER) AS DECLARE VARIABLE CONTADOR INTEGER; BEGIN FOR SELECT COUNT(NUMR_FASECOMP) FROM FASECOMP WHERE (NUMR_PROC = :NUMRPROC and DATA_COMP = :DATACOMP and DESC_COMP = :DESCCOMP) INTO :CONTADOR DO BEGIN IF (CONTADOR is null) THEN BEGIN CONTADOR = 0; END; IF (CONTADOR 0 ) THEN BEGIN EXIT END ELSE INSERT INTO FASECOMP (NUMR_PROC, DATA_COMP, CODG_ANDAM, CODG_FASE, FLAG_INTERNO, DESC_COMP) VALUES (:NUMRPROC, :DATACOMP, :CODGANDAM, :CODGFASE, 'N', :DESCCOMP); END!! SET TERM ; !! Alguém tem agum modelo parecido, para ajudar-me? Desde já agradeço a todos Patricia Santana - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Stored Procedure no Interbase
Patricia; de uma olhadinha SET TERM !! ; CREATE PROCEDURE ANDAMENTONET4 (NUMRPROC VARCHAR(25), DATACOMPTIMESTAMP, CODGANDAM INTEGER, CODGFASEINTEGER, FLAGINTERNO CHAR(1), DESCCOMPBLOB SUB_TYPE 1) RETURNS (CONTADOR INTEGER) AS DECLARE VARIABLE CONTADOR INTEGER; BEGIN /* Faz um loop contando a coluna da tabela fasecomp */ FOR SELECT COUNT(NUMR_FASECOMP) FROM FASECOMP WHERE (NUMR_PROC = :NUMRPROC and DATA_COMP = :DATACOMP and DESC_COMP = :DESCCOMP) INTO :CONTADOR DO BEGIN /* Se o contador for nulo ajusta para 0 */ /* Voce poderia utilizar o COALESCE no select acima e tirar fora este if Teste ai: SELECT COALESCE(COUNT(NUMR_FASECOMP),0) */ IF (CONTADOR IS NULL) THEN BEGIN CONTADOR = 0; END; /* Entao se o contador for maior que 0 retorna result set */ IF (CONTADOR 0 ) THEN BEGIN SUSPEND; /* Caso contrario */ END ELSE BEGIN /* Insere na tabela de fase comp */ INSERT INTO FASECOMP (NUMR_PROC, DATA_COMP, CODG_ANDAM, CODG_FASE, FLAG_INTERNO, DESC_COMP) VALUES (:NUMRPROC, :DATACOMP, :CODGANDAM, :CODGFASE, 'N', :DESCCOMP); END END END!! SET TERM ; !! /* Nao tive como testar aqui.., pois nao tenho a tabela...rs mas acho que vai funcionar */ Atenc. Elazar -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Patricia Santana Enviada em: quarta-feira, 23 de novembro de 2005 16:19 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Stored Procedure no Interbase Boa tarde a todos! Podem informar o que estou fazendo de errado nesta Stored Procedure? SET TERM !! ; CREATE PROCEDURE ANDAMENTONET4 (NUMRPROC VARCHAR(25), DATACOMP TIMESTAMP, CODGANDAM INTEGER, CODGFASE INTEGER, FLAGINTERNO CHAR(1), DESCCOMP BLOB SUB_TYPE 1) RETURNS (CONTADOR INTEGER) AS DECLARE VARIABLE CONTADOR INTEGER; BEGIN FOR SELECT COUNT(NUMR_FASECOMP) FROM FASECOMP WHERE (NUMR_PROC = :NUMRPROC and DATA_COMP = :DATACOMP and DESC_COMP = :DESCCOMP) INTO :CONTADOR DO BEGIN IF (CONTADOR is null) THEN BEGIN CONTADOR = 0; END; IF (CONTADOR 0 ) THEN BEGIN SUSPEND END ELSE INSERT INTO FASECOMP (NUMR_PROC, DATA_COMP, CODG_ANDAM, CODG_FASE, FLAG_INTERNO, DESC_COMP) VALUES (:NUMRPROC, :DATACOMP, :CODGANDAM, :CODGFASE, 'N', :DESCCOMP); END!! SET TERM ; !! Alguém tem agum modelo parecido, para ajudar-me? Desde já agradeço a todos Patricia Santana [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: RES: [delphi-br] Gravar Registro com sqldataset+datasetprovider+clientdataset usando join no select
Amigo, Vc resolveu o problema. Agora gravou. Muito obrigado _ De: Danilo Rogério [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 23 de novembro de 2005 17:21 Para: Levi Ribeiro de Freitas Cc: Delphi-Br Assunto: Re: RES: [delphi-br] Gravar Registro com sqldataset+datasetprovider+clientdataset usando join no select Levi... que bom que você postou o erro, assim a galera ve todos os possíveis erros que estão acontecendo com você. Amigo, pelo erro me parece que seu SQL ainda está em minúsculo, não é? 1) Tente colocar em maiúsculo 2) Nos eventos do Datasetprovider existe um metodo chamado OnGetTableName. Neste Método coloque a seguinte instrução TableName := 'PRODUCAOS'; Como você tem join, vc disse para o datasetprovider qual a TABELA da sua instrução será atualizada... Mas faça um de cada vez... Coloque em maiúscula... Estou para apostar que é isso... Att. Danilo Levi Ribeiro de Freitas [EMAIL PROTECTED] escreveu: Danilo, Fiz o que vc me falou nos flags no sqldataset e no clientdataset e mesmo assim depois de dar applyupdate dá a seguinte mensagem: SQL Server Error: Table unknown producaos At line 1, column 21. select a.*, b.tratamento, c.comprimento, c.liga, c.tempera, d.gramatura, d.gramaturaplc from producaos a left join cadastro b on (a.id = b.id) and (a.codigo = b.codigo) left join ipedido c on (a.pedido_id = c.pedido_id) and (a.item = c.item) left join iferramenta d on (a.ferramenta_id = d.ferramenta_id) and (a.sequencia = d.sequencia) where a.status = 0 order by a.protocolo Não sei mais o que fazer. Acredito que vou ter que fazer a atualização na unha usando um outro clientdataset. Levi -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Danilo Rogério Enviada em: terça-feira, 22 de novembro de 2005 19:49 Para: delphi-br@yahoogrupos.com.br Cc: [EMAIL PROTECTED] Assunto: Re: [delphi-br] Gravar Registro com sqldataset+datasetprovider+clientdataset usando join no select Você configurou os providers flags das colunas? 1) Eu ja vi problemas de gravação com select em letras minúsculas. Eu, particularmente uso só maiúsculas. 2) Faça o seguinte: Adicione todos os campos no fields editor do SQLDataset e do ClientDataset. 3) Imagino que sua tabela producaos seja a que vc quer gravar. Portando para os campos(tratamento, comprimento, liga, temperatura, gramatura, gramaturaplc) marque TODOS o os flags(pfInUpdate, pfInWhere, pfInKey, pfInHidden) na propriedade Providers Flags para False, Required para False também. 4) Faça a mesma coisa no ClientDataset. Tente gravar novamente. O que você fez foi dizer ao Datasetprovider que os campos que não são da tabela producaos, não precisam ser atualizados(porque são de outras tabelas). PS: Procure conhecer algo sobre Reconcile Error, para capturar os erros ou problemas na gravação, quando utiliza DBExpress. Provavelmente isso vai resolver. Espero ter ajudado, Danilo Levi Ribeiro de Freitas escreveu: Pessoal, Estou precisando gravar um registro usando D7, Firebird 1.5 + sqldataset+datasetprovider+clientdataset, mas estou usando join no sqldataset+datasetprovider+select, vejam: select a.*, b.tratamento, c.comprimento, c.liga, c.tempera, d.gramatura, d.gramaturaplc from producaos a left join cadastro b on (a.id = b.id) and (a.codigo = b.codigo) left join ipedido c on (a.pedido_id = c.pedido_id) and (a.item = c.item) left join iferramenta d on (a.ferramenta_id = d.ferramenta_id) and (a.sequencia = d.sequencia) where a.status = 0 order by a.protocolo Preciso salvar apenas o registro de uma tabela, como faço? Tento mas ele dá erro. Atenciosamente, Levi Ribeiro de Freitas Programador de Computadores [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fq3ai6r/M=365837.7000707.7924794.2 369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132697947/A=2950750/R=0/id=flashu rl/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema _calendario.swf?clickTAG=javascript:LRECopenWindow(1); var lrec_altURL=http://br.rd.yahoo.com/SIG=12fq3ai6r/M=365837.7000707.7924794.2 369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132697947/A=2950750/R=1/id=altimg /SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_ca lendario.gif; var lrec_width=300;var lrec_height=250; - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. - Yahoo! Acesso Grátis: Internet rápida e grátis.
Re: [delphi-br] Obrigado Danilo - ProviderFlags - Mas... por favor esclareça.
Danilo, Pegando um gancho na discursão de vocês... Num cadastro de clientes, onde tenho que informar qual a cidade, como no seu exemplo, qual é a melhor forma de trabalhar? Eu sempre trabalhei criando um campo lookup (fkLookup) no clientdataset (cliente, no caso do seu exemplo) e na tela, coloco um DBLookupComboBox apontando para o field lookup que criei. Essa é a melhor forma? Outra coisa: (ainda seguindo o seu exemplo) quando vou gravar o cliente, e dá algum erro na gravação (um campo required que não informei, por exemplo), quando tento escolher a cidade, novamente (depois do erro), no DBLookupComboBox, aparece a mensagem 'Cursor Unknow'. Tento novamente mais umas 2 ou 3 vezes e passa. Procurei na net e as sugestões que encontrei não resolveu o problema. Poderia me ajudar com isso? Abusando mais um pouco, outro erro que acontece muito e, apesar de eu estar conseguindo resolver, eu ainda não sei direito o que causa, é o 'invalid point operation' Sabe alguma coisa sobre isso? Agradeço muito qualquer ajuda. Luis Alberto. --- Danilo Rogério [EMAIL PROTECTED] escreveu: Vc nem precisaria fazer este campo lookup. Por ex: Se vc abrir o cadastro de cidade, fizer a inclusão de uma nova cidade, ao sair da tela vc ja pode atribuir ao campo ID_CIDADE, NOME_CIDADE(da sua query do cadastro de cliente) a nova cidade cadastrada. Att. Danilo User-BA [EMAIL PROTECTED] escreveu: Sua explanação sobre a configuração dos Flags foi por demais esclarecedora. Vou aproveita para abusar mais um pouco :) No seu exemplo, a SQL sugere que para a tela de cadastro de clientes sempre será trazida uma cidade já cadastrada. (o que vale para os Updates e Deletes). Caso seja uma inclusão e a cidade ainda não esteja cadastrada, nesta tela disponibilizamos de clientes uma opção para abrir a tela para o cadastro da cidades. Ok! Tendo que fazer isto, você sugeriria que no cadastro de clientes deveria ter um campo fazendo um (lookup/nome da cidade) entre cidades/clientes para buscar/trazer o código da cidade? ou você sugere alguma outra adaptação em SQL para este fim? Tipo: Um Lookup em SQL? Obrigado pela aula. Luciano-User-BA. Danilo Rogério wrote: Não entendi muito bem se COL_CHAVE também faz parte da chave primaria da tabela DICAS(fazendo com que sua tabela tenha uma chave composta, mas vou explicar detalhadamente, a maneira como eu trabalho Tabela CIDADE --- PK ID_CIDADE NOME_CIDADE Tabela CLIENTE PK ID_CLIENTE NOME_CLIENTE FK ID_CIDADE onde PK é Primary Key(chave Primária) e FK é Foreign Key(Chave Estrangeira), no caso de alguem desconhecer essas notações Suponhamos que vamos fazer operações de inclusão, exclusão, alteração na tabela CLIENTE, mas queremos mostrar o nome da cidade que este cliente mora. SELECT A.ID_CLIENTE, A.NOME_CLIENTE, A.ID_CIDADE, B.NOME_CIDADE FROM CLIENTE A, CIDADE B WHERE A.ID_CIDADE = B.ID_CIDADE Bem, vamos aos flags. 1) Estamos manipulando CLIENTES, certo? Portanto apenas as colunas referentes a tabela de clientes devem ser atualizadas, ou seja, a coluna NOME_CIDADE é meramente demonstrativa. 2) Configure os providers flags do SQLDataset ou SQLQuery ID_CLIENTE(é a chave) pfInfUpdate = True pfInfWhere = True pfInfKey = True /// Porque esta coluna é a chave pfInfHidden = False NOME_CLIENTE pfInfUpdate = True pfInfWhere = True pfInfKey = False pfInfHidden = False ID_CIDADE(note que esse campo vem da tabela CLIENTE, portanto deve ser atualizado) pfInfUpdate = True pfInfWhere = True pfInfKey = False pfInfHidden = False NOME_CIDADE(não precisa atualizar) pfInfUpdate = False pfInfWhere = False pfInfKey = False pfInfHidden = False 3) Neste mesmo campo NOME_CIDADE, verifique a propriedade Requerid = False 4) Faça o Passo 2 e 3 no ClientDataSet também 5) No DataSetProvider, em Update Mode coloque Where KeyOnly(Você muda para update mode porque setamos o flag pfInfKey para True) 6) Se quiser ajudar o DataSerProvider mais um pouco, pode colocar a instrução abaixo no EVENTO onGetTableName: Table_Name := 'CLIENTE'; Espero ter esclarecido. E dúvidas, postem aí... Danilo Rogério Betta Informática User-BA [EMAIL PROTECTED] escreveu: Olá! Me esclareçam... Tenho 2 tabelas - DICAS e - COLABORADORES Em - DICAS tenho o campo chave primaria - DIC_CHAVE e o campo chave estrangeira - COL_CHAVE (COL_CHAVE é a chave primária de - COLABORADOR) Neste caso, devo configurar no ClientDataSet - ProviderFlags PfInUpdade = True PfInWhere = True PfInKey = True PfInHiden = False Da tabela - DICAS
Re: [delphi-br] Catraca Informatizada Henry
Qual o modelo da sua catraca e versao da DLL para acesso? Paulo - Original Message - From: Cristian I Machado [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, November 24, 2005 8:49 AM Subject: [delphi-br] Catraca Informatizada Henry Pessoal, alguém tem um manual da dll da catraca informatizada Henry, ou melhor, se tiver um pequeno exemplo em Delphi me ajudará e muito. Desde já agradeço Cristian [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Resumo 6245
oi Andreano, veja, suporte a .NET não é extensão da linguagem, é só um jeito diferente de fazer a mesma coisa, e seus outros exemplos são ajustes e aperfeiçoamentos, mas nada que não desse pra ser feito antes com um código um pouco maior ou menos elegante, mas dava (os arrays eu havia comentado antes). o que eu queria ver é código 64 bits e multiprocessamento real, números complexos, uma biblioteca matemática decente... veja os exemplos que eu coloquei do Fortran da Intel e me diga como eu posso competir com quem está, HOJE, lançando softwares completos 64 bits/multiprocessados se o Delphi só vai ter isso em 2008. a Borland sempre anunciou que o Delphi (e o TP, a partir da versao 4) podia fazer tudo o que as outras linguagens faziam... ANTES que voce comente, não, .NET 64 bits não é processamento em 64 bits e não, threads do windows não é multiprocessamento real - eu não preciso de mais do que 4GB de RAM, o que eu preciso é de ponto flutuante com precisão maior e mais rápido e que permita dividir o cálculo de uma matriz huge em mais de um processador, essa última parte eu consegui resolver mais ou menos comprando uma biblioteca third-party, que também resolveu a fraqueza da unit math, mas suporte a 64 bits precisa estar nativo. []s, Carlos Assunto: RES: linguagem delphi estacionada Olá Carlos, vou ter que descordar do seu comentário A linguagem Delphi está evoluindo sim e em todas as versões do Delphi. e tanto em Win32 como em .NET Só como exemplo: Exemplos de novos recursos na linguagem: - total suporte a plataforma .NET - classes sealed, mecanimos para não permitir que as classes sejam herdadas. - Strict private, syntax mais restritiva que o private - Suporte a for in, você pode parar de fazer loop por contador e utilizar o for in que é mais otimizado... - Suporte a namespace - Suporte a alocação dinâmica de arrays multi-dimensionais - Operator Overload - Suporte a record helper - Suporte a overload, constructor, métodos estáticos, . em record E muitas outras coisas... Só o suporte a .NET é muita coisa, mas continuamos melhorando Win32 também para que os desenvolvedores que tenham legado possam continuar evoluindo suas aplicações. Outro ponto muito importante, muito usuários de Delphi utilizam versões anteriores como 4, 5, 6, e estão muito satisfeitos porque as tecnologias incorporadas ao Delphi o atendem até hoje. Abraços, Andreano Lanusse System Engineer Borland Latin America Tel: +55 (11) 2165.8089 / Mobile: +55 (11) 8196.5912 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] - www.borland.com.br blocked::http://www.borland.com.br/ A Borland Software é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de [EMAIL PROTECTED] Enviada em: terça-feira, 22 de novembro de 2005 09:40 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] linguagem delphi estacionada enquanto a Borland e a MS ficam re-inventando interfaces, os desenvolvimentos das linguagens foram deixados de lado - a ultima coisa realmente importante adicionada ao Delphi foi a matriz de extensao variavel (D4). enquanto isso, chequem o que ja esta disponivel no Fortran 9 da Intel. Carlos The Next Generation of Fortran for Windows* Compiler Intel Visual Fortran 9.0 for Windows Intel Visual Fortran Compiler 9.0 for Windows* represent a joining of Fortran technologies from Intel and Compaq* (now part of Hewlett-Packard). Intel code generation, optimization, and parallel processing technologies combine with the features, extensions, and language processing of Compaq Visual Fortran (CVF) to create Fortran compilers that offer a robust feature set, along with unmatched runtime performance. In most cases, you can rebuild existing applications with the new compilers without source changes, but some applications may need minor coding changes, and build methods may need minor adjustments. Here are some features: Full support of Intel multi-core processors and Intel processors supporting Intel EM64T, along with previous Intel processors and architectures Supports the latest dual-core desktop Intel Pentium D processor and Intel Processors with Hyper-Threading Technology. Quadruple-precision floating point REAL(16) and COMPLEX(32) Automatic parallelization. OpenMP* support. Advanced optimization for new Intel processors. Code Coverage and Test Prioritization tools. Command Line Debugger (Intel Debugger). -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo
Re: RES: [delphi-br] TransactionID - Dúvida
Madsom, Primeiramente, valeu pela atenção. Mas se eu estiver usando rede, qual seria o procedimento? Pois vários usuário podem abrir a mesma tabela ao mesmo tempo em várias máquinas diferentes. Madsom Silva [EMAIL PROTECTED] escreveu: Ricardo, o TransactionID deve ser diferente para transações concorrente. Se você abre e fecha a transação uma por vez ele pode ser sempre o mesmo. Ex.: Se vc abre uma transação para pedido e uma outra pra cliente (ao mesmo tempo) elas tem quer ter números diferente. Se vc abre a de pedido e fecha, depois abre a de cliente e fecha pode ser o mesmo número. Obs.: cuidado com sistemas MDI, aonde o usuário pode abrir vários formulários ao mesmo tempo. Sem mais, Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Ricardo Cabral Enviada em: quarta-feira, 23 de novembro de 2005 16:46 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] TransactionID - Dúvida Pessoal, Gostaria de saber mais como usar o TransactionID em uma linguagem simples. Por exemplo: Para cada transação eu tenho que colocar um ID diferente. Exemplo: transação na tabela de vendas - TransactionID:=1, transação na tabela de cliente, TransactionID:=2 e assim por diante. Desde de já agradeço!! Abraços, Ricardo Cabral - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.1.362 / Virus Database: 267.13.4/176 - Release Date: 20/11/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]=http://br.rd.yahoo.com/SIG=12f0p5qra/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132796543/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1); var lrec_altURL=http://br.rd.yahoo.com/SIG=12f0p5qra/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132796543/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;; var lrec_width=300;var lrec_height=250; - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. Abraços, Ricardo Cabral - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Transações Concorrentes
Desenvolvi uma aplicação (delphi6 + Firebird + IBX) onde tenho em várias telas a utilização da mesma tabela que tem como indice Empresa + Sequencia. Acontece volta e meia quando dois usuários solicitam uma transação em telas diferentes na mesma tabela de pegar a mesma sequencia e acabar não gravando uma das transações. Quais práticas devo adotar para que isso não ocorra? Obrigado [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Off Topic - Busca por uma oportunidade.
Bom dia colegas do grupo meu nome é Marco Antonio P. Fonseca , tenho 39 anos e sou casado , estou a um mes aqui em Brasilia , morava em São Paulo e lá trabalhei em varias empresas de TI como Telefonica , Xerox , Banco Zogbi entre outras tenho tambem bastante conhecimento em Oracle 8i e Sql Server 2.000 (desenvolvimento de Stored Procedures) alem de modelagem fisica de conceitual e Analise e Projeto de Sistemas. Conheço bem a linguagem Delphi 7.0 , com ela desenvolvi diversos sistemas. Gostaria de saber se alguns dos colegas conhecem aqui empresas de desenvolvimento de sistemas que trabalham com Delphi e que estejam precisando de mão de obra , me coloca a interia disposição para eventuais entrevistas. Desde já agradeço a atenção de todos. Marcos. - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Richedit Avançado
PessoALL, alguém sabe como eu posso imprimir com o richedit linha-a-linha sem perder a formatação. Tipo Assim: Leio a primeira linha e imprimo, leio a segunda linha e imprimo... preciso fazer isso para controlar a quantidade de linhas impressas. Obrigado [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: OO - Relação 1 para N
Mas como isso fica implementado em codigo? Sds. Francisco On 11/23/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Sim. Se você não adicionar sentido à associação, elas são bidirecionais. Do pedido vai ao cliente e do cliente aos pedidos. []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Francisco Trindade Sent: Wednesday, November 23, 2005 8:31 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Daniel, ja que vc entrou na discussao, tem como ser implementada uma relacao 1 para N com bidirecionalidade no ECO? E 1 para 1? Sds. Francisco On 11/22/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Olá Romario, O ECO implementa 1 para N com uma lista de objetos do .NET. Esta lista é uma interface descendente de ICollection, implementada por um adapter ao redor do IList. [UmlCollection(TypeOf(Group))] IGroupList = interface(ICollection) {$REGION 'ECO generated code'} function get_Item(index: Integer): Group; procedure set_Item(index: Integer; Value: Group); property Item[index: Integer]: Group read get_Item write set_Item; default; function Add(value: Group): Integer; function Contains(value: Group): Boolean; function IndexOf(value: Group): Integer; procedure Insert(index: Integer; value: Group); procedure Remove(value: Group); procedure Clear; procedure RemoveAt(index: Integer); {$ENDREGION 'ECO generated code'} end; GroupListAdapter = class(ObjectListAdapter, IGroupList) public constructor Create(source: IList); function get_Item(index: Integer): Group; procedure set_Item(index: Integer; Value: Group); property Item[index: Integer]: Group read get_Item write set_Item; default; function Add(value: Group): Integer; function Contains(value: Group): Boolean; function IndexOf(value: Group): Integer; procedure Insert(index: Integer; value: Group); procedure Remove(value: Group); end; []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Romario (Listas) Sent: Monday, November 21, 2005 7:09 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Olá Daniel! Eu até imagino o quanto deve ser produtivo utilizar o ECO, mas eu sou adepto da turma que quer entender como e o que foi feito. Dessa forma, vou aperfeiçoando meus conhecimentos em orientação a objetos. ;-) Sds, Romario Daniel Polistchuck escreveu: Olá Romário, Este é o tipo de coisa com o qual o ECO ajuda demais! Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12fvka9qd/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132617071/A=2950750/R=2/id=noscript/SIG=10tift5qr/*http://br.movies.yahoo.com/ 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
[delphi-br] Exemplo de insert com DBExpress
Povo Embora pareça banal, não estou conseguindo fazer um insert com DBExpress. Está dando um erro. Estou utilizando ClientDataSet, DataSetProvider e SQLQuery. Alguém teria um trecho de código como exemplo de utilização desses componentes acima? Atenciosamente Cândido Luís Dias Ferreira Tribunal Regional Eleitoral de São Paulo Seção de Desenvolvimento [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RE: [delphi-br] XML Mapper, onde encontro ?
O utilitário XML Mapper só está disponível nas versões Enterprise do Delphi a partir da versão 6. E outra, mesmo que vc consiga o XML Mapper de alguém que tenha a versão Enterprise pra usar como uma versão Professional, ele não vai funcionar devido a dependência de pacotes da versão Enterprise que o XML Mapper possui. Pra quem não sabe, o XML Mapper permite criar arquivos de transformação XML para serem usados com o componente TXMLTransformProvider (também existente somente nas versões Enterprise) para acessar arquivos XML quaisquer através de um TClientDataSet. Pra mim, é a melhor forma de ter acesso a um XML, sem ter que recorrer ao famigerado TXMLDocument. Pra quem não tem a versão Enterprise e precisa acessar documentos XML, o componente TXMLDocumento é a alternativa mais viável. Sds. From: Vinicius Barreira [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br,[EMAIL PROTECTED] CC: [EMAIL PROTECTED],[EMAIL PROTECTED] Subject: [delphi-br] XML Mapper, onde encontro ? Date: Wed, 23 Nov 2005 14:46:04 -0200 Olá pessoal; Preciso conectar com Soap num webservice com meu sistema win32, feito com delphi 7 professional. Estava vendo uma revista de delphi que diz que preciso dum XML Mapper para formatar o xml, mas não tenho esse programa no meu cd original do delphi nem nos cds companion; Vcs já usaram esse XML Mapper ? alguém faz idéia onde posso consegui-lo ? Grato; Vinicius Barreira São Bernardo do Campo - SP Delphi 7 + Firebird + DBExpress Software para Hoteis [As partes desta mensagem que não continham texto foram removidas] _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RE: [delphi-br] Re: OO - Relação 1 para N
Algo como TCliente = class (...) (...) property Pedidos : TPedidoList; (...) (...) end; TPedido = class (...) (...) property Cliente :TCliente; (...) (...) end; Abraço, Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Francisco Trindade Sent: Thursday, November 24, 2005 1:40 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Mas como isso fica implementado em codigo? Sds. Francisco On 11/23/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Sim. Se você não adicionar sentido à associação, elas são bidirecionais. Do pedido vai ao cliente e do cliente aos pedidos. []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Francisco Trindade Sent: Wednesday, November 23, 2005 8:31 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Daniel, ja que vc entrou na discussao, tem como ser implementada uma relacao 1 para N com bidirecionalidade no ECO? E 1 para 1? Sds. Francisco On 11/22/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Olá Romario, O ECO implementa 1 para N com uma lista de objetos do .NET. Esta lista é uma interface descendente de ICollection, implementada por um adapter ao redor do IList. [UmlCollection(TypeOf(Group))] IGroupList = interface(ICollection) {$REGION 'ECO generated code'} function get_Item(index: Integer): Group; procedure set_Item(index: Integer; Value: Group); property Item[index: Integer]: Group read get_Item write set_Item; default; function Add(value: Group): Integer; function Contains(value: Group): Boolean; function IndexOf(value: Group): Integer; procedure Insert(index: Integer; value: Group); procedure Remove(value: Group); procedure Clear; procedure RemoveAt(index: Integer); {$ENDREGION 'ECO generated code'} end; GroupListAdapter = class(ObjectListAdapter, IGroupList) public constructor Create(source: IList); function get_Item(index: Integer): Group; procedure set_Item(index: Integer; Value: Group); property Item[index: Integer]: Group read get_Item write set_Item; default; function Add(value: Group): Integer; function Contains(value: Group): Boolean; function IndexOf(value: Group): Integer; procedure Insert(index: Integer; value: Group); procedure Remove(value: Group); end; []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Romario (Listas) Sent: Monday, November 21, 2005 7:09 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Olá Daniel! Eu até imagino o quanto deve ser produtivo utilizar o ECO, mas eu sou adepto da turma que quer entender como e o que foi feito. Dessa forma, vou aperfeiçoando meus conhecimentos em orientação a objetos. ;-) Sds, Romario Daniel Polistchuck escreveu: Olá Romário, Este é o tipo de coisa com o qual o ECO ajuda demais! Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o
Re: [delphi-br] Re: Executar Flash
Então amigo. O que eu estou utilizando é esse mesmo, ou pelo menos penso ser. Eu o intalei pelo Import ActiveX Control. Porém, é necessário criar os arquivos fisicamente, pois eles estão armazenados em um banco de dados, e é exatamente o que eu não quero. Gostaria de criar um Stream e fazer o Flash rodar. Obrigado, Ilton Leonardo Martins escreveu: Não precisa de componente amigo, Basta você usar uma OCX gratuita do Flash que vem no Delphi :) Se eu não me engano o nome é Shockwave Flash (Version 1.0) Espero ter ajudado. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Res: Re: RES: [delphi-br] TransactionID - Dúvida
Ricardo, pelo pouco q cheguei a aprender sobre transações sei q se você abre e fecha as transações não tem problema nenhum, inclusive com o teu banco eu uso assim, toda vez q vou fazer uma consulta, inserir , alterar ou deletar dados abro a transação e fecho, já seja com commit ou rollback em caso de erro tipo você tem um botão q consulta ao banco porcedure Tform1.buttonclick var tc : TtransactionDesc; begin try tc.TransactionID := 1; // identifica a transação tc.IsolationLevel := xilREADCOMMITTED; //pede pare ler unicamente os dados comitados sqlconnection.startransaction(tc);//peço para q a coneção inicie a transação com o banco whit sqlquery do begin close; sql.clear; sql.add('select * from tabela'); open; end; sqlconnection.commit(tc); //fecho a transação para evitar panes no banco except on e : exception do begin sqlconnection.rollback(tc); //caso der pau vc cancela a transação, e fica fechada de qualquer forma end; end; mas tudo numa mesma operação, mesma coisa quando vamos salvar dados ou deletar. não sei se você usa o ibexpert para gerenciar o banco de dados, nele, para você fechar , caso você este numa transação aberta ele sempre pede para fazer o commit ou rollback mesmo num select básico da vida, li tambem numa das listas acho q de firebird, q se você deixa transações sem terminar o banco acaba corrompido, por isso se vc deixa a transação aberta e cai a força, ou o usuário fecha sem cancelar da pane no banco aos pouquinhos espero ter ajudado, e espero q você tenha me entendido, pois meu português não é dos melhores. []s Miguel Delphi na veia ---Mensagem original--- De: Ricardo Cabral Data: 11/24/05 09:25:04 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] TransactionID - Dúvida Madsom, Primeiramente, valeu pela atenção. Mas se eu estiver usando rede, qual seria o procedimento? Pois vários usuário podem abrir a mesma tabela ao mesmo tempo em várias máquinas diferentes. Madsom Silva [EMAIL PROTECTED] escreveu: Ricardo, o TransactionID deve ser diferente para transações concorrente. Se você abre e fecha a transação uma por vez ele pode ser sempre o mesmo. Ex.: Se vc abre uma transação para pedido e uma outra pra cliente (ao mesmo tempo) elas tem quer ter números diferente. Se vc abre a de pedido e fecha, depois abre a de cliente e fecha pode ser o mesmo número. Obs.: cuidado com sistemas MDI, aonde o usuário pode abrir vários formulários ao mesmo tempo. Sem mais, Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Ricardo Cabral Enviada em: quarta-feira, 23 de novembro de 2005 16:46 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] TransactionID - Dúvida Pessoal, Gostaria de saber mais como usar o TransactionID em uma linguagem simples. Por exemplo: Para cada transação eu tenho que colocar um ID diferente. Exemplo: transação na tabela de vendas - TransactionID:=1, transação na tabela de cliente, TransactionID:=2 e assim por diante. Desde de já agradeço!! Abraços, Ricardo Cabral - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.1.362 / Virus Database: 267.13.4/176 - Release Date: 20/11/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]= http://br.rd.yahoo.com/SIG=12f0p5qra/M=365837.7000707.7924794 2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132796543/A=2950750/R=0/id=flashu l/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_flashfile= http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario swf?clickTAG=javascript:LRECopenWindow(1); var lrec_altURL=http://br.rd yahoo.com/SIG=12f0p5qra/M=365837.7000707.7924794 2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132796543/A=2950750/R=1/id=altimg SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_altimg=http://br.i1 yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif; var lrec_width=300;var lrec_height=250;
Re: [delphi-br] Obrigado Danilo - ProviderFlags - Mas... por favor esclareça.
Luis, desde que deixei de trabalhar com paradox, não uso mais campos fklookup. Esse erro que vc mencionou eu desconheço, mas imagino que este erro que vc está tendo esse erro, porque seu LookupComboBox está ligado a um lookupField(eu nunca liguei combobox em campo fklookup). Tente não criar este lookupfield, e simplesmente ligar o lookupcombobox a um clientdataset separado, e certifique-se que a query + datasetprovider + clientdataset estão ligados corretamente. Lembro-me que o Lichot falou uma vez, que sempre que possível deixe a tabela que sofrerá alterações(insert, update,delete) o mais simples possível(evitando muitos joins). Assim vc ganha em processamento de atualização, e evita, por exemplo a necessidade de sempre mexer muito nos providers flags. A não ser que vc seja o único programador, pois imagine uma equipe de 5 programadores, e por ventura um deles vai, remove o campo e adiciona de novo... o provider foi perdido, e quando for para a produção vai dar PAU e se for um fim de semana, então, ou seu cliente for de outra cidade... Você está pego... Att. Danilo Luis Lopes [EMAIL PROTECTED] escreveu: Danilo, Pegando um gancho na discursão de vocês... Num cadastro de clientes, onde tenho que informar qual a cidade, como no seu exemplo, qual é a melhor forma de trabalhar? Eu sempre trabalhei criando um campo lookup (fkLookup) no clientdataset (cliente, no caso do seu exemplo) e na tela, coloco um DBLookupComboBox apontando para o field lookup que criei. Essa é a melhor forma? Outra coisa: (ainda seguindo o seu exemplo) quando vou gravar o cliente, e dá algum erro na gravação (um campo required que não informei, por exemplo), quando tento escolher a cidade, novamente (depois do erro), no DBLookupComboBox, aparece a mensagem 'Cursor Unknow'. Tento novamente mais umas 2 ou 3 vezes e passa. Procurei na net e as sugestões que encontrei não resolveu o problema. Poderia me ajudar com isso? Abusando mais um pouco, outro erro que acontece muito e, apesar de eu estar conseguindo resolver, eu ainda não sei direito o que causa, é o 'invalid point operation' Sabe alguma coisa sobre isso? Agradeço muito qualquer ajuda. Luis Alberto. --- Danilo Rogério [EMAIL PROTECTED] escreveu: Vc nem precisaria fazer este campo lookup. Por ex: Se vc abrir o cadastro de cidade, fizer a inclusão de uma nova cidade, ao sair da tela vc ja pode atribuir ao campo ID_CIDADE, NOME_CIDADE(da sua query do cadastro de cliente) a nova cidade cadastrada. Att. Danilo User-BA [EMAIL PROTECTED] escreveu: Sua explanação sobre a configuração dos Flags foi por demais esclarecedora. Vou aproveita para abusar mais um pouco :) No seu exemplo, a SQL sugere que para a tela de cadastro de clientes sempre será trazida uma cidade já cadastrada. (o que vale para os Updates e Deletes). Caso seja uma inclusão e a cidade ainda não esteja cadastrada, nesta tela disponibilizamos de clientes uma opção para abrir a tela para o cadastro da cidades. Ok! Tendo que fazer isto, você sugeriria que no cadastro de clientes deveria ter um campo fazendo um (lookup/nome da cidade) entre cidades/clientes para buscar/trazer o código da cidade? ou você sugere alguma outra adaptação em SQL para este fim? Tipo: Um Lookup em SQL? Obrigado pela aula. Luciano-User-BA. Danilo Rogério wrote: Não entendi muito bem se COL_CHAVE também faz parte da chave primaria da tabela DICAS(fazendo com que sua tabela tenha uma chave composta, mas vou explicar detalhadamente, a maneira como eu trabalho Tabela CIDADE --- PK ID_CIDADE NOME_CIDADE Tabela CLIENTE PK ID_CLIENTE NOME_CLIENTE FK ID_CIDADE onde PK é Primary Key(chave Primária) e FK é Foreign Key(Chave Estrangeira), no caso de alguem desconhecer essas notações Suponhamos que vamos fazer operações de inclusão, exclusão, alteração na tabela CLIENTE, mas queremos mostrar o nome da cidade que este cliente mora. SELECT A.ID_CLIENTE, A.NOME_CLIENTE, A.ID_CIDADE, B.NOME_CIDADE FROM CLIENTE A, CIDADE B WHERE A.ID_CIDADE = B.ID_CIDADE Bem, vamos aos flags. 1) Estamos manipulando CLIENTES, certo? Portanto apenas as colunas referentes a tabela de clientes devem ser atualizadas, ou seja, a coluna NOME_CIDADE é meramente demonstrativa. 2) Configure os providers flags do SQLDataset ou SQLQuery ID_CLIENTE(é a chave) pfInfUpdate = True pfInfWhere = True pfInfKey = True /// Porque esta coluna é a chave pfInfHidden = False NOME_CLIENTE pfInfUpdate = True pfInfWhere = True pfInfKey = False pfInfHidden = False ID_CIDADE(note que esse campo vem da tabela CLIENTE, portanto deve ser atualizado) pfInfUpdate = True pfInfWhere = True
ENC: [delphi-br] Catraca Informatizada Henry
O modelo q tem é Catraca Informatizada http://www.analogicanet.com.br/catracas.htm A dll, foi a q peguei no site, é so isso q tenho. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de plucaslazaro Enviada em: quinta-feira, 24 de novembro de 2005 09:29 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Catraca Informatizada Henry Qual o modelo da sua catraca e versao da DLL para acesso? Paulo - Original Message - From: Cristian I Machado [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, November 24, 2005 8:49 AM Subject: [delphi-br] Catraca Informatizada Henry Pessoal, alguém tem um manual da dll da catraca informatizada Henry, ou melhor, se tiver um pequeno exemplo em Delphi me ajudará e muito. Desde já agradeço Cristian [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12fubbi1v/M=365837.7000707.7924794.2369893/D=brc lubs/S=2137111264:HM/Y=BR/EXP=1132841279/A=2950750/R=2/id=noscript/SIG=10tif t5qr/*http:/br.movies.yahoo.com/ http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do http://br.yahoo.com/info/utos.html Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Executar Flash
oi Leonardo, precisa de componente, sim, não sei se voce viu a primeira mensagem dele, ele quer rodar o flash sem salvar pro disco antes, e não dá pra fazer isso simplesmente importando o ocx. no such thing as a free lunch. Carlos Mensagem: 8 Data: Thu, 24 Nov 2005 08:43:45 -0200 De: Leonardo Martins [EMAIL PROTECTED] Assunto: Re: Re: Executar Flash Não precisa de componente amigo, Basta você usar uma OCX gratuita do Flash que vem no Delphi :) Se eu não me engano o nome é Shockwave Flash (Version 1.0) Espero ter ajudado. Leonardo - Original Message - From: Ilton Vieira Junior To: delphi-br@yahoogrupos.com.br Sent: Wednesday, November 23, 2005 3:47 PM Subject: Re: [delphi-br] Re: Executar Flash Fico grato Carlos. Achei o componente, o nomé FlashPlayerControl, porém o que no site é só o demo :-(. Este Demo coloca uma tarja na frente do flash, dizendo Demo Flash e para comprar, custa 300 dolares. Completamente fora de meu orçamento. Mais alguma sugestão?? Obrigado, Ilton [EMAIL PROTECTED] escreveu: oi Ílton, já vi um componente pra isso, tem sempre um link patrocinado deles no Torry´s: www.torry.net mas nao lembro o nome exato, voce pode importar o activeX do flash para o delphi mas aí vai precisar salvar no disco - que é o que voce nao quer, com esse componente eles prometem (nao testei) que dá pra faazer um stream em memoria. []s, -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: Res: Re: RES: [delphi-br] TransactionID - Dúvida
Caro Miguel, Eu faço a mesma coisa que você, só gostaria de tirar mesmo a dúvida. Ainda não consegui ver em qual situação usuaríamos um outro ID para a transação. Valeu! Miguel - DPF [EMAIL PROTECTED] escreveu: Ricardo, pelo pouco q cheguei a aprender sobre transações sei q se você abre e fecha as transações não tem problema nenhum, inclusive com o teu banco eu uso assim, toda vez q vou fazer uma consulta, inserir , alterar ou deletar dados abro a transação e fecho, já seja com commit ou rollback em caso de erro tipo você tem um botão q consulta ao banco porcedure Tform1.buttonclick var tc : TtransactionDesc; begin try tc.TransactionID := 1; // identifica a transação tc.IsolationLevel := xilREADCOMMITTED; //pede pare ler unicamente os dados comitados sqlconnection.startransaction(tc);//peço para q a coneção inicie a transação com o banco whit sqlquery do begin close; sql.clear; sql.add('select * from tabela'); open; end; sqlconnection.commit(tc); //fecho a transação para evitar panes no banco except on e : exception do begin sqlconnection.rollback(tc); //caso der pau vc cancela a transação, e fica fechada de qualquer forma end; end; mas tudo numa mesma operação, mesma coisa quando vamos salvar dados ou deletar. não sei se você usa o ibexpert para gerenciar o banco de dados, nele, para você fechar , caso você este numa transação aberta ele sempre pede para fazer o commit ou rollback mesmo num select básico da vida, li tambem numa das listas acho q de firebird, q se você deixa transações sem terminar o banco acaba corrompido, por isso se vc deixa a transação aberta e cai a força, ou o usuário fecha sem cancelar da pane no banco aos pouquinhos espero ter ajudado, e espero q você tenha me entendido, pois meu português não é dos melhores. []s Miguel Delphi na veia ---Mensagem original--- De: Ricardo Cabral Data: 11/24/05 09:25:04 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] TransactionID - Dúvida Madsom, Primeiramente, valeu pela atenção. Mas se eu estiver usando rede, qual seria o procedimento? Pois vários usuário podem abrir a mesma tabela ao mesmo tempo em várias máquinas diferentes. Madsom Silva [EMAIL PROTECTED] escreveu: Ricardo, o TransactionID deve ser diferente para transações concorrente. Se você abre e fecha a transação uma por vez ele pode ser sempre o mesmo. Ex.: Se vc abre uma transação para pedido e uma outra pra cliente (ao mesmo tempo) elas tem quer ter números diferente. Se vc abre a de pedido e fecha, depois abre a de cliente e fecha pode ser o mesmo número. Obs.: cuidado com sistemas MDI, aonde o usuário pode abrir vários formulários ao mesmo tempo. Sem mais, Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Ricardo Cabral Enviada em: quarta-feira, 23 de novembro de 2005 16:46 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] TransactionID - Dúvida Pessoal, Gostaria de saber mais como usar o TransactionID em uma linguagem simples. Por exemplo: Para cada transação eu tenho que colocar um ID diferente. Exemplo: transação na tabela de vendas - TransactionID:=1, transação na tabela de cliente, TransactionID:=2 e assim por diante. Desde de já agradeço!! Abraços, Ricardo Cabral - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.1.362 / Virus Database: 267.13.4/176 - Release Date: 20/11/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]= http://br.rd.yahoo.com/SIG=12f0p5qra/M=365837.7000707.7924794 2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132796543/A=2950750/R=0/id=flashu l/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_flashfile= http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario swf?clickTAG=javascript:LRECopenWindow(1); var
Re: [delphi-br] Re: OO - Relação 1 para N
Isso nao ocasionaria uma referencia circular? TCliente conhece TPedidoList, que conhece TPedido, que por sua vez conhece TCliente Sds. Francisco On 11/24/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Algo como TCliente = class (...) (...) property Pedidos : TPedidoList; (...) (...) end; TPedido = class (...) (...) property Cliente :TCliente; (...) (...) end; Abraço, Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Francisco Trindade Sent: Thursday, November 24, 2005 1:40 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Mas como isso fica implementado em codigo? Sds. Francisco On 11/23/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Sim. Se você não adicionar sentido à associação, elas são bidirecionais. Do pedido vai ao cliente e do cliente aos pedidos. []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Francisco Trindade Sent: Wednesday, November 23, 2005 8:31 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Daniel, ja que vc entrou na discussao, tem como ser implementada uma relacao 1 para N com bidirecionalidade no ECO? E 1 para 1? Sds. Francisco On 11/22/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Olá Romario, O ECO implementa 1 para N com uma lista de objetos do .NET. Esta lista é uma interface descendente de ICollection, implementada por um adapter ao redor do IList. [UmlCollection(TypeOf(Group))] IGroupList = interface(ICollection) {$REGION 'ECO generated code'} function get_Item(index: Integer): Group; procedure set_Item(index: Integer; Value: Group); property Item[index: Integer]: Group read get_Item write set_Item; default; function Add(value: Group): Integer; function Contains(value: Group): Boolean; function IndexOf(value: Group): Integer; procedure Insert(index: Integer; value: Group); procedure Remove(value: Group); procedure Clear; procedure RemoveAt(index: Integer); {$ENDREGION 'ECO generated code'} end; GroupListAdapter = class(ObjectListAdapter, IGroupList) public constructor Create(source: IList); function get_Item(index: Integer): Group; procedure set_Item(index: Integer; Value: Group); property Item[index: Integer]: Group read get_Item write set_Item; default; function Add(value: Group): Integer; function Contains(value: Group): Boolean; function IndexOf(value: Group): Integer; procedure Insert(index: Integer; value: Group); procedure Remove(value: Group); end; []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto: [EMAIL PROTECTED] On Behalf Of Romario (Listas) Sent: Monday, November 21, 2005 7:09 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Olá Daniel! Eu até imagino o quanto deve ser produtivo utilizar o ECO, mas eu sou adepto da turma que quer entender como e o que foi feito. Dessa forma, vou aperfeiçoando meus conhecimentos em orientação a objetos. ;-) Sds, Romario Daniel Polistchuck escreveu: Olá Romário, Este é
Re: [delphi-br] Exemplo de insert com DBExpress
1) Vamos as ligações Query Ligada no SqlConection pela propriedade SQLConection DataSetProvider ligado na Query pela propriedade DataSet ClientDataset ligado no DataSetProvider pela propriedade ProviderName DataSource ligado no ClientDataSet pela propriedade DataSet 2) Um caso simples SELECT COD_CLIENTE, NOME FROM CLIENTE 3) Seu trecho ficaria assim: // Abre a tabela ClientDataset.Close; ClientDataset.Open; // Coloca em modo de inserção ClientDataSet.Insert; // Manipula os dados no seu DBEDit e depois faça o seguinte, em um botão salvar ClientDataSet.Post; // Esta linha abaixo gravará no banco de dados ClientDataSet.ApplyUpdates(0); Espero ter ajudado, Danilo // Depois disso em um ouro Cândido Luís Dias Ferreira [EMAIL PROTECTED] escreveu: Povo Embora pareça banal, não estou conseguindo fazer um insert com DBExpress. Está dando um erro. Estou utilizando ClientDataSet, DataSetProvider e SQLQuery. Alguém teria um trecho de código como exemplo de utilização desses componentes acima? Atenciosamente Cândido Luís Dias Ferreira Tribunal Regional Eleitoral de São Paulo Seção de Desenvolvimento [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fvnci9u/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132854129/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1); var lrec_altURL=http://br.rd.yahoo.com/SIG=12fvnci9u/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132854129/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;; var lrec_width=300;var lrec_height=250; - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Projeto Pontual na Borland
A WA Informática busca profissionais que tenham dominio no Delphi (7.0) para atuar em projeto de 1 mês na Borland. Local de atuação região da Paulista. Interessados favor encaminhar cv por email colocando no assunto Delphi vaga Borland e no corpo da mensagem a pretensão de v/h. Att., Patricia Reis ([EMAIL PROTECTED]) -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] CAMPO MEMO
Pessoal alguem pode me ajudar? Estou tentando digitar no campo memo direto para uma tabela, alguem pode me ajudar? Tabela paradox. Estou usando delphi 5 Meu forme tem os seguintes componentes: tres botõem (LIMPA TEXT, EDITA TEXT E GRAVA TEXTO) Limpar eu já consegui. Como eu faço para editar o memo e depois gravar aquilço que eu for digitar na tabela. PAULO FERNANDES PORTO ALEGRE [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RE: [delphi-br] Re: OO - Relação 1 para N
A declaração mais completa seria TPedido = class (..); //forward declaration TPedidoList = class(...) (...) end; TCliente = class(...) (...) property Pedidos :TPedidoList; (...) end; TPedido = class (...) Cliente: TCliente; (...) end; Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Francisco Trindade Sent: Thursday, November 24, 2005 3:59 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Isso nao ocasionaria uma referencia circular? TCliente conhece TPedidoList, que conhece TPedido, que por sua vez conhece TCliente Sds. Francisco On 11/24/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Algo como TCliente = class (...) (...) property Pedidos : TPedidoList; (...) (...) end; TPedido = class (...) (...) property Cliente :TCliente; (...) (...) end; Abraço, Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Francisco Trindade Sent: Thursday, November 24, 2005 1:40 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Mas como isso fica implementado em codigo? Sds. Francisco On 11/23/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Sim. Se você não adicionar sentido à associação, elas são bidirecionais. Do pedido vai ao cliente e do cliente aos pedidos. []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Francisco Trindade Sent: Wednesday, November 23, 2005 8:31 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Re: OO - Relação 1 para N Daniel, ja que vc entrou na discussao, tem como ser implementada uma relacao 1 para N com bidirecionalidade no ECO? E 1 para 1? Sds. Francisco On 11/22/05, Daniel Polistchuck [EMAIL PROTECTED] wrote: Olá Romario, O ECO implementa 1 para N com uma lista de objetos do .NET. Esta lista é uma interface descendente de ICollection, implementada por um adapter ao redor do IList. [UmlCollection(TypeOf(Group))] IGroupList = interface(ICollection) {$REGION 'ECO generated code'} function get_Item(index: Integer): Group; procedure set_Item(index: Integer; Value: Group); property Item[index: Integer]: Group read get_Item write set_Item; default; function Add(value: Group): Integer; function Contains(value: Group): Boolean; function IndexOf(value: Group): Integer; procedure Insert(index: Integer; value: Group); procedure Remove(value: Group); procedure Clear; procedure RemoveAt(index: Integer); {$ENDREGION 'ECO generated code'} end; GroupListAdapter = class(ObjectListAdapter, IGroupList) public constructor Create(source: IList); function get_Item(index: Integer): Group; procedure set_Item(index: Integer; Value: Group); property Item[index: Integer]: Group read get_Item write set_Item; default; function Add(value: Group): Integer; function Contains(value: Group): Boolean; function IndexOf(value: Group): Integer; procedure Insert(index: Integer; value: Group); procedure Remove(value: Group); end; []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11)
[delphi-br] Gente uma ajuda por favor
Ninguém pode me ajudar e resolver esse problema? O programa está pronto... Sò gostaria de entender porque acontece isso... Consigo converter a imagem tranquilamente, porém imagens grandes ficam com tamanho pequeno e imagens pequenas com tamanho grande... Porque issO? ´Seria meu código? Por favor, precisava de uma ajuda urgente mesmo... [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Gente uma ajuda por favor
Manda o código que fica mais fácil de entender o que vc está fazendo! - Original Message - From: Leonardo Martins To: delphi-br@yahoogrupos.com.br Sent: Thursday, November 24, 2005 2:57 PM Subject: [delphi-br] Gente uma ajuda por favor Ninguém pode me ajudar e resolver esse problema? O programa está pronto... Sò gostaria de entender porque acontece isso... Consigo converter a imagem tranquilamente, porém imagens grandes ficam com tamanho pequeno e imagens pequenas com tamanho grande... Porque issO? ´Seria meu código? Por favor, precisava de uma ajuda urgente mesmo... [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Erro no Delphi com Oracle
Pessoal: Um colega me enviou uma pergunta, mas eu nunca acessei o Oracle com Delphi. Se alguem tiver alguma dica, agradeco muito se enviar. Vocês já viram a msg Blob not opened, quando tentamos dar um post em uma query após alterar um campo memo ? A base é oracle e o campo é do tipo varchar2(2000) ... Grato pela atencao de todos Paulo [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RE: [delphi-br] Gente uma ajuda por favor
Seu componente TImage deve estar com Stretch := True. Faça o seguinte: 1) Coloque um TScrollBox em seu Form 2) Coloque o TImage no ScrollBox (com Left e Top = 0) 3) Coloque False no TImage.Stretch 4) Coloque TImage.AutoSize := True. []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Leonardo Martins Sent: Thursday, November 24, 2005 2:57 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Gente uma ajuda por favor Ninguém pode me ajudar e resolver esse problema? O programa está pronto... Sò gostaria de entender porque acontece isso... Consigo converter a imagem tranquilamente, porém imagens grandes ficam com tamanho pequeno e imagens pequenas com tamanho grande... Porque issO? ´Seria meu código? Por favor, precisava de uma ajuda urgente mesmo... [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12fbc50ne/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132866092/A=2950750/R=2/id=noscript/SIG=10tift5qr/*http://br.movies.yahoo.com/ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Gerenciador de dispositivos
Alguém sabe como alterar as configurações dos dispositivos ( Painel de controle - sistema - Hardware - Gerenciador de dispositivos ) via programação. E que estou querendo mudar as propriedades da porta LPT1 via programação. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] RES: Diga qual foi a solução...
Solução: Colocar nos flags do sqldataset quais os campos que seriam atualizados e no evento OnGetTableName do datasetprovider a tabela que irá sofrer as atualizações. Um abraço, Levi _ De: Danilo Rogério [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 24 de novembro de 2005 13:07 Para: [EMAIL PROTECTED] Assunto: Diga qual foi a solução... Levi, tudo bom... Que bom que seu problema foi solucionado...Mas poste na lista o que tinha de errado... Era as letras minúsculas ou faltou o evento OnGetTableName??? Att. Danilo _ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale http://us.rd.yahoo.com/mail/br/tagline/discador/*http://br.acesso.yahoo.com / o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Gente uma ajuda por favor
Essa é a procedure que eu eu executo... É simples... procedure TFrmPrincipal.ConverteImagem(index: Integer); var Redimensionar,ScalaCinza,Comprimir: Boolean; qualidade: TJPEGQualityRange; begin Redimensionar := chkbxred.Checked; ScalaCinza := chkbxpb.Checked; Comprimir := chkbxComp.Checked; imgBmp := TBitmap.Create; imgJpeg := TJPEGImage.Create; caminho := lstbxbmp.Items.Strings[index]; caminhoex := caminho; Delete(caminhoex,Pos('.',caminhoex),4); if FileExists(caminho) then begin imgBmp.LoadFromFile(caminho); if Redimensionar then begin imgBmp.Width := StrToInt(edtW.Text); imgBmp.Height := StrToInt(edtH.Text); end; imgJpeg.Assign(imgBmp); imgJpeg.CompressionQuality := 50; imgJpeg.Compress; if ScalaCinza then imgJpeg.Grayscale := true; if Comprimir then begin qualidade := StrToInt(edtQualidade.Text); imgJpeg.CompressionQuality := qualidade; imgJpeg.Compress; end; end; end; Ta ae... - Original Message - From: Denise To: delphi-br@yahoogrupos.com.br Sent: Thursday, November 24, 2005 5:03 PM Subject: Re: [delphi-br] Gente uma ajuda por favor Manda o código que fica mais fácil de entender o que vc está fazendo! - Original Message - From: Leonardo Martins To: delphi-br@yahoogrupos.com.br Sent: Thursday, November 24, 2005 2:57 PM Subject: [delphi-br] Gente uma ajuda por favor Ninguém pode me ajudar e resolver esse problema? O programa está pronto... Sò gostaria de entender porque acontece isso... Consigo converter a imagem tranquilamente, porém imagens grandes ficam com tamanho pequeno e imagens pequenas com tamanho grande... Porque issO? ´Seria meu código? Por favor, precisava de uma ajuda urgente mesmo... [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Gente uma ajuda por favor
Daniel, Estou criando as imagens na mão.. Estou convertendo dando um Bmp.Assign(JPEG) Só que eu percebi isso, com as imagens, pequenas, as imagens em preto e branco ele está aumentando o tamanho e eu preciso que o tamanho seja reduzido... Mas ele só reduz as imagens grandes :/ Preciso de resolver isso, pessoal... Obrigado, Att Leonardo - Original Message - From: Daniel Polistchuck To: delphi-br@yahoogrupos.com.br Sent: Thursday, November 24, 2005 5:22 PM Subject: RE: [delphi-br] Gente uma ajuda por favor Seu componente TImage deve estar com Stretch := True. Faça o seguinte: 1) Coloque um TScrollBox em seu Form 2) Coloque o TImage no ScrollBox (com Left e Top = 0) 3) Coloque False no TImage.Stretch 4) Coloque TImage.AutoSize := True. []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Leonardo Martins Sent: Thursday, November 24, 2005 2:57 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Gente uma ajuda por favor Ninguém pode me ajudar e resolver esse problema? O programa está pronto... Sò gostaria de entender porque acontece isso... Consigo converter a imagem tranquilamente, porém imagens grandes ficam com tamanho pequeno e imagens pequenas com tamanho grande... Porque issO? ´Seria meu código? Por favor, precisava de uma ajuda urgente mesmo... [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12fbc50ne/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132866092/A=2950750/R=2/id=noscript/SIG=10tift5qr/*http://br.movies.yahoo.com/ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Gente uma ajuda por favor
Ninguém pode me ajudar e resolver esse problema? O programa está pronto... Sò gostaria de entender porque acontece isso... Consigo converter a imagem tranquilamente, porém imagens grandes ficam com tamanho pequeno e imagens pequenas com tamanho grande... Porque issO? ´Seria meu código? Por favor, precisava de uma ajuda urgente mesmo... [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erro no Delphi com Oracle
Existem diversas maneiras de conectar o Oracle no Delphi. No estilo de programação escolhido por mim, a melhor forma de conectar tem sido o dbExpress que vem Delphi desde a versão 7. --- Paulo [EMAIL PROTECTED] escreveu: - Pessoal: Um colega me enviou uma pergunta, mas eu nunca acessei o Oracle com Delphi. Se alguem tiver alguma dica, agradeco muito se enviar. Vocês já viram a msg Blob not opened, quando tentamos dar um post em uma query após alterar um campo memo ? A base é oracle e o campo é do tipo varchar2(2000) ... Grato pela atencao de todos Paulo [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM http://br.groups.yahoo.com/group/delphi-br/messages Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fcs9bkb/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132866653/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var lrec_altURL=http://br.rd.yahoo.com/SIG=12fcs9bkb/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132866653/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var lrec_width=300;var lrec_height=250; - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Exemplo de insert com DBExpress
Valeu Danilo, acho que o esquema que você demostrou abaixo vai servir para fazer uns testes no Oracle 9i --- Danilo Rogério [EMAIL PROTECTED] escreveu: - 1) Vamos as ligações Query Ligada no SqlConection pela propriedade SQLConection DataSetProvider ligado na Query pela propriedade DataSet ClientDataset ligado no DataSetProvider pela propriedade ProviderName DataSource ligado no ClientDataSet pela propriedade DataSet 2) Um caso simples SELECT COD_CLIENTE, NOME FROM CLIENTE 3) Seu trecho ficaria assim: // Abre a tabela ClientDataset.Close; ClientDataset.Open; // Coloca em modo de inserção ClientDataSet.Insert; // Manipula os dados no seu DBEDit e depois faça o seguinte, em um botão salvar ClientDataSet.Post; // Esta linha abaixo gravará no banco de dados ClientDataSet.ApplyUpdates(0); Espero ter ajudado, Danilo // Depois disso em um ouro Cândido Luís Dias Ferreira [EMAIL PROTECTED] escreveu: Povo Embora pareça banal, não estou conseguindo fazer um insert com DBExpress. Está dando um erro. Estou utilizando ClientDataSet, DataSetProvider e SQLQuery. Alguém teria um trecho de código como exemplo de utilização desses componentes acima? Atenciosamente Cândido Luís Dias Ferreira Tribunal Regional Eleitoral de São Paulo Seção de Desenvolvimento [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fvnci9u/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132854129/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1); var lrec_altURL=http://br.rd.yahoo.com/SIG=12fvnci9u/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132854129/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;; var lrec_width=300;var lrec_height=250; - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM http://br.groups.yahoo.com/group/delphi-br/messages Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fkdhg9q/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132862435/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var lrec_altURL=http://br.rd.yahoo.com/SIG=12fkdhg9q/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132862435/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var lrec_width=300;var lrec_height=250; - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Re: TransactionID - Dúvida - Aprove itando o Gancho - Olá Madsom
Luciano, segue a mesma resposta do Ricardo. o fato de ter vários usuários ou de estar em rede não é determinante pra o TransactionID. O efeito é dentro de uma mesma rotina (transação). Ex.: Siga esta visualização fictícia abaixo : transação 1 ... ... Transação 2 ... ... commit ou roolback transação 2 ... ... commit ou roolback transação 1 Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de User-BA Enviada em: quarta-feira, 23 de novembro de 2005 20:23 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: TransactionID - Dúvida - Aproveitando o Gancho - Olá Madsom Eu também tenho dúvidas a respeito do funcionamento das transações. Digamos que o usuário tenha 5 máquinas em rede. A maquina 1 é o servidor de dados (executando o firebird por exemplo), em cada 1 das maquina (2 a 5) ele tem instalado meu programa que acessa via TCP/IP os dados do servidor. Como o código do executável é o mesmo, como fica a questão das ID´s das transações? Tipo: Numa inclusão de clientes eu codifiquei internamente para iniciar um ID = 1 para este tipo de operação, mas se nas 4 maquinas a inclusão de clientes for iniciada, todas as transações estarão com ID = 1. Então como é que realmente este processo funciona? Obrigado desde já pelos esclarecimentos. Luciano-User-BA Madsom Silva wrote: Ricardo, o TransactionID deve ser diferente para transações concorrente. Se você abre e fecha a transação uma por vez ele pode ser sempre o mesmo. Ex.: Se vc abre uma transação para pedido e uma outra pra cliente (ao mesmo tempo) elas tem quer ter números diferente. Se vc abre a de pedido e fecha, depois abre a de cliente e fecha pode ser o mesmo número. Obs.: cuidado com sistemas MDI, aonde o usuário pode abrir vários formulários ao mesmo tempo. Sem mais, Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Ricardo Cabral Enviada em: quarta-feira, 23 de novembro de 2005 16:46 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] TransactionID - Dúvida Pessoal, Gostaria de saber mais como usar o TransactionID em uma linguagem simples. Por exemplo: Para cada transação eu tenho que colocar um ID diferente. Exemplo: transação na tabela de vendas - TransactionID:=1, transação na tabela de cliente, TransactionID:=2 e assim por diante. Desde de já agradeço!! Abraços, Ricardo Cabral - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.1.362 / Virus Database: 267.13.4/176 - Release Date: 20/11/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE *Links do Yahoo! Grupos* * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. -- * D7/Firebird/DbExpress-SQLDataSet+DataSetProvider+ClientDataSet Valeu pelas forças. Obrigado. Luciano-User-BA ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos
[delphi-br] RE: DBExpress - Oracle erro ORA-01036
Olá Candido, eu nunca trabalhei com DbExpress mas quando acontecia isso no bom e velho BDE, eu retirava todos os TFields do DataSet e os incluia novamente. Geralmente, algum campo era alterado na base e no TField ficava o campo velho. Veja se funciona... Rode também o SQLMonitor para ver qual SQL que o DbExpress está gerando e tente rodar o mesmo SQL na mão. Boa Sorte, Josir. Não consigo inserir dados no Oracle com os componentes do DBExpress... Dá o erro ORA-01036 nome/número de variável inválido e do DBExpress Invalid Field Type. Já tentei direto com o SQLQuery e com um ClientDataSet ligado a um SQLQuery. Alguém já passou por isso? Atenciosamente Cândido Luís Dias Ferreira -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] RES: Diga qual foi a solução...
A questão das letras MINUSCÚLAS OU maiúsculas se dá pelo fato de que, pelo menos no fire/interbase, ao ser criada o nome Tabela (observe as aspas), este nome torna-se case sensitive. Se esse comportamento se repete nos demais bancos eu não sei. Mas tive problemas assim quando utilizava o ErWin/IBConsole que gerava o MetaData com as tais aspas... Dê uma olhada no seu banco, pois se isso passar em branco, pode ser que do nada o erro volte a acontecer. []'s Francisco Thiago de Almeida Enter Plug Informática Divisão: Desenvolvimento e Banco de dados Franca / SP msn: [EMAIL PROTECTED] - Original Message - From: Levi Ribeiro de Freitas [EMAIL PROTECTED] To: 'Danilo Rogério' [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br Sent: Thursday, November 24, 2005 5:31 PM Subject: [delphi-br] RES: Diga qual foi a solução... Solução: Colocar nos flags do sqldataset quais os campos que seriam atualizados e no evento OnGetTableName do datasetprovider a tabela que irá sofrer as atualizações. Um abraço, Levi _ De: Danilo Rogério [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 24 de novembro de 2005 13:07 Para: [EMAIL PROTECTED] Assunto: Diga qual foi a solução... Levi, tudo bom... Que bom que seu problema foi solucionado...Mas poste na lista o que tinha de errado... Era as letras minúsculas ou faltou o evento OnGetTableName??? Att. Danilo _ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale http://us.rd.yahoo.com/mail/br/tagline/discador/*http://br.acesso.yahoo.com / o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Obrigado Danilo - ProviderFlags - Mas... por favor esclareça.
Ou vc digita o codigo do filme(inserção) fazendo um select para trazer... Ou vc coloca um lookupcombobox, ligado a um clientdataset para mostrar... Mas o companheiro aí está falando dos campos fklookup, aqueles que ao defini-los, vc seta as quatro ultimas configurações do novo campo. Danilo Francisco Thiago [EMAIL PROTECTED] escreveu: E como você trabalha com os campos lookup's? Exemplo: Suponhamos uma tabela Itens de locação (exemplo clássico). Como você mostraria, durante o insert, o título do filme. Suponhamos ainda que você permita uma reabertura de locação para inserir novos filmes. Como você faria? []'s Francisco Thiago de Almeida Enter Plug Informática Divisão: Desenvolvimento e Banco de dados Franca / SP msn: [EMAIL PROTECTED] - Original Message - From: Danilo Rogério [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Cc: [EMAIL PROTECTED] Sent: Thursday, November 24, 2005 2:04 PM Subject: Re: [delphi-br] Obrigado Danilo - ProviderFlags - Mas... por favor esclareça. Luis, desde que deixei de trabalhar com paradox, não uso mais campos fklookup. Esse erro que vc mencionou eu desconheço, mas imagino que este erro que vc está tendo esse erro, porque seu LookupComboBox está ligado a um lookupField(eu nunca liguei combobox em campo fklookup). Tente não criar este lookupfield, e simplesmente ligar o lookupcombobox a um clientdataset separado, e certifique-se que a query + datasetprovider + clientdataset estão ligados corretamente. Lembro-me que o Lichot falou uma vez, que sempre que possível deixe a tabela que sofrerá alterações(insert, update,delete) o mais simples possível(evitando muitos joins). Assim vc ganha em processamento de atualização, e evita, por exemplo a necessidade de sempre mexer muito nos providers flags. A não ser que vc seja o único programador, pois imagine uma equipe de 5 programadores, e por ventura um deles vai, remove o campo e adiciona de novo... o provider foi perdido, e quando for para a produção vai dar PAU e se for um fim de semana, então, ou seu cliente for de outra cidade... Você está pego... Att. Danilo Luis Lopes [EMAIL PROTECTED] escreveu: Danilo, Pegando um gancho na discursão de vocês... Num cadastro de clientes, onde tenho que informar qual a cidade, como no seu exemplo, qual é a melhor forma de trabalhar? Eu sempre trabalhei criando um campo lookup (fkLookup) no clientdataset (cliente, no caso do seu exemplo) e na tela, coloco um DBLookupComboBox apontando para o field lookup que criei. Essa é a melhor forma? Outra coisa: (ainda seguindo o seu exemplo) quando vou gravar o cliente, e dá algum erro na gravação (um campo required que não informei, por exemplo), quando tento escolher a cidade, novamente (depois do erro), no DBLookupComboBox, aparece a mensagem 'Cursor Unknow'. Tento novamente mais umas 2 ou 3 vezes e passa. Procurei na net e as sugestões que encontrei não resolveu o problema. Poderia me ajudar com isso? Abusando mais um pouco, outro erro que acontece muito e, apesar de eu estar conseguindo resolver, eu ainda não sei direito o que causa, é o 'invalid point operation' Sabe alguma coisa sobre isso? Agradeço muito qualquer ajuda. Luis Alberto. --- Danilo Rogério [EMAIL PROTECTED] escreveu: Vc nem precisaria fazer este campo lookup. Por ex: Se vc abrir o cadastro de cidade, fizer a inclusão de uma nova cidade, ao sair da tela vc ja pode atribuir ao campo ID_CIDADE, NOME_CIDADE(da sua query do cadastro de cliente) a nova cidade cadastrada. Att. Danilo User-BA [EMAIL PROTECTED] escreveu: Sua explanação sobre a configuração dos Flags foi por demais esclarecedora. Vou aproveita para abusar mais um pouco :) No seu exemplo, a SQL sugere que para a tela de cadastro de clientes sempre será trazida uma cidade já cadastrada. (o que vale para os Updates e Deletes). Caso seja uma inclusão e a cidade ainda não esteja cadastrada, nesta tela disponibilizamos de clientes uma opção para abrir a tela para o cadastro da cidades. Ok! Tendo que fazer isto, você sugeriria que no cadastro de clientes deveria ter um campo fazendo um (lookup/nome da cidade) entre cidades/clientes para buscar/trazer o código da cidade? ou você sugere alguma outra adaptação em SQL para este fim? Tipo: Um Lookup em SQL? Obrigado pela aula. Luciano-User-BA. Danilo Rogério wrote: Não entendi muito bem se COL_CHAVE também faz parte da chave primaria da tabela DICAS(fazendo com que sua tabela tenha uma chave composta, mas vou explicar detalhadamente, a maneira como eu trabalho Tabela CIDADE --- PK ID_CIDADE NOME_CIDADE Tabela CLIENTE PK ID_CLIENTE NOME_CLIENTE FK ID_CIDADE onde PK é Primary Key(chave Primária) e FK é Foreign Key(Chave Estrangeira), no caso de alguem desconhecer essas notações Suponhamos que vamos fazer operações de inclusão,
Re: [delphi-br] Exemplo de insert com DBExpress
Esse esquema vai servir para Oracle, Interbase, Firebird. Ou seja, qualquer SGBD que seja possível acesso via DBExpress, ADO, etc. Att. Danilo Marcio Melli Silvestre [EMAIL PROTECTED] escreveu: Valeu Danilo, acho que o esquema que você demostrou abaixo vai servir para fazer uns testes no Oracle 9i --- Danilo Rogério [EMAIL PROTECTED] escreveu: - 1) Vamos as ligações Query Ligada no SqlConection pela propriedade SQLConection DataSetProvider ligado na Query pela propriedade DataSet ClientDataset ligado no DataSetProvider pela propriedade ProviderName DataSource ligado no ClientDataSet pela propriedade DataSet 2) Um caso simples SELECT COD_CLIENTE, NOME FROM CLIENTE 3) Seu trecho ficaria assim: // Abre a tabela ClientDataset.Close; ClientDataset.Open; // Coloca em modo de inserção ClientDataSet.Insert; // Manipula os dados no seu DBEDit e depois faça o seguinte, em um botão salvar ClientDataSet.Post; // Esta linha abaixo gravará no banco de dados ClientDataSet.ApplyUpdates(0); Espero ter ajudado, Danilo // Depois disso em um ouro Cândido Luís Dias Ferreira [EMAIL PROTECTED] escreveu: Povo Embora pareça banal, não estou conseguindo fazer um insert com DBExpress. Está dando um erro. Estou utilizando ClientDataSet, DataSetProvider e SQLQuery. Alguém teria um trecho de código como exemplo de utilização desses componentes acima? Atenciosamente Cândido Luís Dias Ferreira Tribunal Regional Eleitoral de São Paulo Seção de Desenvolvimento [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fvnci9u/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132854129/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1); var lrec_altURL=http://br.rd.yahoo.com/SIG=12fvnci9u/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132854129/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;; var lrec_width=300;var lrec_height=250; - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM http://br.groups.yahoo.com/group/delphi-br/messages Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fkdhg9q/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132862435/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var lrec_altURL=http://br.rd.yahoo.com/SIG=12fkdhg9q/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132862435/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var lrec_width=300;var lrec_height=250; - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array(); lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fc3m777/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132875531/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var
[delphi-br] Espaço livre no disco de uma máquina na rede
Alguém sabe como buscar o espaço livre do disco (unidade C) de uma máquina (servidor). Buscando essa informação via rede ?? Daniel. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Exemplo de mestre/detalhe com ClientDataSet
Alguem tem algum link com um exemplo de como fazer um cadastro mestre/detalhe com DBExpress e ClientDataSet, no Delphi 7 ? Grato pela atencao de todos Paulo [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Gente uma ajuda por favor
Se entendi bem, o que o Leonardo quer saber é porque o arquivo Jpg fica maior que o BMP. Leonardo, se for isso, e se você está usando a unit Jpeg do Delphi com a classe TJpeg, verifique a taxa de compressão. Você deve estar transformando para a melhor qualidade e por isso não reduz o arquivo. Filipe Xavier Ramalho Desenvolvimento Telefone: (41) 3219-2043 Duty Sistemas de Gerenciamento de Riscos S/A http://www.duty.com.br Antes de imprimir pense no MEIO AMBIENTE! -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Daniel Polistchuck Enviada em: quinta-feira, 24 de novembro de 2005 17:23 Para: delphi-br@yahoogrupos.com.br Assunto: RE: [delphi-br] Gente uma ajuda por favor Seu componente TImage deve estar com Stretch := True. Faça o seguinte: 1) Coloque um TScrollBox em seu Form 2) Coloque o TImage no ScrollBox (com Left e Top = 0) 3) Coloque False no TImage.Stretch 4) Coloque TImage.AutoSize := True. []s Daniel Polistchuck Consulting Services Manager Borland Software Corporation Tel: +55 (11) 2165-8047/ Cel: +55 (11) 8196-5947 [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ A Borland Software Corporation é líder global em soluções independentes de plataforma para o Software Delivery Optimization, auxiliando nossos clientes a resolverem as restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o valor do negócio de seu software From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Leonardo Martins Sent: Thursday, November 24, 2005 2:57 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Gente uma ajuda por favor Ninguém pode me ajudar e resolver esse problema? O programa está pronto... Sò gostaria de entender porque acontece isso... Consigo converter a imagem tranquilamente, porém imagens grandes ficam com tamanho pequeno e imagens pequenas com tamanho grande... Porque issO? ´Seria meu código? Por favor, precisava de uma ajuda urgente mesmo... [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12fbc50ne/M=365837.7000707.7924794.2369893/D=brc lubs/S=2137111264:HM/Y=BR/EXP=1132866092/A=2950750/R=2/id=noscript/SIG=10tif t5qr/*http://br.movies.yahoo.com/ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Gente uma ajuda por favor
Ninguém pode me ajudar e resolver esse problema? O programa está pronto... Sò gostaria de entender porque acontece isso... Consigo converter a imagem tranquilamente, porém imagens grandes ficam com tamanho pequeno e imagens pequenas com tamanho grande... Porque issO? ´Seria meu código? Por favor, precisava de uma ajuda urgente mesmo... [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Exemplo de mestre/detalhe com ClientDataSet
Minha apostila www.micrologos.com.br/mc_clienteservidor.zip []´s Bruno Lichot Micrologos Dream Team Equipe Editorial ClubeDelphi DevMedia [EMAIL PROTECTED] [EMAIL PROTECTED] www.micrologos.com.br - www.clubedelphi.net - www.delphirio.assespro-rj.org.br De: Paulo [EMAIL PROTECTED] Para: [EMAIL PROTECTED] Assunto: [delphi-br] Exemplo de mestre/detalhe com ClientDataSet Alguem tem algum link com um exemplo de como fazer um cadastro mestre/detalhe com DBExpress e ClientDataSet, no Delphi 7 ? Grato pela atencao de todos Paulo [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Restaurar Conexão
Caros Amigos, esta é minha primeira presença nesta lista. Tenho um sistema de frente de caixa que é conectado ao servidor (firebird) com TADOConnection e TadoQuery para realizar as consultas, só acontece algumas vezes a conexão cair(problemas na rede,servidor reiniciou,etc). Minha dúvida é de como restaurar o mesmo TadoQuery realizando a consulta na base de dados local,pois não é simplesmente desconecta-lo e conectá-lo novamente a base local,pois fica dando erro e pior ainda que ao fechar o sistema o mesmo fica dando erro de aplicativo em Loop,até vc reiniciar o computador. Quem poder me ajudar,agradeceria e muito,pois estou com este sistema em um supermecado e preciso urgentemente. Att : Mário Augusto -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Transações Concorrentes
Caro Amigo, Eu Tive o Mesmo Problema e após trabalhar com Generators no firebird este problema não aconteceu mais. Os Generators são automaticamente incrementados pelo firebird independentemente mesmo que vc esteja dentro de uma transação. Na Maioria das vezes vc utiliza na trigger de inserção. Caso ainda não trabalhou com generators, vale a pena dar uma olhada. Att : Mário Augusto --- Em delphi-br@yahoogrupos.com.br, Thiago [EMAIL PROTECTED] escreveu Desenvolvi uma aplicação (delphi6 + Firebird + IBX) onde tenho em várias telas a utilização da mesma tabela que tem como indice Empresa + Sequencia. Acontece volta e meia quando dois usuários solicitam uma transação em telas diferentes na mesma tabela de pegar a mesma sequencia e acabar não gravando uma das transações. Quais práticas devo adotar para que isso não ocorra? Obrigado [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Testar rotina em vários S.O.
Testei no Windows 98 e essa rotina fecha o programa mas, não desliga o Computador Abraço Ademir -- Enviei esta mensagem ontem e não obtive nenhuma resposta, será que ninguem poderia testar isso ai. Galera, algum amigo da lista que tiver o win98 e o XP poderia testar a rotina abaixo e me retornar dizendo se a mesma funciona? Eu testei no windows 2000 e ela funcionou legal, gostaria de testar nos outros S.O. para poder usa-la em meu sistema. Obrigado. procedure TForm1.Sair1Click(Sender: TObject); var pid, hToken : THANDLE; tkp, tpkNewButIgnored : TOKEN_PRIVILEGES; tmpLuid : TLUIDAndAttributes; BufLen: DWORD; begin if Messagebox(handle,'Desligar o computador?','Desligar',MB_ICONQUESTION or MB_YESNO) = IDYes then begin Pid := GetCurrentProcess; OpenProcessToken(Pid, TOKEN_ADJUST_PRIVILEGES + TOKEN_QUERY, hToken); LookUpPrivilegeValue(nil, 'SeShutdownPrivilege', tmpLUID.LUID); with tkp do begin PrivilegeCount := 1; Privileges[0].Luid := tmpLUID.LUID; Privileges[0].Attributes := SE_PRIVILEGE_ENABLED; end; AdjustTokenPrivileges(hToken, False, tkp, sizeof(tpkNewButIgnored), tpkNewButIgnored, BufLen); if not ExitWindowsEx(EWX_FORCE + EWX_POWEROFF, 0) then {POWEROFF} ExitWindowsEx(EWX_FORCE + EWX_LOGOFF, 0); {LOGOFF} Close; end; end; [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] :: Gerar Etiquetas com Quick Report ::
Olá pessoal, estou precisando muito da ajuda de vcs. Estou começando a mexer com o quick report agora, eu uso delphi6, estou desenvolvendo um sistema de mala direta, e preciso elaborar um relatorio para imprimir etiquetas da seguinte maneira: etiqueta1 etiqueta2 etiqueta3 etiqueta4 etiqueta5 etiqueta6 etiqueta7 etiqueta8 e assim por diante porem nao consigo usar um banddetail uma do lado da outra, soh consigo assim oh: etiqueta1 etiqueta2 etiqueta3 e etc. ja defini as configuracoes do quickrep para 2 colunas e ainda nao consegui. alguem tem algum tutorial me ensinando isso..ou sabe o que pod ser?? Aguardo um retorno obrigado. thiago miranda - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: TransactionID + 1 dúv ida
Madson e quem mais quiser comentar, Mais uma vez valeu pela antenção! EU faça exatamente como você exemplificou, era só para saber se estou fazendo certo. Mas ainda falando sobre transação e agora acrecento outra dúvida: No meu programa, utilizo várias tabelas e para cada uma delas eu tenho um componente SQLDataSet, DataSource e SimpleDataSet tudo no mesmo data module. Minhas dúvidas são: 1 - Estou certo em ter um componente para cada tabela ? 2 - A estrutura de transação que você descreveu e que eu uso é a mesma ? Madsom Silva [EMAIL PROTECTED] escreveu: Luciano, segue a mesma resposta do Ricardo. o fato de ter vários usuários ou de estar em rede não é determinante pra o TransactionID. O efeito é dentro de uma mesma rotina (transação). Ex.: Siga esta visualização fictícia abaixo : transação 1 ... ... Transação 2 ... ... commit ou roolback transação 2 ... ... commit ou roolback transação 1 Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de User-BA Enviada em: quarta-feira, 23 de novembro de 2005 20:23 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: TransactionID - Dúvida - Aproveitando o Gancho - Olá Madsom Eu também tenho dúvidas a respeito do funcionamento das transações. Digamos que o usuário tenha 5 máquinas em rede. A maquina 1 é o servidor de dados (executando o firebird por exemplo), em cada 1 das maquina (2 a 5) ele tem instalado meu programa que acessa via TCP/IP os dados do servidor. Como o código do executável é o mesmo, como fica a questão das ID´s das transações? Tipo: Numa inclusão de clientes eu codifiquei internamente para iniciar um ID = 1 para este tipo de operação, mas se nas 4 maquinas a inclusão de clientes for iniciada, todas as transações estarão com ID = 1. Então como é que realmente este processo funciona? Obrigado desde já pelos esclarecimentos. Luciano-User-BA Madsom Silva wrote: Ricardo, o TransactionID deve ser diferente para transações concorrente. Se você abre e fecha a transação uma por vez ele pode ser sempre o mesmo. Ex.: Se vc abre uma transação para pedido e uma outra pra cliente (ao mesmo tempo) elas tem quer ter números diferente. Se vc abre a de pedido e fecha, depois abre a de cliente e fecha pode ser o mesmo número. Obs.: cuidado com sistemas MDI, aonde o usuário pode abrir vários formulários ao mesmo tempo. Sem mais, Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Ricardo Cabral Enviada em: quarta-feira, 23 de novembro de 2005 16:46 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] TransactionID - Dúvida Pessoal, Gostaria de saber mais como usar o TransactionID em uma linguagem simples. Por exemplo: Para cada transação eu tenho que colocar um ID diferente. Exemplo: transação na tabela de vendas - TransactionID:=1, transação na tabela de cliente, TransactionID:=2 e assim por diante. Desde de já agradeço!! Abraços, Ricardo Cabral - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.1.362 / Virus Database: 267.13.4/176 - Release Date: 20/11/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE *Links do Yahoo! Grupos* * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. -- *
Re: [delphi-br] Re: TransactionID + 1 dúv ida
Madson e quem mais quiser comentar, Mais uma vez valeu pela antenção! EU faça exatamente como você exemplificou, era só para saber se estou fazendo certo. Mas ainda falando sobre transação e agora acrecento outra dúvida: No meu programa, utilizo várias tabelas e para cada uma delas eu tenho um componente SQLDataSet, DataSource e SimpleDataSet tudo no mesmo data module. Minhas dúvidas são: 1 - Estou certo em ter um componente para cada tabela ? 2 - A estrutura de transação que você descreveu e que eu uso é a mesma ? Madsom Silva [EMAIL PROTECTED] escreveu: Luciano, segue a mesma resposta do Ricardo. o fato de ter vários usuários ou de estar em rede não é determinante pra o TransactionID. O efeito é dentro de uma mesma rotina (transação). Ex.: Siga esta visualização fictícia abaixo : transação 1 ... ... Transação 2 ... ... commit ou roolback transação 2 ... ... commit ou roolback transação 1 Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de User-BA Enviada em: quarta-feira, 23 de novembro de 2005 20:23 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: TransactionID - Dúvida - Aproveitando o Gancho - Olá Madsom Eu também tenho dúvidas a respeito do funcionamento das transações. Digamos que o usuário tenha 5 máquinas em rede. A maquina 1 é o servidor de dados (executando o firebird por exemplo), em cada 1 das maquina (2 a 5) ele tem instalado meu programa que acessa via TCP/IP os dados do servidor. Como o código do executável é o mesmo, como fica a questão das ID´s das transações? Tipo: Numa inclusão de clientes eu codifiquei internamente para iniciar um ID = 1 para este tipo de operação, mas se nas 4 maquinas a inclusão de clientes for iniciada, todas as transações estarão com ID = 1. Então como é que realmente este processo funciona? Obrigado desde já pelos esclarecimentos. Luciano-User-BA Madsom Silva wrote: Ricardo, o TransactionID deve ser diferente para transações concorrente. Se você abre e fecha a transação uma por vez ele pode ser sempre o mesmo. Ex.: Se vc abre uma transação para pedido e uma outra pra cliente (ao mesmo tempo) elas tem quer ter números diferente. Se vc abre a de pedido e fecha, depois abre a de cliente e fecha pode ser o mesmo número. Obs.: cuidado com sistemas MDI, aonde o usuário pode abrir vários formulários ao mesmo tempo. Sem mais, Madsom. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Ricardo Cabral Enviada em: quarta-feira, 23 de novembro de 2005 16:46 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] TransactionID - Dúvida Pessoal, Gostaria de saber mais como usar o TransactionID em uma linguagem simples. Por exemplo: Para cada transação eu tenho que colocar um ID diferente. Exemplo: transação na tabela de vendas - TransactionID:=1, transação na tabela de cliente, TransactionID:=2 e assim por diante. Desde de já agradeço!! Abraços, Ricardo Cabral - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.1.362 / Virus Database: 267.13.4/176 - Release Date: 20/11/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE *Links do Yahoo! Grupos* * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. -- *