Discussion :

[cincap]

@ Cirec,

Voici le lien, http://maxxdelphisite.free.fr/doscmd.htm

Je viens de tester la version "doscommand_tk" et la pas d'erreur donc je l'adopte.

Merci pour ton temps avec cette solution.

Ce soir je brancherai mon IPhone et je testerai un fichier de sonnerie.

Bon après midi.

@+,

cincap

[cincap]

Bonsoir à toutes et à tous,

Comme promis, j'ai testé une sonnerie sur l'IPhone 6s et elle est acceptée par le logiciel ITunes et elle peut être copiée sur l'IPhone à partir d'un fichier musical au format mp3.

Merci de votre aide.

@+,

cincap

[cincap]

Bonjour à toutes et à tous,

Serait t'il possible d'ajouter un Tedit (T30) afin de contrôler la durée du morceau à découper mes essais ne sont pas concluants.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ffmpeg -ss 0 -i fichier_source.mp3 -t 30 fichier_sortie.aac

Je sais que ce topic est fermé, on ne sait jamais si quelqu'un passait par la.

@+,

cincap

[SergioMaster]

Bonjour,

si je regarde la procedure

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
TForm3.Button3Click(Sender: TObject);
const
  ffmpegParams = 'ffmpeg.exe -y -ss %s -i "%s" -t 30 "%s"';
var

la commande passe par un Format(ffmpegParams,[])
il est donc facile de modifier en

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 const  ffmpegParams = 'ffmpeg.exe -y -ss %s -i "%s" -t %d "%s"';

.... 
  MonFichier := Format(ffmpegParams, [FormatDateTime('hh:mm:ss.zzz', MediaPlayer1.Position / MSecsPerDay),
    FileIn,StrToIntDef(T30.text,30) ,FileOut]);

[cincap]

@ SergioMaster,

Merci pour ton aide, cela est tout a fait correct, je viens de tester.

Il y a des sonneries qui doivent durer 30s et 40s, donc plus facile avec un Tedit.

J'avais essayé des tas de directions uniquement dans le code de la constance mais sans succès, le code confirmait que la commande était invalide lors du découpage.

Excellente journée ensoleillée.

@+,

cincap