با سلام و احترام
چطوری یا با چه کدی میتونم سریال قطعات سخت افزاری سیستم رو مثل Cpu , MainBoard , Hdd و غیره رو در بیارم(Delphi XE3) ؟
ممنون از توجه دوستان
نمایش نسخه قابل چاپ
با سلام و احترام
چطوری یا با چه کدی میتونم سریال قطعات سخت افزاری سیستم رو مثل Cpu , MainBoard , Hdd و غیره رو در بیارم(Delphi XE3) ؟
ممنون از توجه دوستان
سلام
همیشه قفل یکی از دقدقه های برنامه نویسا بوده و هست .
اگه تو خیلی از سایت های دیگه دیده باشید در مورد امنیت و مابقی مسائل خیلی صحبت شده .
بدست آوردن سریال های سخت افزاری روش مناسبی نیستند . مثلا سی پی یو اکثرا شبیه به هم هستند . کدهای اماده که سریال هارد رو بدست میاره بیشتر سریال درایو رو میدن و با هز بار فرمت عوض میشه . به نظر من از قفل های سخت افزاری استفاده بکنید بهتره - قیمتش هم زیاد نیست . هم برنامه رو مهمتر نشان میده ( اینجوری جا افتاده تو مصرف کنندها ) - در مورد امنیتش هم باید بگم که همه قفل ها باز میشن - حالا یکی راحتتر یکی سختتر -
خودتان را درگیر این مساله نکنید ( ساخت قفل ) - از قفل آماده استفاده کنید .
با سلام
واقعیتش قفل دارم ولی این برنامه رو میخوام ارزون بدم بخاطر همین میخواستم که تو کل قیمت ارزونتر در بیاد. تو اینترنت یه سرچ زدم کامپوننت MiTeC_System_Information_v10.7.0_Full.Source.rar پیدا کردم اما توش برا دلفی XE3 نبود تا D7 بود
ممنون
با سلام
یکی دیگه پیدا کردم که توش rad5,6,7,8,9 هست آیا میدونید کدوم برا xe3 هستش ؟
ممنون
سلام
برای کد هارد از کد زیر میتونید استفاده کنید.
//////////////////////////////////////////////////////////////////////////////////////////////
function GetHardDiskSerial(const DriveLetter: Char): string;
var
NotUsed: DWORD;
VolumeFlags: DWORD;
VolumeInfo: array[0..MAX_PATH] of Char;
VolumeSerialNumber: DWORD;
begin
GetVolumeInformation(PChar(DriveLetter + ':\'),
nil, SizeOf(VolumeInfo), @VolumeSerialNumber, NotUsed,
VolumeFlags, nil, 0);
Result := Format('%8.8X',
[VolumeSerialNumber])
//Result := '01020304';
end;
استفاده در کد ما هم
edit3.Text := GetHardDiskSerial('c')
البته شنیدم که کد هارد قابل هک است . مطمئن نیستم. کد ویندوز هم هست که میگن مطمئن تره اگه لازم داشتید اونم کپی کنم.
استفاده از قفل های سخت افزاری هم خوبه - به صورت usb هست. هم برای نرم افزار دسکتاپ و سرور
یه مدل tiny هست خوبه . تو تهران هم شرکتش هست.
یه مدل انگلیسی هست میگن تاحالا هک نشده
rocky4nd فکر کنم اسمش هست. قیمت حدودی هم 30 هزار تومان
واقعیتش قفل هم هزینه رو میبره بالا و هم اینکه باید حتما قفل رو براش ارسال کنم اما قفل نرم افزاری دردسری نداره. آیا کد سریال CPu و مادربرد رو دارین؟
ممنون
سلام
برای قفل گذاشتن روی نرم افزار باید به سوالات زیر پاسخی بدید که خودتونو قانع کنه
آیا نرم افزاری مشابه نرم افزار شما در بازار وجود داره؟
اگر وجود نداره پس حتما روش قفل بگذارید و اگر وجود داره آیا کیفیت نرم افزار شما بهتره یا اون نرم افزار؟
اگر کیفیت نرم افزار شما بهتره پس حتما روش قفل بگذارید و اگر کیفیت اون نرم افزار بهتره قیمتش چنده؟
اگر قیمت نرم افزار شما پایین تره پس حتما روش قفل بگذارید و اگر قیمت اون نرم افزار کمتره پس مطمئن باشید کسی برای شکستن قفل نرم افزار شما اقدام نمیکنه
اگر نرم افزار شما با اون نرم افزار میتونه رقابت تنگاتنگی داشته باشه باید ببینید آیا اون قفل داره و اگه داره از چه نوعی هست؟
و در نهایت اینو بدونید سخت ترین و پیچیده ترین قفل های نرم افزاری در عرض چند ساعت شکسته میشه. پیشنهاد میکنم اگر براتون مقدوره محصولتونو بصورت لایسنسی ارائه کنید.
لطفا یه توضیح مختصری در این باره بفرمایید .نقل قول:
نوشته اصلی توسط مجید [برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]
فرض کنید نرم افزاری داریم که قرار است برای آن قیمتی تعیین کنیم و با توجه به نگرانی های موجود در مورد کپی برداری و یا شکستن قفل راه حل های مختلف و پیچیده ای در اختیار داریم که البته برای قفل خظر شکستن و کپی برداری غیر مجاز همیشه وجود داشته و خواهد داشت.نقل قول:
نوشته اصلی توسط meyti [برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]
برای فروش لایسنس میتوانید نرم افزار را مثل آنتی ویروس ها طراحی کنید . چیزی شبیه به NOD32 یا KasperSky , ...
این دسته از نرم افزار ها کاربران خود را وادار به خرید لایسنس نرم افزار یا به عبارتی فعالسازی از طریق دریافت username , password میکنند. البته این روش هم قابل دور زدن است ولی از روش قفل گذاری نرم افزاری یا سخت افزاری کمی معتبر تر است .
در روش قفل گذاری نرم افزاری یا سخت افزاری محصول شما در همان ابتدای اجرا یا در نهایت در چند جای مشخص که توسط برنامه نویس تعبیه شده است وجود قفل را بررسی میکند و در صورتی که قفل شکسته باشد این بررسی فریب خورده و به کار خود ادامه میدهد. در صورتی که بررسی اعتبار یک لایسنس برای یک برنامه نویس در هر جای کد نرم افزار براحتی قابل فراخوانی است و همچنین برای هکر ها هم کمی سخت تر از پیدا کردن قفل های سابق است . در صورت استفاده از لایسنس در نرم افزار خود میتوانید برای اعتبار بخشی به محصول خود نرم افزار را در مقاطع کوتاه بروز رسانی کنید تا کاربران متقاعد شوند که نرم افزار مورد نظر از پشتیبانی خوبی برخوردار است و اگر لایسنس معتبر را از شما خریداری کنند میتوانند به در یافت رایگان نسخه های بعدی امیدوار باشند . اگر چه این موضوع به سیاست شما بستگی دارد. همچنین معمولا نرم افزار هایی که توسط یک شخص به صورت انفرادی تولید میشود معمولا آپدیت نخواهد شد و هدف از تولید چنین نرم افزار هایی عموما کسب درآمد مقطعی و کوتاه مدت است. لذا راه حل لایسنس برای نرم افزار هایی توصیه میشود که توسط شرکت های معتبر و یا تیم ورک های بزرگ تولید شده اند که میتوانند آپدیت های کوتاه مدت ارائه دهند و محصول خود را زنده نگه دارند.
با سلا و احترام
آیا امکان داره کامپوننت ضمیمه شده برای دلفی xe3 هم نصب بشه تو دلفی 7 مشکلی نداره.البته تو ورژن جدیدش هست اما تو اینترنت کرک شدشو پیدا نکردم این ورژن Mitec Sytem Information 10.9.2 هستش
با تشکر
با سلام و احترام
آیا راه حلی داره ؟
ممنون
راه دوستان اصولی تر است
منتها اگه خواستید از کد های داخلی سیستم استفاده کنید، کد ویندوز بنظر قابل اتکا تر است
uses Registry;
procedure TForm1.Button1Click(Sender: TObject);
var x:integer;
var
DateTime : TDateTime;
s,s2:string;
len,i,check1,check2,check3,check4 :integer;
var OSVersion : TOSVersionInfo;
Reg: TRegistry;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
if OSVersion.dwPlatformId = VER_PLATFORM_WIN32_NT then
Reg.OpenKey('\SOFTWARE\Microsoft\Windows NT\CurrentVersion', False)
else
Reg.OpenKey('\SOFTWARE\Microsoft\Windows\CurrentVe rsion', False);
Edit1.Text := Reg.ReadString('ProductID');
Reg.Free;
end;
شما میتونید کد را از مشتری بکیرید ، مثلا با یه چیز دیگه اضافه کنید و md5 ازش محاسبه کنید و به مشتری بدید
هر بار هم ویندوز عوض میکنه ، کد عوض میشه
البته تو شرکت ما یه سیستم یه مشکل داشت که کد برنمیگردوند.