<html>
<head>
<meta content="text/html; charset=UTF-8" http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<div class="moz-cite-prefix">El 15/06/2014 12:22, Martin Gomez
escribió:<br>
</div>
<blockquote
cite="mid:CAFGJXk3X8ROubd_vviAYUxuxSEDd=FOCsUrSht+goN71rKCUaw@mail.gmail.com"
type="cite">
<meta http-equiv="Context-Type" content="text/html; charset=UTF-8">
<div dir="ltr">
<div class="gmail_default">Hice la prueba acá y falla el Late
Binding con '"." no está implementado'</div>
<div class="gmail_default">
<br>
</div>
<div class="gmail_default">Corrí la importación con los tres
checkbox, recompilé Lazarus, apareció el conito en la solapa
ActiveX y funcionó a la primera (usando los parámetros que
indica en la wiki, excepto que lo mandé directo a C:\video.mov
para no tener que elegirlo cada vez)</div>
</div>
</blockquote>
si, como te comenté, el "early binding" me funcionó con este cambio:<br>
<br>
procedure TForm1.Button1Click(Sender: TObject);<br>
var<br>
fn: widestring;<br>
begin<br>
fn := UTF8Decode('<a class="moz-txt-link-freetext" href="file:///'+StringReplace(FileNameEdit1.FileName">file:///'+StringReplace(FileNameEdit1.FileName</a>,
'\', '/', [rfReplaceAll]));<br>
VLC.playlist.add(fn,'',vararrayof([':aspect-ratio=16:9']));<br>
VLC.playlist.play;<br>
end; <br>
<br>
<blockquote
cite="mid:CAFGJXk3X8ROubd_vviAYUxuxSEDd=FOCsUrSht+goN71rKCUaw@mail.gmail.com"
type="cite">
<div dir="ltr">
<div class="gmail_default"><br>
</div>
<div class="gmail_default">Hace la prueba de importarlo como
componente, aunque no sea visual.</div>
<div class="gmail_default">Por otro lado, tenes por ahí suelto
un Delphi? (el Turbo Delphi que era el 2006 gratuito, por
ejemplo). El proceso en Delphi es igual, "Import Type
Library", agregabas la unit y la usabas en tu programa...
quizás probarlo ahí te aclare un poco que es lo que falló en
el importador de Lazarus, o si ese es el problema.</div>
<div class="gmail_default"><br>
</div>
</div>
</blockquote>
no, no tengo nada de delphi, turbo pascal....<br>
si alguien lo tiene por ahi, le puedo enviar esa dll para q me haga
el import type library :) y ver si es lío de lazarus o qué!!!<br>
<br>
los errores en la importación fueron varios, porque tb me jorobaba
en algunos tipos de datos..<br>
<br>
por ejemplo, en harbour:<br>
vCfe:Total := 1220<br>
<br>
y acá tuve que ponerlo como string, porque al importarlo lo puso
como widestring<br>
vCfe.Total := '110'; <br>
<br>
procedure Set_Total(const total:WideString); safecall; <br>
<br>
byeeeeeeeee<br>
<br>
<br>
</body>
</html>