procedure SetVGA(hStream:Byte);
begin
FMPSet(hStream,FMPI_VID_TV,Set_VGA);
end;
procedure SetNTSC(hStream:Byte);
begin
FMPSet(hStream,FMPI_VID_TV,FMPF_NTSC or Set_TV);
end;
procedure SetPAL(hStream:Byte);
begin
FMPSet(hStream,FMPI_VID_TV,FMPF_PAL or Set_TV);
end;
procedure SetPAL60(hStream:Byte);
begin
FMPSet(hStream,FMPI_VID_TV,FMPF_PAL60 or Set_TV);
end;