/ Forside/ Teknologi / Udvikling / Delphi/Pascal / Tip
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Få extension knyttet til dit program.
Er bedømt af 4 brugere
Fra : smilly
Vist : 671 gange

Dato : 28-11-00 14:07

Her er et eksempel på hvordan du knytter dit program til en bestemt extension. Dvs. når en fil med denne extension bliver aktiveret, lukker dit program op for at åbne filen.

*************************************
Var
Reg : TRegistry;

Begin
Reg := TRegistry.Create;

try with Reg do
begin
RootKey := HKEY_CLASSES_ROOT;
OpenKey('\Filnavn', True);
WriteString('', 'Filnavn beskrivelse');
CloseKey;

OpenKey('Filnavn\DefaultIcon', True);
WriteString('', Application.ExeName + ',0');
CloseKey;

OpenKey('Filnavn\shell\open\command', True);

WriteString('', Application.ExeName + ' "%1"');

CloseKey;

RootKey := HKEY_CLASSES_ROOT;
OpenKey('\.ext', True); // extension som skal bruges til at åbne dit program.
WriteString('', 'Filnavn');

CloseKey;
end;

finally
Reg.CloseKey;
Reg.Free;
end;
End;

 
 
Bedømmelse

Fra : HelmerHink


Dato : 25-01-02 09:47



Bedømmelse

Fra : nuser34


Dato : 18-10-01 15:33



Bedømmelse

Fra : crissi2


Dato : 22-05-02 19:59



Bedømmelse

Fra : Zeppo


Dato : 17-06-03 17:43



Du har følgende muligheder
Eftersom du ikke er logget ind i systemet, kan du ikke lave en bedømmelse til dette tip.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
Søg
Reklame
Statistik
Spørgsmål : 177549
Tips : 31968
Nyheder : 719565
Indlæg : 6408820
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste