[Lazarus-es] Componente wile64

[Anxo Vázquez]

Hola José:
La verdad es que no probé lo último que propusiste, en cuanto lo pruebe
comento el resultado. Venía usando los .gif con el inspector de objetos
apuntando la propiedad FileName al archivo.gif y con la propiedad Visible en
tiempo de ejecución los mostraba o ocultaba.

Probe el siguiente código:

procedure TfrmCifLet.FormCreate(Sender: TObject);
var Anim1, Anim2, Anim3:String;
begin
  Anim1 := ExtractFilePath(ParamStr(0))+'/imaxes/letrasult.gif';
  GifAnim1.LoadFromLazarusResource('Anim1');
  Anim2 := ExtractFilePath(ParamStr(0))+'/imaxes/demo.gif';
  GifAnim2.FileName := 'Anim2';
  Anim3 := ExtractFilePath(ParamStr(0))+'/imaxes/profesor.gif';
  GifAnim3.FileName := 'Anim3';
end;

Si FileName no apunta al dir de los gif. No hace nada, si se corrige el path
la línea GifAnim1.LoadFromLazarusResource('Anim1'); produce el siguiente
error:

Project letras raised exception class 'External:SIGSEGV'

las otras dos líneas de código no hacen nada. Cada vez peor.
Voy investigar un poco más sobre el componente haber si consigo algo. Si hay
suerte publico el resultado.

Un saludo y muchas gracias.

El 4 de agosto de 2011 21:50, José Mejuto <joshyfun en gmail.com> escribió:

> Hello Anxo,
>
> Thursday, August 4, 2011, 8:34:37 PM, you wrote:
>
> AV> La aplicación se instala en /opt , allí se puede ver la carpeta
>  principal y
> AV> las demás, entre ellas /imaxes que contiene todas las images. Es
> propiedad
> AV> del usuario que la instala y tiene permisos R/W/X. Siguiendo tu
> sugerencia
> AV> probé a crearlo con todos lo permisos "777" y también hice un paquete
> como
> AV> root, el resultado siempre el mismo, el .gif animado no funciona. En la
> AV> misma carpeta hay algún .png y un .gif con el logo de lazarus que se
> ven
> AV> perfectamente. Probé windows haciendo la instalación con installjammer
> o
> AV> ejecutando directamente funcionan. Por cierto, prodrías explicarme lo
> que es
> AV> filemon y como funciona.
>
> Pues la verdad es que no se me ocurre que puede ser, excepto un
> problema de permisos. Puedes abrir el componente wile64 y donde abre
> el fichero (buscas los if FileExists(...)) añades un msgbox o algo
> para saber que está pasando. O compilas con información de debug y lo
> ejecutas, una vez instalado, con el gdb, apuntas la linea del
> FileExists y pones u breakpoint ahi, luego un "inspect" de la
> variable, pero esto parece un poco lioso la verdad.
>
> Sobre filemon ahora se llama "Process Inspector"
> http://technet.microsoft.com/en-us/sysinternals/bb896645
>
> --
> Best regards,
>  José
>
>
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20110806/8f71e79f/attachment-0002.html>