Wie kann ich mit meinem Programm spez. Dateien (z.B. alle mit .mdl ) mit meiner Anwendung verknüpfen.
Wie das „von Hand“ geht weiss ich schon, nur wie bringe ich das meinem Programm bei?
Danke
Mario
Problem hatte ich auch mal. Ich wollte „.rpp-Dateien“ mit meiner Anwendung verknüpfen. Die Lösung liegt in der Registry. Du mußt bestimmte Schlüssel erstellen.
Hier die Lösung:
procedure SetRegValue;
var Reg: TRegIniFile;
begin
Reg:=TRegIniFile.Create;
try
with Reg do begin
RootKey:=HKey_Local_Machine; // Abschnitt in Registrierung
OpenKey(’\Software\Classes.MDL’,True); //Erzeugt Schlüssel
WriteString(’’,’’,‚MDL_auto_file‘); //Schreibt Wert
OpenKey(’\Software\Classes\MDL_auto_file\shell\open\command’,True);
WriteString(’’,’’,Paramstr(0)+’ „%1“’);
end;
finally
Reg.Free;
end;
end;
Gruß
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Der will bei treginifile.create noch einen Namenparameter. Was muss ich da eingeben?
Danke
Mario
Der will bei treginifile.create noch einen Namenparameter. Was
muss ich da eingeben?Danke
Mario
Bei Delphi 5 funktionierts. Probier unter D3 besser die TRegistry Klasse.
procedure SetRegValue;
var Reg: TRegistry;
begin
Reg:=TRegistry.Create;
try
with Reg do begin
RootKey:=HKey_Local_Machine; // Abschnitt in Registrierung
OpenKey(’\Software\Classes.MDL’,True); //Erzeugt Schlüssel
WriteString(’’,‚MDL_auto_file‘); //Schreibt Wert
OpenKey(’\Software\Classes\MDL_auto_file\shell\open\command’,True);
WriteString(’’,Paramstr(0)+’ „%1“’);
end;
finally
Reg.Free;
end;
end;
Gruß
Funktioniert alles. Danke.
Aber wie stelle ich den dazugehörigen Icon ein?
Ich hab’s mal in der Registry mit DefaultIcon probiert, funktioniert aber nicht.
Gibt’s da einen speziellen Eintrag?
Danke
Mario