I. Ouvrir votre application par l'ouverture de l'un de ses fichiers▲
Exemple : l'extension des fichiers de l'application exemple sera « .mon ». Ce seront des fichiers texte qui se chargeront dans un Memo (Memo1) qui a été posé sur la fiche (Form1).
Pour cela, il suffit de mettre ce code dans l'événement OnCreate de Form1
Sélectionnez
void __fastcall TForm1::FormCreate(TObject *Sender)
{
if ( ParamCount() > 0 )
Memo1->Lines->LoadFromFile(ParamStr(1));
}ParamCount() renvoie le nombre de paramètres.
ParamStr(1) renvoie une AnsiString contenant le 1er paramètre.
Mais pour que cela fonctionne, il faut associer le type de fichiers « .mon » à l'application.
On peut faire l'association par programme :
Unit.h :
Sélectionnez
#include <Registry.hpp>Unit.cpp :
Sélectionnez
TRegistry *Reg = new TRegistry;
Reg->RootKey = HKEY_CLASSES_ROOT;
Reg->OpenKey("\\.mon",true);//Extention du fichier
Reg->WriteString("","Mon_Fichier");//nom de la clé suivante
Reg->CloseKey();
Reg->OpenKey("\\Mon_Fichier",true);
Reg->WriteString("","Fichier Mon");
//nom qui apparait dans l'explorateur de fichier
Reg->CloseKey();
Reg->OpenKey("\\Mon_Fichier\\shell\\open\\command",true);
Reg->WriteString("","\"C:\\dossier\\mon.exe\" \"%1\"");
//Chemin et nom du programme associé suivi de "%1"
Reg->CloseKey();
delete Reg;ATTENTION aux écritures dans la base de registre. Les erreurs ne sont pas permises.
Ce code a été testé sous Windows 95, 98 et XP.
Pour le tester, il faudra créer un fichier texte avec l'extension « .mon »