Incompatible types: 'PAMMediaType' and '_AMMediaType'

[SRS-Nick]

Hello,

I have been using the VFrames.PAS for some time successfully with Delphi 2010 and
recently I've upgraded to Delphi 10.1 Berlin, then loaded my project in, AS IS, but now
receive an error message in the file called VSample.Pas, which apparently gets called
by the VFrames.pas file.

// ERROR MESSAGE from compiler
[dcc32 Error] VSample.pas(1177): E2010 Incompatible types: 'PAMMediaType' and '_AMMediaType'

Below is the section is VSample.pas which is generating the error.
the following statement is flagged.
Result := pSC.SetFormat(ppmt^);

// Section of error
IF Succeeded(Result) then
begin
piCount := 0;
piSize := 0;
pSC.GetNumberOfCapabilities(piCount, piSize);
p := @VideoStreamConfigCaps;
Result := pSC.GetStreamCaps(ListIndex, ppmt, p^);
IF Succeeded(Result) then
Result := pSC.SetFormat(ppmt^);
end;

[tomlin5278]

Result := pSC.SetFormat(ppmt^); <----------- ppmt^ change to "ppmt"

[cutec-chris]

I cant find this Code in actual VFrames.pas nor VSample.pas