Veja se a dica abaixo pode te ajudar em alguma coisa: http://www.swissdelphicenter.ch/en/showcode.php?id=1805
Sds. >From: "Leonardo Martins" <[EMAIL PROTECTED]> >Reply-To: delphi-br@yahoogrupos.com.br >To: <delphi-br@yahoogrupos.com.br> >Subject: [delphi-br] DWORD em Inteiro >Date: Fri, 30 Dec 2005 11:50:27 -0200 > >Gente, > >Acho que ou vocês não gostam de mim ou as perguntas que eu faço são muito >difíceis, porque ninguém me responde rsrs >Mas tudo bem, vou tentar de novo. >Estou fazendo um Mp3 Player só utilizando a Api do Windows >E estou precisando retornar o Tamanho da Música... >Ou a posição, qualquer coisa... no exemplo a baixo é a posição >Mas só consigo receber um valor que não consigo identificar.. >Gostaria de receber ela em inteiro.. Podem me ajudar? >Trecho do código: > >function TFrmPlayer.RecvInfoMusica: Integer; >var > FStatusParams: TMCI_Status_Parms; >begin > ZeroMemory(@FStatusParams, SizeOf(FStatusParams)); > FStatusParams.dwItem := MCI_STATUS_POSITION; > mciSendCommand(FDeviceID, MCI_STATUS, MCI_STATUS_ITEM, >LongWord(@FStatusParams)); > RecvInfoMusica := FStatusParams.dwReturn; >end; > >procedure TFrmPlayer.tmrMusicaTimer(Sender: TObject); >begin > Label1.Caption := IntToStr(RecvInfoMusica); > Label2.Caption := TiMeToStr(Time); >end; > >Ele está me retornando um numero assim quando rodo a música: 32, 2036, >46987 e etc... >Como faço pra pegar o valor de returno dwReturn em inteiro da estrutura >MCI_STATUS_PARMS da API??? >Podem me ajudar gente? > >Valeu >Boa festa pra vcs! > >Fuizzz > > > >[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
