Hallo Marco,
Je tip heeft mee weer iets verder gebracht maar ik krijg nu foutmeldingen op stukjes code zoals er hieronder eentje staat weergegeven :
Code:
PAVIEditStream = ^IAVIEditStream;
IAVIEditStream = class(IUnknown)
public
function Cut(plStart, plLength: PDWORD; var ppResult: PAVISTREAM): HResult; virtual; stdcall; abstract;
function Copy(plStart, plLength: PDWORD; var ppResult: PAVISTREAM): HResult; virtual; stdcall; abstract;
function Paste(plPos: PDWORD; plLength: PDWORD; pstream: PAVISTREAM; lStart, lEnd: DWORD): HResult; virtual; stdcall; abstract;
function Clone(var ppResult: PAVISTREAM): HResult; virtual; stdcall; abstract;
function SetInfo(lpInfo: PAVISTREAMINFOW; cbInfo: DWORD): HResult; virtual; stdcall; abstract;
end;
1 van de foutmeldingen is :
VFW.PAS(1381,8) Error: No matching implementation for interface method "IUnknown._Release:LongInt; StdCall;" found
de andere melding zijn van gelijke strekking.
Wat gaat hier fout? De totale unit is ook in de bijlage te vinden.
Ik heb redelijk wat ervaring met Delphi maar FPC is wat lastiger om iets aan de gang te krijgen
Bookmarks