[Gambas-user] PVRec program (Rob)

Rob sourceforge-raindog2 at ...94...
Wed Sep 3 17:44:02 CEST 2003


On Wednesday 03 September 2003 10:47, Nelson Ferraz wrote:
> > DO WHILE Exist(Application.home &/ "pvrusb" & Format(i,
> > "000") & ".mpg")
> DO WHILE Exist(DefaultFilename(i))
>   i = i + 1
> LOOP
> RETURN DefaultFilename(i)
>
> PRIVATE FUNCTION DefaultFilename(i as INTEGER) AS STRING
>   RETURN Application.Home &/ "pvrusb" & Format(i, "000") &
> ".mpg" END

Thanks, these are both better than my code.  I don't suppose 
either of you has one of those dongles to tell me how PVRec 
works for someone other than me; lots of people have downloaded 
it but I never got any feedback ;)

Rob





More information about the User mailing list