Limpar Function

Delphi

29/01/2004

Eu tenho uma fuction e cada vez que eu a executo, o valor de retorno é diferente, mas se eu fechar o programa e reabrir da o mesmo valor, como faço para limpar ela da memória??

Só consigo limpar as variaveis string, as outra não.

function TSaneDataContraSenha.GeraSenha( Chave : String ): String;
var
X : Integer;
Val : Byte;
V : String;
K : String;
begin

V := ´´;
K := ´´;

for X := 1 to Length( Chave ) do


Havilux

Havilux

Curtidas 0

Respostas

Beppe

Beppe

29/01/2004

Você está usando números randômicos? Se sim, deveria ter mencionado, a gente não tem bola de cristal. :(

Coloca esta chamada, pode ser no OnCreate do form:
Randomize;



GOSTEI 0
POSTAR