UzantıLarın oluşturulması ..??..

[qamyoncu]

Merhaba arkadaşlar..

Windows, sanırsam ki uzantılar(.doc,.bmp,.xls vs.) ile ilgili bilgileri registry de saklıyor. Yani şu uzantıda şu icon gösterilicek, şu uzantılı dosyayı açınca şu program çalışıcak vs vs gibi.

Ben kendim bi uzantı yarattım.. aslında yaratmadım, sadece hile yaptım, ismini değiştirdim ve tabi birkaç kritptografik işlem yaptım..
Ancak dosya ikonu malesefki istediğim gibi değil.. Ben programımın içine, programımın açıldığı bilgisayarın regeditine 'bu uzantıda bu ikonu göster' komutunu vermek istiyorum.. Ve tabi nasıl ki .doc uzantılı dosyaya tıkladığımızda word açılıyorsa, benim uzantıma tıklanınca benim programım açılmalı.. ama nasıL??

Yardımlarınızı bekliyorum, ayrıca, yeni bir dosya uzantısı nasıl oluşturulur bunuda öğrenmek isterim.. Elinde dökümanı olan veya bilgisi olan arkadaşlar paylaşırsa pek bir bahtiyar olurum:)

Sağlıcakla...

[unicorn64]

forumda konuyla alakalı yeterince yazı var. önce ara derim ben...

[conari]

Klasör seçeneklerinden ,
Dosya Türleri kısmında istediğini yaparsın.

[sabanakman]

Peki bununla ilgili bir araç program var mı bildiğiniz? Zira vista basic sistemde ne hikmetse o kısımlara müdahele ettirmiyor, kendim konuyu araştırıp yazacak kadar da zamanım olmayınca bir gönüllü çıkar da şu fukaraya yardım eder herhalde .

[subhan]

Peki bununla ilgili bir araç program var mı bildiğiniz? Zira vista basic sistemde ne hikmetse o kısımlara müdahele ettirmiyor, kendim konuyu araştırıp yazacak kadar da zamanım olmayınca bir gönüllü çıkar da şu fukaraya yardım eder herhalde .

Sabanakman sana böyle yardımcıl ola bilirim DelphiTürk kodbank programını indir ve aradığın kod programın içinde
mevcu hata ben kulandım (arayan bulur) ancak program-da çoklu kod bulunduğu için 2-3 saat kodu bula bilirsin

[sabanakman]

Peki bununla ilgili bir araç program var mı bildiğiniz? Zira vista basic sistemde ne hikmetse o kısımlara müdahele ettirmiyor, kendim konuyu araştırıp yazacak kadar da zamanım olmayınca bir gönüllü çıkar da şu fukaraya yardım eder herhalde .

... 2-3 saat kodu bula bilirsin

O kadar zaman ayırdıktan sonra kendime program yazarım, sormaya da gerek kalmaz. Sadece bu konuda önde olan bir gönüllü aradım, eğer gönüllü değilsen ve yoksa kendi köşeme çekilebilirim, konu müsait bir zamanımda halledilmeye kalır

[conari]

[qamyoncu]

Kod: Tümünü seç

var
  reg: TRegistry;
begin
  reg := TRegistry.Create;
  reg.RootKey := HKEY_CLASSES_ROOT;
  reg.LazyWrite := false;
  reg.OpenKey('.btc\shell\open\command',
              true);           //.btc  yaratmak istediğim uzantı..
              if reg.ValueExists('')=false then
reg.WriteString('',
                 getcurrentdir+'\Project1.exe %1');     //bu bölümde uzantıyı hangi .exe ile açıcağımızı belirledik.

  reg.CloseKey;
  reg.OpenKey('.btc\DefaultIcon',
              true);

  reg.WriteString('',
                  getcurrentdir+'\Project1.exe,0');       // ve uzantımızın ikonu...
  reg.CloseKey;
  reg.free;
end;

evet arkadaşlar.. ihtiyacım olan kodları buldum, paylaşmak istedim..

Ancak..bu sfer şöyle bir sorunum çıktı..

Örnek olarak:
bird.btc dosyasına çift tıklıyarak açtım. >Tmm benm programım açıldı sorun yok, ancak bu bird dosyasıyla ilgili bilgiler programa gönderilmedi..

Kısacası.. ben programımın hangi dosya üzerinden açıldığını bulup o dosyanın içeriğini programa yansıtmam istiyorum..

İlgilenen arkadaşlara minnettarım..
koLay geLsin. .

[unicorn64]

bkz paramcount paramstr

[sabanakman]

viewtopic.php?f=19&t=24637 -> Burada konu ile alakalı detaylı bir açıklama hazırlandı.