Ord

Question

ola pessoal.... alguem poderia me explicar como q funciona a funcao (ord)????em q momentos usa - la???e o (Xor);;;tipow alguem saberia me explicar o codigo do procedimento abaixo:[code:1:ba65ed6af4]pr...

Output · Answer

A duvida ta nas seguinte linhas:  For i:=1 to [color=red:6ca06e7b10]ord(s[0])[/color:6ca06e7b10] do  c := [color=darkred:6ca06e7b10]23 Xor c;[/color:6ca06e7b10]...

Massuda · Answer

Na forma mais gen�rica, Ord() retorna qual a ordem de um valor dentro de uma sequencia. No seu exemplo, ele retorna o equivalente ao c�digo num�rico de uma determinada letra.

J� o Xor � um operador l�gico que faz a opera��o XOR bit-a-bit entre dois valores.

O c�digo que voc� postou deve ser antigo (Delphi 1 ou Turbo Pascal). Este tipo de codifica��o usando Ord()...

For i:=1 to ord(s[0]) do

...serve para percorrer os caracteres de uma string [b:2f0d2ecc57]se e somente se[/b:2f0d2ecc57] a string for do tipo ShortString (at� 256 caracteres). Se voc� tentar usar isso com uma AnsiString o resultado pode n�o ser o esperado. Ao inv�s de usar isso, use...

For i:=1 to Length(S) do

Marco Salles · Answer

massuda , sei que seu conhecimento , se expande muito alem dos limites desse t�pico. portanto n�o considere este post , como nada a mais do que um observa��o

C�digo: For i:=1 to ord(s[1]) do ...serve para percorrer os caracteres de uma string se e somente se a string for do tipo ShortString (at� 256 caracteres).

n�o entendi... Para mim , serve para executar um loop de 1 ate o valor
equivalente ao c�digo num�rico de uma determinada letra. Esta letra � o sera a primeira letra da String S[1]

Agora , poderia ter a AnsiString S em sua defini��o , caractyeres que n�o s�o aceitos , ou que n�o tem seu valor retornado pela fun��o Ord ????

Mas na pr�tica usando o nosso teclado , n�o consigo imaginar esta situa��o... Se pensarmos em outra linguagem , ai poderemos ter problemas com o retorno da fun��o. Seria esta procedencia de sua coloca��o amigo massuda

Por exemplo , um caracter Japones :?:

Massuda · Answer

[quote:39ee0db021=�Marco Salles�]Para mim , serve para executar um loop de 1 ate o valor equivalente ao c�digo num�rico de uma determinada letra.[/quote:39ee0db021]Sim. � exatamente o que o [b:39ee0db021]for[/b:39ee0db021] est� fazendo.

Mas atente para o detalhe que o c�digo est� Ord(S[[b:39ee0db021]0[/b:39ee0db021]]) e S � provavelmente uma string. Normalmente, os caracteres dentro de uma string s�o indexados de 1 at� o tamanho da string.

No caso de uma string do tipo ShortString (ou nos tempos do Delphi/Turbo Pascal, quando toda string era ShortString) a posi��o ZERO era usada internamente pelo compilador para armazenar o tamanho da string (esse era um dos motivos para o tamanho de uma string ShortString ser limitado a 255 caracteres).

Algumas pessoas costumavam otimizar o acesso ao tamanho da string usando Ord(S[0]) ao inv�s de Length(S); na verdade, d� na mesma e hoje em dia nem faz mais sentido esse tipo de otimiza��o.

Output · Answer

Massuda,, talvez vez vc pode me ajudar,,,, eu levantei a questao em outros topicos,, me deram uma dikas mah naum consegui entender direito...

eu qria fazer o seguinte.
um sistema funciona por 30 dias,, dai bummmm,,, trava e gera um codigo aleatorio....

o cliente me passa esse codigo e eu fa�o uma especie de desincriptacao onde por essa desincriptacao consigo ver o nome do cliente onde esta instalado o sistema e tals....

dai gero uma otra chave q determino por mais qto tempo o sistema vai fuincinar ate vencer....

vc poderia me ajudar nesssa/?

Marco Salles · Answer

[b:e4425ea11a]cita��o de maasuda[/b:e4425ea11a]

Mas atente para o detalhe que o c�digo est� Ord(S[0]) e S � provavelmente uma string. Normalmente, os caracteres dentro de uma string s�o indexados de 1 at� o tamanho da string.

pensei que fosse erro de digita��o... Tanto � que corrigi

[b:e4425ea11a]cita��o de marco salles[/b:e4425ea11a]

C�digo: For i:=1 to ord(s[1]) do

F�rum Ord #329678