Re: [delphi-br] Comunicação Via Socket - Roteando as conexões
Olá colega... Veja... O servidor terá o IP fixo (Ex: servidor MSN)... 2 clientes estarão em uma rede interna conectados via VELOX utilizando um ROTEADOR. (1 cliente com IP 192.168.0.1 e outro com 192.168.0.2) O IP válido para os 2 clientes fornecido pela velox seria (Ex: 200.224.188.65) e este IP será recebido e guardado no ROUTER (roteador) digamos que a porta utilizada para comunicação com o MSN seja a (Ex: 12345) então... o IP 192.168.0.1 envia a mensagem para o servidor MSN (ip fixo) o servidor recebe a informação e nela terá o IP FIXO VELOX (Ex: 200.224.188.65) + o IP INTERNO para retorno do destinatário da mensagem no caso o (192.168.0.2) quando a mensagem chega do MSN para o roteador... ele redireciona para a máquina 192.168.0.2 e por aí vai... este é o esquema sintetizado do funcionamento :) Espero ter contribuído de alguma forma. Valeu. Luciano-User-BA Elazar Dornelles Ceza escreveu: > Rog. > > Tb imaginava que tivessem um servidor.. > > Mas eu ainda estou achando que eles não usam os ip's, > > Como exemplo Imagine...aqui na rede interna temos 6 pc´s (192.168.0.1 > até 192.168.0.7)...mas quando nos acessamos a net temos como ip valido o > ip do modem adsl (tal 200.xxx.xxx.xxx). > > Então se estes programas não utilizarem a porta 80, ou a 21 (que > automaticamente é liberada pelo modem (acredito)) eles não iriam > conseguir se comunicar. > > Se por exemplo...eu tenho dois executaveis aqui...o client e o serv, e > na rede funciona blz. > Digo, coloco o server em um micro (192.168.0.1) e digito este ip no > client, consigo conectar e tudomas e na net como faço...se o ip > valido é algo como 200.xxx.xxx.xxx e as portas são bloqueadas pelo > modem? Mas mesmo usando o Nat do modem como ficaria. > > (desc. Pela msg estar ficando mais para o lado de redes...) > > Atenc. > Elazar > > [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] Comunicação Via Socket - Mais alguns Pitacos :)
Olá colega! Tomando como exemplo 3 maquinas se comunicando... basicamente seria o seguinte: maquina 1 cliente terá um programa codificado com um SocketClient maquina 2 cliente terá um programa codificado com um SocketClient maquina 1 servidor terá um programa codificado com um SocketServer um outro colega já lhe deu uma dica sobre protocolos a serem criados. digamos que o cliente 1 deseje se comunicar (conversar) com o cliente 2 ex: o cliente 1 envia para o servidor (com ip fixo) uma string contendo uma série de informações (isto é o protocolo) ip_do_cliente_1###nick_do_cliente_1###nick_do_cliente_2###mensagem_do_cliente_1 então o SocketServer lê e quebra/separa esta string... ex: ip_do_cliente_1 nick_do_cliente_1 nick_do_cliente_2 mensagem_do_cliente_1 imagine que o programa servidor tem uma lista de todos os nicks e ips conectados * ele guarda estas informações no momento de cada conexão estabelecida então ele irá pesquisar nesta lista o nick_cliente_2 e enviará para o ip_do_cliente_2 a mensagem_do_cliente_1 com o respectivo nick_do_cliente_2 * para que maquina 1 saiba com quem está falando :) e por ai vai... a maquina 2 recebe a mensagem do servidor e retorna da mesma forma (protocolo) alterando apenas o nick do destino ex: A maquina 2 retorna para o servidor (com ip fixo) a resposta para a maquina 1 com uma string contendo uma série de informações (isto é o protocolo) ip_do_cliente_2###nick_do_cliente_2###nick_do_cliente_1###mensagem_do_cliente_2 e o processo continua :) Lógico que eu sintetizei o exemplo. Vale lembrar que... * todos os clientes e o servidor * poder estar se comunicando * utilizando uma única porta ex: isto é possível pois o SocketServer abre + um canal de comunicação na mesma porta... para o novo cliente que solicitou a conexao. * pense em uma única estrada * com n faixas para tráfego dos veiculos :) existem N variantes que poder ser exploradas... a depender das necessidades e criatividade do programador. Ex: os clientes e o servidor podem utilizar mais de 1 porta para agilizar o processo. 1 porta para enviar textos () outra quando for enviar arquivos/imagens (6667) outra quando for enviar arquivos/sons (6668) já da para ver que ... se o servidor administra as conexões... então ele pode fazer qualquer coisa com as máquina clientes :) ex: _ desconectar qualquer cliente _ logar as mensagens de todos os clientes _ enviar mensagens publicitárias para todos os clientes :) _ enviar arquivos/executáveis e rodar automaticamente nos clientes :) há... Um programa poder ser codificado com os sockets (client/server) neste caso cada máquina seria também um servidor :) normalmente o servidor tem que ter um IP fixo (este é o correto) mas nada impede do servidor tenha um IP dinâmico e nele tenha uma rotina codificada que envie por exemplo seu IP atual dentro de um .txt para um FTP (este teria o IP fixo) e os clientes (socketclient) antes de solicitarem a conexão leriam de alguma forma o IP que estaria no .txt no FTP (existem n maneiras de fazer isto) e só depois solicitar a conexao com a maquina servidora :) (esta seria uma gambiarra para usuários domésticos) programas mensageiros como o msn e outros utilizam técnicas similares... trojans :) utilizam também este tipo de técnica :) os sockets são poderosos pois são a base da comunicação entre as máquinas... variando apenas as formas de se estabelecer as conexões... e os protocolos utilizados para a conversação entre as máquina. * alguns bem conhecidos já são pré-definidos: FTP HTTP SMTP... etc. bem... se você quiser dar um primeiro passo construinto um chat (utilizando conexão dinâmica nos SocketServer) que permite N conexões de clientes em 1 servidor na mesma porta... posso sugerir um livro (antigo) mas muito legal encontrado na www.visualbooks.com.br com o titulo "desenvolvendo um chat em delphi" do autor Leandro Cristovão o link é http://www.visualbooks.com.br/?show=MostraProduto&chave=3689&categoria= valeu. espero ter contribuido de alguma forma. Luciano-User-BA > > Ok, e com este novo protocolo, como por exemplo ele é enviadopor > alguma porta? como sai de um micro e vai parar em outro? acho que está é > minha duvida. > > Desc. Por perguntar...mas não faco ideia nem ao menos do que > pesquisar...(alem de saber como implementar algo do genero) > [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 - Teste de Envio de Mensagens em Texto e HTML
Desculpem... Este é apenas um teste único Ok? Reconfigurei meu cliente de e-mail. [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] *** SQL - Mega Sena - Mostrar Números que m ais Sairam
Oi gente... Estou tentando fazer um programinha para uso particular. Baixei e cadastrei os resultados da mega sena. Trabalho com delphi 7 + firebird + dbexpress. Estou sem saber montar um SQL que me retorne (para mostrar em 10 labels por exemplo) os 10 números que mais sairam. (em ordem DECRESCENTE POR VEZES DE SORTEIO + CRESCENTE POR NUMEROS SORTEADOS) No banco tenho cadastrado da seguinte forma (exemplo): campos (char): n1 n2 n3 n4 n5 n6 valores (exemplo): 01 10 15 23 44 49 05 11 23 39 45 48 01 05 08 15 23 49 No caso eu precisaria de um resultado do tipo: OS 10 MAIS (10 números :)) As VEZES que foram SORTEADOS (DECRESCENTE) e ao mesmo tempo também ORDENADOS pelos NÚMEROS SORTEADOS (CRESCENTE): * as vezes estão em ordem DECRESCENTE (primeiro critério) * e os NÚMEROS estão em ordem CRESCENTE (segundo critério) número 23 = 3 vezes número 01 = 2 vezes número 05 = 2 vezes número 15 = 2 vezes número 49 = 2 vezes número 08 = 1 vez número 10 = 1 vez número 11 = 1 vez número 39 = 1 vez número 44 = 1 vez TODOS (12 números) As VEZES que foram SORTEADOS (DECRESCENTE) e ao mesmo tempo também ORDENADOS pelos NÚMEROS SORTEADOS (CRESCENTE): número 23 = 3 vezes número 01 = 2 vezes número 05 = 2 vezes número 15 = 2 vezes número 49 = 2 vezes número 08 = 1 vez número 10 = 1 vez número 11 = 1 vez número 39 = 1 vez número 44 = 1 vez número 45 = 1 vez número 48 = 1 vez número 50 = nenhuma vez (não ocorrerá :)) Pensei em fazer um FOR de 0 a MÁXIMA quantidade de números 00 .. 01 .. 02 .. etc ... com uma SQL fazendo um COUNT para cada número ... e gravando os resultados NUMERO e QUANTIDADE em outra tabela ... com 2 campos NUMERO (CHAR) <-> VEZES (INTEGER) ... depois fazer uma SQL nesta outra tabela ordenada como DESC ... por VEZES * mas não sei se este seria o procedimento correto... * e outra que nesta outra tabela * os NÚMERO e as VEZES estariam vinculados * aí eu não estou sabendo como ordenar os 2 juntos Podem me dar uma força... Uma idéia de como solucionar este problema? Valeu desde já. Obrigado. Luciano-User-BA *** SQL - Mega Sena - Mostrar Números que mais Sairam ___ Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas ! http://br.answers.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
[delphi-br] Automaticamente Selecionar e Atribuir um Valor de um DBComboBox
Olá colegas... estou me batendo com esta rotina... N registro serão configurados com um determinado valor... que esta num determinado DBComboBox. Vez por outra é que este registro é alterado... e apartir dai uma nova série de inclusões são feitas com este novo valor. estou tentando setar/deixar pré selecionado... um destes determinados registro... e automaticamente o valor... ao campo ligado ao tal DBComboBox. pergunto... Como faço para setar automaticamente um ítem do DBComboBox? E como atribuo o valor/text automaticamente ao campo Ex: dm_categoria.cds_categoria.fieldByName('categoria').AsString := * gostaria de selecionar e atribuir * logo no momento que o DBComboBox rececebesse o foco obrigado Luciano-User-BA * Automaticamente Selecionar e Atribuir um Valor de um DBComboBox ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- < 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] Tocar 3 músicas MP3 em seqüencia com o MPlayer
Olá colegas... Preciso tocar 3 músicas (MP3) em seqüencia utilizando o componente MPlayer. Preciso no caso saber se a música (Ex: musica1.mp3) foi finalizada... para só aí poder carregar e tocar a (Ex: musica2.mp3)... e assim sucessivamente. Resumindo: Tem algum EVENTO no MPLAYER que eu possa utilizar... para checar se uma determinada música (MP3)... ainda está sendo tocada... para que eu possa escolher... entre dar uma PAUSA na música atual... ou carregar o arquivo do HD (Ex:musicaX.mp3)... o qual seria a música seguinte a ser tocada? Obrigado desde já. * Tocar 3 músicas MP3 em seqüencia com o MPlayer ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- < 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 - PalmTop - Banco de Dados
Olá gente! Recebi uma proposta de um cliente para desenvolver algo para PALM TOP mais especificamente "palmtop - hp jornada" só que não tenho nenhuma experiência com estes hardwares. poderiam me dar algumas dicas... tipo: - sistema que utilizam... - a programação em delphi é muito diferenciada para eles... - a questão das telas e menus... (acessados com aquela coneta :)) - como transferir o programa feito para o palm... - como transferir os dados do palm para o computador de mesa. he he he... não estou pedindo para me dizerem como faz o sistema ok? apenas o nível de dificuldade que terei para utilizar meus conhecimentos em delphi para tais dispositivos. atualmente utilizo delphi 7/ firebird/ dbexpress... já fiz pequenos programas cliente/firebird... cliente/firebird embeded... cliente/servidor/firebird. desde já obrigado pelas dicas. Luciano-User-BA *** Delphi - PalmTop - Banco de Dados ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- < 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 Thumbnails - JPG - Mostrar Imagem Apliada
Olá colegas! Estou sem saber como resolver este problema... Podem me dar um auxílio? Seguinte... Tenho "N" imagens JPG em campos BLOB no Firebird... Cada uma delas é identificada por uma CHAVE ÚNICA. Digamos que tenho 15 imagens na categoria PAISAGENS. imagem.jpg (blob) - id -> = 0001 (char) imagem.jpg (blob) - id -> = 0002 (char) imagem.jpg (blob) - id -> = 0003 (char) ... imagem.jpg (blob) - id -> = 0008 (char) ... imagem.jpg (blob) - id -> = 0015 (char) O que preciso... Em um form preciso gerar de 8 em 8 miniaturas... e ao lado destas 8 miniaturas irá sendo mostrada uma imagem ja APLIADA da -> 0001... 0002... 0003... 0008 isto deve ocorrer no momento que o usuário clicar em alguma das miniaturas. E além disto... no exemplo... ele ainda teria mais 7 imagens das 15 a serem mostradas nas miniaturas. (uma expécie de paginação) 1 a 8 - 9 a 15 (no caso ele 2 botões para avançar/voltar) Hummm... Minha imagens são JPG... No caso tenho que converter para mostrar nos 8 TImages. (mais o TImage da FOTO ampliada) Tô sem saber como fazer esta busca/paginação e mostragem da ampliação... Já que os meus 8 Timages (miniaturas) são fixos no form 1 Timage (para a ampliação) é fixo no form também. mas as categorias das FOTOS variam de quantidade... algumas tem menos de 8 outras mais de 8 não sei se consegui explicar meu problema... mas se sim... agradeço se me derem uma luz de como tocar este projeto. Grato. 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 > <*> 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] Função - Componente - Extrair MP3 Firebird - Tocar sem TRANSFERIR para HD
Olá colegas! Algum de vocês poderiam me dar um EXEMPLO ou mesmo me indicar um COMPONENTE que extraia um SOM MP3 de um campo BLOB no FIREBIRD e toque direto na memória? Tipo... Não quero ter que jogar para o MP3 para o HD e depois tocar (Ex: Com o Media Player)... Obrigado Luciano-User-BA ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- < 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] Componente - Skin - Delphi 7 - Gratuito
Olá pessoal! Conheço o VCLSkin... Mas ele é pago :) Alguem pode me fornecer uma dica de algum bom componente similar ao VCLSkin mas que seja Gratuito. Obrigado Luciano-User-BA ___ Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. http://mail.yahoo.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
[delphi-br] *** SQL - Procurar texto em campo MEMO - BLOB - FIREBIRD - DELPHI 7
Olá pessoal! Podem me dar um exemplo de um SELECT para procurar N registro que CONTEM um determinado texto/palavra que está inserido em 1 campo MEMO - BLOB - TEXT? Utilizo DBExpress. *** SQL - Procurar texto em campo MEMO - BLOB - FIREBIRD - DELPHI 7 ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- < 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] Tocar MP3 que está em um BLOB com MPl ayer - Sem ter que gravar e abrir apartir do HD
Olá companheiros... Desculpem a insistência... É que não sei se minha mensagem foi enviada corretamente para o grupo... pois recebi um retorno automático... devido ter enviado em formato HTML. Eu tenho uma função que armazena arquivos MP3. Lê do HD e passa para o BANCO FIREBIRD em campo BLOB... Utilizando STREAM. A questão é que eu gostaria de poder recuperar este MP3... que está no BLOB... e tocar direto utilizando o componente MPLAYER (paleta SYSTEM)... ou seja... não quero recuperar do BLOB... gravar no HD... e depois abrir com o MPLAYER. Quero fazer direto na memória... Deu para entender ? :) Delphi 7 + Firebird + DBExpress Valeu pelas dicas. Luciano-User-BA *** Tocar MP3 que está em um BLOB com MPlayer - sem ter que gravar e abrir apartir do HD ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- < 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] * Arquivos MP3... FIREBIRD EMBEDED - Tocar em Memória - STREAM - MPLAYER
Olá gente! Achei esta função abaixo que armazena em um BD músicas em MP3 utilizando STREAM. Utilizo DBEXPRESS + Firebird + Delphi 7. A rotina abaixo adapta-se perfeitamente as minhas necessidades para o armazenamento. Agora... Gostaria de saber como recuperar este arquivo MP3 que está no BD FIREBIRD em um BLOB e tocar direto utilizando MPLAYER da paleta SUSTEM do delphi... ou seja, sem ter que armazenar no disco (tocar direto em memória). Agradeço desde já pela ajuda. Luciano-User-BA //gravando blob var stream : TMemoryStream; begin stream := tmemorystream.create; stream.loadfromfile( 'c:\arquivo.mp3' ); ibsql.sql.text := 'UPDATE TABELA SET CAMPO_TIPO_BLOB = :CONTEUDO WHERE CONDICAO'; TBlobField( IBSQL.parambyname( 'CONDICAO' ) ).LoadFromStream( Stream ); ibsql.execsql; stream.free; end; * Arquivos MP3... FIREBIRD EMBEDED - Tocar em Memória - STREAM - MPLAYER ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- < 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] *** Imagens - BMP ou JPG no PANEL de um FORM
*Olá colegas... Tenho uma imagem de tamanho peguenno (96 x 96 px aproximadamente) Gostaria de saber como faço para pintar esta imagem num PANEL que está em um FORM. Tipo... Distribuir/Colocar a imagem como um Background do PANEL de forma que ela fique LADO a LADO. Vou precisar redimensionar o FORM e o PANEL pintado com a imagem BMP ou JPG deve acompanhar o redimensionamento do FORM... ou seja... as imagens teriam que ser REPINTADAS... quando o PANEL sofresse uma alteração de tamanho. **Obrigado pela dica desde já. Luciano-User-BA *** Imagens - BMP ou JPG no PANEL de um FORM* ___ Navegue com o Yahoo! Acesso Grátis, assista aos jogos do Brasil na Copa e ganhe prêmios de hora em hora! http://br.yahoo.com/artilheirodacopa/ -- < 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 - Teste para Envio de Mensagens
___ Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. http://mail.yahoo.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