Proteção contra copias ilegais

[Relbi]

Como criar uma proteção de forma que se o programa desenvolvido for copiado sem autorização ?
se alguém puder me ajudar agradeço imensamente

gostaria de saber se existe algum meio de proteção para os sistemas feitos no xmaker 4.0
tipo o componente AppProt, mencionado este local do fórum ou outro que evite copias ilegais
search.php?st=0&sk=t&sd=d&sr=posts&keywords=prote%C3%A7%C3%A3o&start=10

Obrigado
Relbi

[vinizioWOW]

Olá, bom dia,

Nas versões 5 e 6 do Xmaker existe o componente OnGuard que é utilizado justamente para adicionar proteções de cópia ao seu projeto. Já na versão 4 e anteriores não sei te falar.

Confere na paleta de componentes da sua versão se existe a aba de componentes OnGuard, caso tenha basta instalar também no Delphi e estudar os exemplos disponibilizados em ..\XMakerXX\Comp\Delphi\TPonguard\examples\Delphi

Atenciosamente:

[Dimmy Angelo]

Você pode tentar também uma função para ler o serial do HD.


Exemplo:

procedure TForm1.Button1Click(Sender: TObject);
var
SerialNum : pdword;
a, b : dword;
Buffer : array [0..255] of char;
begin
if GetVolumeInformation('c:\', Buffer, SizeOf(Buffer), SerialNum, a, b, nil, 0) then
Label1.Caption := IntToStr(SerialNum^);
end;

Ai você pode implementar com outra função a verificação...

[Relbi]

Obrigado Dimmy Angelo, vou tentar mais tarde quando chegar em casa, se não, vou ter que esperar um pouco para investir em outra versão do xmaker, é que agora não tem como.
Uma perguntar, coloco este código no form principal ? em qual ítem ?
Obrigado

[Dimmy Angelo]