RES: [delphi-br] Desenvolver em Delphi para PDA
Alessandro, Concordo plenamente com você. Agora mesmo tenho 3 livros sobre a minha mesa de trabalho: Core Java, Desenvolvendo com C# e Visual Basic 2005 in a nut shell. Estou estudando os três. A Microsoft lançou o .NET para concorrer com o Java. Mas o que é fato é que o .NET não é uma opção de plataforma, é simplesmente a evolução da plataforma Windows. Quem quiser programar para Windows terá que usar o .NET, não tem jeito. O problema em questão é que a Borland leva um tempo até soltar uma versão atualizada para o .NET, ou seja, estará sempre atrás da Microsoft. Dessa forma, aqui na empresa onde trabalho, por questões de software livre, estamos iniciando o desenvolvimento em Java, mas como profissional autônomo (que presto serviço para outras empresas fora do meu expediente) eu decidi desenvolver em Visual Basic e C#. Provavelmente ficarei com C# por ser parecido com o Java. Mas ainda acredito que para quem vem de Delphi, o Visual Basic é bem mais rápido de absorver. Agora assim como até hoje existem programadores em Clipper, ainda existirão os programadores Win32 e a microsoft manterá uma compatibilidade em seus sistemas operacionais para isso. Mas esse profissional estará bem longe da atualidade. Esta é a minha opinião. Abraços Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alessandro Fernandes Enviada em: sexta-feira, 31 de março de 2006 10:22 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Desenvolver em Delphi para PDA Aproveitando gostaria de compartilhar com os colegas, em tom de testemunho, uma conclusão a que cheguei: No que diz respeito a projetos win32 o Delphi é excelente e me serviu muito bem até aqui (trabalho com ele desde a versão 2). Mas no que tange a projetos .NET não está valendo à pena esperar pela Borland que nem suporta ainda a versão 2 do .NET (posição muito muito muito pessoal). Vocês já olharam com isenção o Visual Studio 2005? Excelente ferramenta a um preço muito mais atraente. A minha intenção nesse post é compartilhar com os colegas uma decisão de negócio que eu como empresário que trabalho com Delphi há muitos anos tomei. Sugiro aos colegas que analisem e tomem uma decisão também de negócio e não baseada na emoção. Não quero aqui despertar a ira dos fanáticos de plantão, apenas alertar para um fato. Temos de estar preparados para a mudança, e eu acho que a hora é agora. Notem que isso que disse vale apenas para novos projetos .NET. Eu vou manter o Delphi na manutenção dos sistemas win32 sem dúvida. Sugiro àqueles que nem sequer pensam na possibilidade de mudar de ferramenta que ao menos iniciem o uso do C# como linguagem, o que facilitará a mudança que terão de fazer no futuro. Mais uma vez quero afirmar: Isso é uma OPNIÃO pessoal. Quero pedir que respeitem a minha posição. Se quiserem responder, respondam, mas lembre-se que minha intenção aqui é boa. Espero ser compreendido Alessandro -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Juliano Carvalho - Folhamatic Enviada em: sexta-feira, 31 de março de 2006 13:35 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Desenvolver em Delphi para PDA Ok, a coisa já fugiu do foco do meu comentário mas vale a pena explicar esta questão, que já esta ficando com cara de flame. Uma coisa é o SDK do .Net Framework CF. O básico. Ele é composto de CLR (ambiente de execução) e do framework (os recursos, namespaces, classes...). Ele é produzido pela Microsoft. As IDEs se ligam ao SDK e obtém serviços de compilação, debug, ambiente de execução e etc. Produzem software, enfim. Isso é possível por q.q um. Isso eu outras coisas mais, usando outros SDKs. Estes SDKs não tem nada a ver com Delphi, C#, VB, BDS, VS ou q.q outra coisa. Com o bloco de notas e meia dúzia de linhas vc cria um programa e roda ele no emulador ou copia direto pro Pocket. Mas nem é esse o ponto. Outra coisa é o suporte nas IDEs. No tocante ao meu comentário, o foco é sobre o suporte na IDE (RAD, Deploy, Manage e etc). Enfim, criar, manter, distribuir e gerenciar uma solução do tipo Smart Device .Net. Resumindo: O ferramenta Delphi é capaz de compilar .Net CF? Sim. O produto BDS tem suporte a desenvolvimento .Net CF? Nao. Espero que tenha ficado claro de vez! - Original Message - From: José Henrique (Zote) [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, March 30, 2006 1:17 PM Subject: RES: [delphi-br] Desenvolver em Delphi para PDA Caros, O BDS 2006 tem suporte a CF sim! Não sei se em todas as versões, mas que tem, tem! O que ele não tem (ainda) é a parte visual pra isso
[delphi-br] [off Topic] Apostilas ISO - IEEE - CMM
Olá pessoal, Apesar do assunto não ter relação direta com Delphi, tem relação com programação. Alguém tem apostilas para ISO, IEEE e CMM ?? Grato. Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -- 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] 6º Delphi Developers Day - Uberlândia
Olá Pessoal da lista, Desde que eu saí de SP há 5 anos para vir morar em goiás fiquei bem por fora dos eventos de informática que por aqui são poucos. Agora vai ter o 6º DDD aqui perto em Uberlândia (é outro estado, mas está perto). Antes de confirmar a minha participação, gostaria de saber dos amigos da lista se vale a pena. Tipo se as palestras são boas, se tem certificado, se o coffe break é bom :) (hehehe forcei). Aguardo comentários. Obrigado. Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -- 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] Alguém já trabalhou com arquivos .KAR?????
Olá gente, Gostaria de saber se alguém já trabalhou com arquivos .kar, aqueles que são misto de Letra da música + MIDI, para Karaokê. Preciso abrir esses arquivos. Se alguém souber de algo, me avise. Obrigado. Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -- 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] ou [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] [Off-Topic] Abrir Empresa X Profissional Liberal ?????
Valfrid-Ly Silva Couto escreveu: Agora, só um detalhe, se eu estiver errado me corrijam mas todos tem mania de dizer que a empresa é LTDA e não ME mas, LTDA é a forma da sociedade, ou seja LTDA, S.A. e afins e ME, EPP e afins é para indicar o porte da empresa... então, empresas como a minha são LTDA - ME... o correto não seria dizer apenas que não é ME/EPP? Acho que vc está certo. Eu quis dizer que a minha empresa é de grande porte, ou seja não se enquadra no ME e nem SIMPLES, pois segundo a legislação brasileira, empresa de informática não se enquadra no SIMPLES nem ME, tem que ser empresa constituída de sociedade, obrigatoriamente. E ai vem uma cachoeira de impostos pra pagar. Por isso desisti da minha, está paralizada, acho que até completar 5 anos até eu poder fechar. Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -- 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] ou [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] Abrir Empresa X Profissional Liberal ?????
Olá pessoal da lista, Primeiramente me desculpem pelo off-topic, mas acredito que tenha tudo a ver com a nossa comunidade Delphi visto que muitos dos profissionais que fazem parte da lista já se depararam com essa questão. Eu tinha uma empresa Ltda, não é ME, na área de desenvolvimento de software, mas pedi a paralização por execesso de impostos. Eu acabava pagando muitos impostos e meu lucro, que já era pouco, ficava quase nenhum. Sabiam que o Ministério da fazenda não permite micro-empresa na área de informática? Pelo menos é isso que fiquei sabendo pelo meu contador. Bem, existem duas possibilidades de se emitir nota fiscal pelos serviços prestados, sem pagar uma fortuna de impostos por isso: 1) Registrar uma micro-empresa de digitação, ou algo semelhante 2) Registrar-se como profissional liberal na área de consultoria Estas informações, acima, são de um contador e não sei se estão corretas. Gostaria de ouvir a opnião de meus colegas sobre o assunto, de preferência quem já tem algum desses dois casos e qual é o menos ilegal, ou pelo menos o mais correto. Tipo se eu tiver uma empresa de digitação, por exemplo, e fornecer uma nota de desenvolvimento de software (que o meu cliente vai exigir, inclusive com a descrição) ai a fiscalização pode cair matando em cima de mim, não? Desculpas novamente pelo off-topic e agradeço a atenção de todos. []'s Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -- 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] ou [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] Desenvolvimento para MODEMs
Paulo, A minha empresa comprou por R$100,00. Você acha o componente em http://www.deepsoftware.ru/nrcomm chama-se nrcomm. Existe um outro melhor, e mais caro: http://www.kaed.com/kdtele/ Mas importante: o modem deve ser do tipo Voice/SpeakerPhone. Pois se não você terá o mesmo problema que eu. Se souber de algo, me avise. []'s Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de plucaslazaro Enviada em: segunda-feira, 2 de maio de 2005 18:33 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Desenvolvimento para MODEMs Boa Tarde Rafael, este componente que vc usa é free, se for qual o nome para que eu possa baixa-lo, ou se pago onde compro. Estou fazendo um sistema de Telemarkting e preciso discar, gravar a conversa, etc. Obrigado Paulo - Original Message - From: Rafael Franco Carvalho [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED] Sent: Monday, May 02, 2005 2:42 PM Subject: [delphi-br] Desenvolvimento para MODEMs Olá pessoal, Estou desenvolvendo um sistema que utiliza o Modem (Intel 536EP) para capturar as ligações telefônicas, assim que ela é atendida, uma mensagem é tocada, depois começa a gravação da conversa. Tem um componente baseado em TAPI, o nrComm, que me facilita bastante a vida pra fazer isso. Até ai tudo bem. Estou querendo utilizar a entrada/saída de audio do modem e dispensar o aparelho telefônico. O problema é: Ainda não consegui fazer com que a pessoa que esteja do outro lado da linha me escute, ou seja, o microfone não funciona, enquanto isso eu consigo ouvir tudo o que a pessoa fala. Se alguém já se deparou com esse problema, por favor me ajude!!! Grato. Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás - Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -- 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] ou [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] Desenvolvimento para MODEMs
Olá pessoal, Estou desenvolvendo um sistema que utiliza o Modem (Intel 536EP) para capturar as ligações telefônicas, assim que ela é atendida, uma mensagem é tocada, depois começa a gravação da conversa. Tem um componente baseado em TAPI, o nrComm, que me facilita bastante a vida pra fazer isso. Até ai tudo bem. Estou querendo utilizar a entrada/saída de audio do modem e dispensar o aparelho telefônico. O problema é: Ainda não consegui fazer com que a pessoa que esteja do outro lado da linha me escute, ou seja, o microfone não funciona, enquanto isso eu consigo ouvir tudo o que a pessoa fala. Se alguém já se deparou com esse problema, por favor me ajude!!! Grato. Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Maurício Chiarato Vaglieri Enviada em: segunda-feira, 2 de maio de 2005 10:24 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] [OFF TOPIC] Certificação Borland Caro Amigo, E onde eu poderia encontrar essas empresas que pagam essa quantia? Abraços, Mauricio - Original Message - From: Gothic Entirely To: delphi-br@yahoogrupos.com.br Sent: Saturday, April 30, 2005 5:04 PM Subject: Re: [delphi-br] [OFF TOPIC] Certificação Borland Saudações... Digamos que 95% de chance de ter um salario inicial de 8000 para cima e os outros 5% de chances recebem entre 5000 e 7999. Isso lhe diz algo?? Mas claro, vc tem que mostrar serviço... As bençãos dos Deuses... Domnu Mathonwy On 4/29/05, Marcio [EMAIL PROTECTED] wrote: Boa noite a todos, Será que compensa investir em certificação Borland ? Só que para fazer a prova de certificação tenho que fazer um treinamento Delphi 2005 developer (pré-requisito) - R$ 3.600,00. Qual a vantagem que vou ter tendo essa certificação ? Moro em Mato-grosso (hehehe) Márcio Lopes - Programador msn: [EMAIL PROTECTED] [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] ou [EMAIL PROTECTED] *Yahoo! Grupos, um serviço oferecido por:* http://br.rd.yahoo.com/SIG=12ac77amo/M=264379.5078783.6203979.1588051/D=brc lubs/S=2137111264:HM/EXP=1114839399/A=2191897/R=0/SIG=10vqa2grn/*http://br.d iversao.yahoo.com/ http://br.rd.yahoo.com/SIG=12ac77amo/M=264379.5078783.6203979.1588051/D=brc lubs/S=2137111264:HM/EXP=1114839399/A=2191897/R=1/SIG=10vqa2grn/*http://br.d iversao.yahoo.com/ São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília -- *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][EMAIL PROTECTED] om.br?subject=Unsubscribe - 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] ou [EMAIL PROTECTED] 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!. -- Nenhum virus encontrado nesta mensagem. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.11.1 - Release Date: 02/05/2005 [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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos __ NOD32 1.1085 (20050501) Information __ This message was checked by NOD32 Antivirus System. http://www.nod32.com -- FAVOR REMOVER ESTA PARTE AO
RES: [delphi-br] Como manter o ponteiro do DataSet na mesma posicao depois de salvar
Não, não, não. Nada disso. A solução do Marcelo resolve mas é muito lenta. Use o recurso de BookMark. Assim: Var dbPonteiro:TBookMark; Begin (...) dbPonteiro:=Tabela.GetBookMark; //faça sua rotina de gravação //Commit as alterações Tabela.GotoBookMark(dbPonteiro); (..) End; Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcelo Moacir Florindo Enviada em: quinta-feira, 28 de abril de 2005 11:02 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Como manter o ponteiro do DataSet na mesma posicao depois de salvar podes pegar o codigo dele e salvar em uma variavel. ai fazes um loop até o cursor chegar no registro desejado. Abraços, Marcelo - Original Message - From: acolombobermudez [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 28, 2005 10:51 AM Subject: [delphi-br] Como manter o ponteiro do DataSet na mesma posicao depois de salvar Alguem sabe como manter o ponteiro do DataSet na mesma posicao depois de salvar as alteracoes no banco? éo seguinte , faco um select que me retorna varios registros, posiciono o ponteiro do dataset no vigesimo registro , altero ele e salvo dando um commit, com isso o dataset volta na primeira posicao, mas gostaria que continuasse na vigesima. alguem sabe como fazer isso? ou se é possivel fazer isso? utilizo delphi7, paleta ibx, com firebird 1.0 -- 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] ou [EMAIL PROTECTED] 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos __ NOD32 1.1081 (20050428) Information __ This message was checked by NOD32 Antivirus System. http://www.nod32.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] ou [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] Como manter o ponteiro do DataSet na mesma posicao depois de salvar
Agora ficou bala! Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Clayton Bonelli Enviada em: quinta-feira, 28 de abril de 2005 14:49 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Como manter o ponteiro do DataSet na mesma posicao depois de salvar Coloque um try-finally para garantir que o freeBookMark seja senpre executado Assim: Var dbPonteiro:TBookMark; Begin (...) dbPonteiro:=Tabela.GetBookMark; try //faça sua rotina de gravação //Commit as alterações Tabela.GotoBookMark(dbPonteiro); finally Tabela.FreeBookMark(dbPonteiro); end; End; - Original Message - From: Eduardo RC Neto [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 28, 2005 2:42 PM Subject: RES: [delphi-br] Como manter o ponteiro do DataSet na mesma posicao depois de salvar Depois desse código, de um Free no BookMark. Var dbPonteiro:TBookMark; Begin (...) dbPonteiro:=Tabela.GetBookMark; //faça sua rotina de gravação //Commit as alterações Tabela.GotoBookMark(dbPonteiro); Tabela.FreeBookMark(dbPonteiro); // -- ESSE CODIGO AQUI (..) End; Eduardo ---Mensagem original--- De: Rafael Franco Carvalho Data: 04/28/05 14:27:57 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Como manter o ponteiro do DataSet na mesma posicao depois de salvar Não, não, não. Nada disso. A solução do Marcelo resolve mas é muito lenta. Use o recurso de BookMark. Assim: Var dbPonteiro:TBookMark; Begin (...) dbPonteiro:=Tabela.GetBookMark; //faça sua rotina de gravação //Commit as alterações Tabela.GotoBookMark(dbPonteiro); (..) End; Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás - Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcelo Moacir Florindo Enviada em: quinta-feira, 28 de abril de 2005 11:02 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Como manter o ponteiro do DataSet na mesma posicao depois de salvar podes pegar o codigo dele e salvar em uma variavel. ai fazes um loop até o cursor chegar no registro desejado. Abraços, Marcelo - Original Message - From: acolombobermudez [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 28, 2005 10:51 AM Subject: [delphi-br] Como manter o ponteiro do DataSet na mesma posicao depois de salvar Alguem sabe como manter o ponteiro do DataSet na mesma posicao depois de salvar as alteracoes no banco? éo seguinte , faco um select que me retorna varios registros, posiciono o ponteiro do dataset no vigesimo registro , altero ele e salvo dando um commit, com isso o dataset volta na primeira posicao, mas gostaria que continuasse na vigesima. alguem sabe como fazer isso? ou se é possivel fazer isso? utilizo delphi7, paleta ibx, com firebird 1.0 -- 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] ou [EMAIL PROTECTED] 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos __ NOD32 1.1081 (20050428) Information __ This message was checked by NOD32 Antivirus System. http://www.nod32.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] ou [EMAIL PROTECTED] 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 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG
RES: [delphi-br] GUIDs
Olá amigos, Para obter o GUID no Delphi use a seguinte função: Function GetGUID: String; Var xGUID: TGUID; Begin CreateGUID(xGUID); Result:=GUIDToString(xGUID); End; Saudações, Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eduardo E. J. Menoncello Enviada em: domingo, 24 de abril de 2005 23:33 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] GUIDs Thiago, ignorância tem cura, apatia, não... ;-) É muito bom poder esclarecer dúvidas de quem ta afim d aprender. Bom GUIDs são Globally Unique Identifiers, ou seja Identificadores Únicos Globais. Teoricamente fazendo uma analogia porca com o banco de dados relacionais, é como se tivesse um Auto Incremento geral pra todas as tabelas, por exemplo, ao inserir um cliente, ele vai ter ID = 1, o produto vai ter ID = 2 e o pedido de venda vai ter ID = 3, e ninguém mais vai ter IDs com esses números. Indo para a orientação a objetos, isso significa muito, pq objetos como TPessoa, que tem como descendentes o TCliente e o TFuncionário, ao gravar em tabelas relacionais, os dados da pessoa terá o ID XYZ, e o dados para essa pessoa, qndo ela for cliente, também será XYZ e se ela se tornar funcionária, tb será XYZ. Na teoria, esse ID é um inteiro d 64 bits. Mas eu só consegui informações dele para Java ou C++, mas em Delphi, eu não consegui muitas informações, infelizmente... E acho que vou acabar fazendo algo parecido. Espero ter esclarecido um pouco suas dúvidas. Abraços Eduardo -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Thiago Luiz Enviada em: domingo, 24 de abril de 2005 12:37 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] GUIDs Eduardo, desculpe a ignorância, mas o que seriam essas GUIDs e para que servem ??? abraços, Thiago - Original Message - From: Eduardo E. J. Menoncello To: delphi-br@yahoogrupos.com.br Sent: Friday, April 22, 2005 10:06 AM Subject: [delphi-br] GUIDs Alguém sabe como funcionam as GUIDs no Delphi? Eu sei a teoria, mas no Delphi eu ñ sei como elas funcionam. Grato pela ajuda Eduardo [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] ou [EMAIL PROTECTED] 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] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12ajr7vie/M=264379.5078783.6203979.1588051/D =brclubs/S=2137111264:HM/EXP=1114367598/A=2332652/R=0/id=noscript/SIG=11 9058f8i/*http:/br.download.yahoo.com/messenger/ _ 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 http://br.yahoo.com/info/utos.html 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos __ NOD32 1.1076 (20050424) Information __ This message was checked by NOD32 Antivirus System. http://www.nod32.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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo
RES: [delphi-br] GUIDs
Fala, Em vez de 64 bits ele gera uma string enorme... É porque está em Hexadecimal. O número de 64 bits é tão grande que não é possível representá-lo na base decimal. Eu uso como string mesmo e funciona legal. Só fica ruim se você quiser usar como código das tabelas para usuário, então nesse caso é melhor usar um contador único. Mas GUID é esse que eu te falei. []'s Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eduardo E. J. Menoncello Enviada em: segunda-feira, 25 de abril de 2005 14:56 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] GUIDs Hmmm Não gostei... Em vez de 64 bits ele gera uma string enorme... Mas valeu Eu vou criar minha própria guid... ;) Abraços Eduardo -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rafael Franco Carvalho Enviada em: segunda-feira, 25 de abril de 2005 10:07 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] GUIDs Olá amigos, Para obter o GUID no Delphi use a seguinte função: Function GetGUID: String; Var xGUID: TGUID; Begin CreateGUID(xGUID); Result:=GUIDToString(xGUID); End; Saudações, Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eduardo E. J. Menoncello Enviada em: domingo, 24 de abril de 2005 23:33 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] GUIDs Thiago, ignorância tem cura, apatia, não... ;-) É muito bom poder esclarecer dúvidas de quem ta afim d aprender. Bom GUIDs são Globally Unique Identifiers, ou seja Identificadores Únicos Globais. Teoricamente fazendo uma analogia porca com o banco de dados relacionais, é como se tivesse um Auto Incremento geral pra todas as tabelas, por exemplo, ao inserir um cliente, ele vai ter ID = 1, o produto vai ter ID = 2 e o pedido de venda vai ter ID = 3, e ninguém mais vai ter IDs com esses números. Indo para a orientação a objetos, isso significa muito, pq objetos como TPessoa, que tem como descendentes o TCliente e o TFuncionário, ao gravar em tabelas relacionais, os dados da pessoa terá o ID XYZ, e o dados para essa pessoa, qndo ela for cliente, também será XYZ e se ela se tornar funcionária, tb será XYZ. Na teoria, esse ID é um inteiro d 64 bits. Mas eu só consegui informações dele para Java ou C++, mas em Delphi, eu não consegui muitas informações, infelizmente... E acho que vou acabar fazendo algo parecido. Espero ter esclarecido um pouco suas dúvidas. Abraços Eduardo -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Thiago Luiz Enviada em: domingo, 24 de abril de 2005 12:37 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] GUIDs Eduardo, desculpe a ignorância, mas o que seriam essas GUIDs e para que servem ??? abraços, Thiago - Original Message - From: Eduardo E. J. Menoncello To: delphi-br@yahoogrupos.com.br Sent: Friday, April 22, 2005 10:06 AM Subject: [delphi-br] GUIDs Alguém sabe como funcionam as GUIDs no Delphi? Eu sei a teoria, mas no Delphi eu ñ sei como elas funcionam. Grato pela ajuda Eduardo [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] ou [EMAIL PROTECTED] 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] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12ajr7vie/M=264379.5078783.6203979.1588051/D =brclubs/S
RES: [delphi-br] Número Serial
A minha placa de rede também é OnBoard e funciona normalmente. Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: Alosi yarru [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 14 de abril de 2005 08:06 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Número Serial Tem mais uma, na minha máquina o resultado vem sempre zerado, já vi isso em outras máquinas tbm. Tenho pentium 4 2.0, placa pcchips, rede on-board, windows XP. t+ - Original Message - From: Rafael Franco Carvalho To: delphi-br@yahoogrupos.com.br Sent: Wednesday, April 13, 2005 5:20 PM Subject: RES: [delphi-br] Número Serial Use esta aqui... Mas não se esqueça de colocar NB30 na clausula uses. function GetAdapterInfo(Lana: Char): String; var Adapter: TAdapterStatus; NCB: TNCB; begin FillChar(NCB, SizeOf(NCB), 0); NCB.ncb_command := Char(NCBRESET); NCB.ncb_lana_num := Lana; if Netbios(@NCB) Char(NRC_GOODRET) then begin Result := 'mac not found'; Exit; end; FillChar(NCB, SizeOf(NCB), 0); NCB.ncb_command := Char(NCBASTAT); NCB.ncb_lana_num := Lana; NCB.ncb_callname := '*'; FillChar(Adapter, SizeOf(Adapter), 0); NCB.ncb_buffer := @Adapter; NCB.ncb_length := SizeOf(Adapter); if Netbios(@NCB) Char(NRC_GOODRET) then begin Result := 'mac not found'; Exit; end; Result := IntToHex(Byte(Adapter.adapter_address[0]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[1]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[2]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[3]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[4]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[5]), 2); end; function GetMACAddress: string; var AdapterList: TLanaEnum; NCB: TNCB; begin FillChar(NCB, SizeOf(NCB), 0); NCB.ncb_command := Char(NCBENUM); NCB.ncb_buffer := @AdapterList; NCB.ncb_length := SizeOf(AdapterList); Netbios(@NCB); if Byte(AdapterList.length) 0 then Result := GetAdapterInfo(AdapterList.lana[0]) else Result := 'mac not found'; end; Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás - Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: Thomaz [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 13 de abril de 2005 16:59 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Número Serial Valeu a dica Rafael. Para o que eu preciso acho que vou precisar do Mac-Address. Voce pode me enviar a função ? Abraço, Thomaz. -Mensagem original- De: Rafael Franco Carvalho [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 13 de abril de 2005 16:08 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Número Serial Olá amigo, Você quer fazer tipo uma identificação única da estação? Use o endereço IP, ou nome da estação, é mais fácil e não tem erro, a menos que seja uma rede com IP dinâmico, mas mesmo assim ainda sobra o nome da estação. Agora se você quiser individualidade mesmo, utilize o Mac-Address, é uma espécie de número serial da placa de rede, dizem que não tem duas iguais. Se quiser as funções é só pedir. Abraços, Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás - Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: pulschen2004 [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 13 de abril de 2005 15:44 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Número Serial Preciso saber o nº serial da máquina (ou do HD ?) para identificação da estação. Alguem pode me ajudar ? Grato desde já. Thomaz -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos __ NOD32 1.1059 (20050412) Information __ This message was checked by NOD32 Antivirus System. http://www.nod32.com -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver
[delphi-br] RE:Atualizar executável automaticamente
Olá Cati, Tenho essa implementação funcionando em todos os meus sistemas comerciais, inclusive faz até donwload se a houver uma VPN. A minha implementação faz uma simples verificação de versão e data do arquivo e em seguida é chamado um aplicativo externo que segue um arquivo de script. Testei desde Windows 95 até Windows 2003 Server. Você pretende colocar essa atualização automática nos seus aplicativos comerciais? Posso verificar como ajudar você nesse sentido, pois o meu sistema que faz, que dei o nome de Orion Updater é para fins comerciais. Abraços, Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube file:///C:/Documents%20and%20Settings/Administrador/Dados%20de%20aplicativo s/Microsoft/Signatures/www.diroma.com.br www.diroma.com.br mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel - Original Message - From: Catiúscia A. Barrilli da Cruz [EMAIL PROTECTED] To: Delphi-Br delphi-br@yahoogrupos.com.br Sent: Wednesday, April 13, 2005 2:37 PM Subject: [delphi-br] Atualizar executável automaticamente Boa tarde ! Como faço para as estações, ao abrir o programa, chegar no servidor se o executável que está lá é mais atual do que o está nas estações ? grata Cati [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] ou [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] Número Serial
Olá amigo, Você quer fazer tipo uma identificação única da estação? Use o endereço IP, ou nome da estação, é mais fácil e não tem erro, a menos que seja uma rede com IP dinâmico, mas mesmo assim ainda sobra o nome da estação. Agora se você quiser individualidade mesmo, utilize o Mac-Address, é uma espécie de número serial da placa de rede, dizem que não tem duas iguais. Se quiser as funções é só pedir. Abraços, Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: pulschen2004 [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 13 de abril de 2005 15:44 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Número Serial Preciso saber o nº serial da máquina (ou do HD ?) para identificação da estação. Alguem pode me ajudar ? Grato desde já. Thomaz -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos __ NOD32 1.1059 (20050412) Information __ This message was checked by NOD32 Antivirus System. http://www.nod32.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] ou [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] Número Serial
Use esta aqui... Mas não se esqueça de colocar NB30 na clausula uses. function GetAdapterInfo(Lana: Char): String; var Adapter: TAdapterStatus; NCB: TNCB; begin FillChar(NCB, SizeOf(NCB), 0); NCB.ncb_command := Char(NCBRESET); NCB.ncb_lana_num := Lana; if Netbios(@NCB) Char(NRC_GOODRET) then begin Result := 'mac not found'; Exit; end; FillChar(NCB, SizeOf(NCB), 0); NCB.ncb_command := Char(NCBASTAT); NCB.ncb_lana_num := Lana; NCB.ncb_callname := '*'; FillChar(Adapter, SizeOf(Adapter), 0); NCB.ncb_buffer := @Adapter; NCB.ncb_length := SizeOf(Adapter); if Netbios(@NCB) Char(NRC_GOODRET) then begin Result := 'mac not found'; Exit; end; Result := IntToHex(Byte(Adapter.adapter_address[0]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[1]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[2]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[3]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[4]), 2) + '-' + IntToHex(Byte(Adapter.adapter_address[5]), 2); end; function GetMACAddress: string; var AdapterList: TLanaEnum; NCB: TNCB; begin FillChar(NCB, SizeOf(NCB), 0); NCB.ncb_command := Char(NCBENUM); NCB.ncb_buffer := @AdapterList; NCB.ncb_length := SizeOf(AdapterList); Netbios(@NCB); if Byte(AdapterList.length) 0 then Result := GetAdapterInfo(AdapterList.lana[0]) else Result := 'mac not found'; end; Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: Thomaz [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 13 de abril de 2005 16:59 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Número Serial Valeu a dica Rafael. Para o que eu preciso acho que vou precisar do Mac-Address. Voce pode me enviar a função ? Abraço, Thomaz. -Mensagem original- De: Rafael Franco Carvalho [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 13 de abril de 2005 16:08 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Número Serial Olá amigo, Você quer fazer tipo uma identificação única da estação? Use o endereço IP, ou nome da estação, é mais fácil e não tem erro, a menos que seja uma rede com IP dinâmico, mas mesmo assim ainda sobra o nome da estação. Agora se você quiser individualidade mesmo, utilize o Mac-Address, é uma espécie de número serial da placa de rede, dizem que não tem duas iguais. Se quiser as funções é só pedir. Abraços, Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -Mensagem original- De: pulschen2004 [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 13 de abril de 2005 15:44 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Número Serial Preciso saber o nº serial da máquina (ou do HD ?) para identificação da estação. Alguem pode me ajudar ? Grato desde já. Thomaz -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos __ NOD32 1.1059 (20050412) Information __ This message was checked by NOD32 Antivirus System. http://www.nod32.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] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- 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 Anti-Virus. Version: 7.0.308 / Virus Database: 266.9.7 - Release Date: 12/04/05 [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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos __ NOD32
