Delphi Can

Merhaba arkadaşlar; Delphi 7 ile yazdığım programa nasıl lisans ekleyebilirim. Lütfen bu konuda yardım ediniz. Şimdiden teşekkür ederim.

Başlığı küçük harflerle değiştirin lütfen.
turbopower onguard araştırabilirsiniz.
https://sourceforge.net/projects/tponguard/

Evet, hem başlık hem de içerik küçük harfle yazılırsa daha iyi olur. Malum sanal alemde büyük harf "bağırmak" anlamına geliyor

Bolca yazım yanlışlarını var; elbette sorun değil ama düzeltirseniz iyi olur. (En azında Delphi'yi düzgün yazabilirsiniz.)

Sorduğunuz soruyla görselin hiç bir ilgisi yok. Neden koyduğunuzu anlayamadım?

Ayrıca bu sizin projenizse eğer; proje başlığında Otomosion yazıyor, bilginiz olsun.

Aynı program ve yine aynı şekilde "Lisans" sorunların için defalarca burada soru sordun.Bir çok üye de sana yardımcı olmaya gayret etti.
Tam olarak ne olmasını istiyorsun ? Buradan birisinin senin adına lisanslama kodunu yazmasını mı bekliyorsun ?

Şimdi daha önce gönderdiğin mesajlara bir baktım, hep "Hızlı Vegas" programı için kullanıcı girişi, lisans vb. sorular sormuşsun.

Diyecek söz bulamıyorum...

Bunları üst üste koy cyrptola uygulama her açılışta senin sunucudan kontrol etsin sende kurtul bizde 

function Get_MAC: string;
var
 UuidCreateFunc: function(var guid: TGUID): HRESULT; stdcall;
 hr: HRESULT;
 guid: TGUID;
 hLibrary: THandle;
begin
 hLibrary := LoadLibrary('RPCRT4.DLL');
 if Win32MajorVersion >= 5 then
   @UuidCreateFunc := GetProcAddress(hLibrary, 'UuidCreateSequential')
 else
   @UuidCreateFunc := GetProcAddress(hLibrary, 'UuidCreate');
 hr := UuidCreateFunc(guid);
 if Failed(hr) then
   RaiseLastWin32Error;
 Result := GUIDToString(guid);
 Result := Copy(Result, 26, 12);
end;

function GetDiskSerialNumber(DriveName: Char): DWord;
var
 Temp: DWord;
begin
 GetVolumeInformation(PChar(DriveName + ':\'), Nil, 0, @Result, Temp,
   Temp, Nil, 0);
end;

@yhackup hocam, ben bu arkadaşın bu programı nasıl yazdığından bile şüpheliyim
inşallah sizin kodları anlayıp kullanabilir
Emeğinize sağlık

Lisans için 2 keredir paylaşım yapiyom diğer bakan olmadı bi zahmet diğer paylaşıma bak görürsun yorumları bakamiyorsan alta ekran görüntüsü var php html sql 2016 beri delphi yaziyorum delphi ile 4 tane proje yazıp satım 

---

tsk ederim buldum bi şimdi yabancı form onu yaziyorum

(21-04-2017, Saat: 16:28)admin02 Adlı Kullanıcıdan Alıntı: [ -> ]Lisans için 2 keredir paylaşım yapiyom diğer bakan olmadı bi zahmet diğer paylaşıma bak görürsun yorumları bakamiyorsan alta ekran görüntüsü var php html sql 2016 beri delphi yaziyorum delphi ile 4 tane proje yazıp satım 

---

tsk ederim buldum bi şimdi yabancı form onu yaziyorum

ben iki defadır aynı cevabı yazıyormuşum en azından o component benim işimi görmüyor yada kullanmayı öğrenemedim yazabilirdiniz o konuda yeni yorumlarla devam edilebilinirdi.

---

Component delphi 7 uyumludur.

Admin02, tartışma yaratmak için söylemiyorum. Birşeyler öğrenmen için söylüyorum.
Kaç kez bununla ile ilgili konu açmışsın, aşağıdaki resimden kendin de görebilirsin. Resim büyük olduğu için sadece linkini ekliyorum. İsteyen bakabilir.

http://uimg.in/images/2017/04/21/Ui9gQ6Gl.jpg

Admin02, konu başlığı ve içeriğini değiştirmeye vakit bulamadınız sanırım. Ben sizin yerinize düzenledim. Kusura bakmazsınız umarım.