दिलचस्प पोस्ट
जावास्क्रिप्ट में सबसे तेज़ एमडी 5 का कार्यान्वयन ASP.NET में समय क्षेत्र के साथ कैसे काम करें? C # में एक स्ट्रिंग से फ़ंक्शन कॉल करना एक गीट रेपो में फाइल रखें, लेकिन परिवर्तनों को ट्रैक न करें ClassNotFoundException: क्लास "com.google.android.gms.ads.AdView" नहीं मिला कैसे RecyclerView में आइटम के बीच डिवाइडर और रिक्त स्थान जोड़ने के लिए? एएसपी.नेट में नियंत्रण क्लाइंट का नाम और ID न पहुंचना डेटा के एक पूरे कॉलम में अग्रणी या अनुगामी रिक्त स्थान निकालें php, फ़ाइल डाउनलोड करें विंडोस्टेट को न्यूनतम से पुनर्स्थापित करें आईआईएस 7.0 के अंतर्गत क्लासिक एएसपी एप्लीकेशन काम करने के लिए मार्गदर्शन कैसे करें I मैं एक धागा कैसे मार सकता हूं? स्टॉप () का उपयोग किए बिना; कौन सा node.js पर समवर्ती कार्यों के लिए बेहतर होगा? रेशे? वेब कार्यकर्ता? या थ्रेड्स? निश्चित सी + + पुस्तक गाइड और सूची पथ से फ़ोल्डर नाम प्राप्त करना

Inno सेटअप: प्रतिलिपि फ़ोल्डर, सबफ़ोल्डर और फ़ाइलों को लगातार कोड अनुभाग में

क्या कोड अनुभाग में एक फाइल के सभी फाइलों और सबडिरेक्टरीज को ब्राउज करने और पुनरावर्ती कॉपी / स्थानांतरित करने का कोई तरीका है? ( PrepareToInstall )

मुझे एक विशिष्ट निर्देशिका की अनदेखी करने की आवश्यकता है, लेकिन xcopy का उपयोग करते हुए यह सभी निर्देशिकाओं /default/ ध्यान नहीं देता, उदाहरण के लिए, और मुझे केवल एक विशेष को अनदेखा करना होगा

Files अनुभाग को बाद में आवश्यक समय पर निष्पादित किया जाता है

वेब के समाधान से एकत्रित समाधान "Inno सेटअप: प्रतिलिपि फ़ोल्डर, सबफ़ोल्डर और फ़ाइलों को लगातार कोड अनुभाग में"

एक निर्देशिका को लगातार प्रतिलिपि बनाने के लिए प्रोग्राम का प्रयोग करें:

 procedure DirectoryCopy(SourcePath, DestPath: string); var FindRec: TFindRec; SourceFilePath: string; DestFilePath: string; begin if FindFirst(SourcePath + '\*', FindRec) then begin try repeat if (FindRec.Name <> '.') and (FindRec.Name <> '..') then begin SourceFilePath := SourcePath + '\' + FindRec.Name; DestFilePath := DestPath + '\' + FindRec.Name; if FindRec.Attributes and FILE_ATTRIBUTE_DIRECTORY = 0 then begin if FileCopy(SourceFilePath, DestFilePath, False) then begin Log(Format('Copied %s to %s', [SourceFilePath, DestFilePath])); end else begin Log(Format('Failed to copy %s to %s', [SourceFilePath, DestFilePath])); end; end else begin if DirExists(DestFilePath) or CreateDir(DestFilePath) then begin Log(Format('Created %s', [DestFilePath])); DirectoryCopy(SourceFilePath, DestFilePath); end else begin Log(Format('Failed to create %s', [DestFilePath])); end; end; end; until not FindNext(FindRec); finally FindClose(FindRec); end; end else begin Log(Format('Failed to list %s', [SourcePath])); end; end; 

आपको जो भी फ़िल्टरिंग की आवश्यकता है उसे जोड़ें। देखें कि कैसे और .. फ़िल्टर्ड हैं


उपयोग के एक उदाहरण के लिए, मेरे सवालों के जवाब देखें:

  • इनो सेटअप में छुपी हुई फ़ाइलों की प्रतिलिपि बनाना
  • उपयोगकर्ता को स्थापना रद्द करने की पुष्टि करने पर फ़ोल्डर कैसे सहेज सकता है? (Inno सेटअप) ।