Ir para conteúdo
Fórum Script Brasil
  • 0

Erro no tocador de MP3 do Lazarus


C@pit@o_Z@p

Pergunta

Estou desenvolvendo um tocador de MP3 para Linux:

unit uMusica;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Buttons;

type

{ TForm1 }

TForm1 = class(TForm)
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
BitBtn4: TBitBtn;
OpenDialog1: TOpenDialog;
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
procedure BitBtn4Click(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
end;

var
Form1: TForm1;
Player:OleVariant;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
Player:=OleVariant('vlc');
Player.url:=Olevariant(UTF8Decode(OpenDialog1.FileName));
end;
end;

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
Player.Controls.Play;

end;

procedure TForm1.BitBtn3Click(Sender: TObject);
begin
Player.Controls.Pause;
end;

procedure TForm1.BitBtn4Click(Sender: TObject);
begin
Player.Controls.Stop;
end;

end.

Erro no programa:

Project ProjetoMusica raised exception class 'External: SIGSEGV'.

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

  • 0

Esse erro pode ter varias causas, que vão desde:

calcular mal os intervalos da matriz nos seus loops,

acessar objetos quando não criados,

tentando acessar a memória que não foi alocada para uso,

objetos não referenciados

bug do Linux  ( Versões mais antigas )

firewall bloqueando acesso ao programa

Se acessar procedimentos, funções, propriedades, métodos ou variáveis de FORA do seu objeto, certifique-se de torná-los públicos.

em ultimo caso, tente reconstruir o projeto por partes, para encontrar o erro

abraço

 

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...