ord

[Rodrigo Miss 1]

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:

 

procedure TForm1.Button1Click(Sender: TObject);var  i:Integer;begin  S := edit1.text;  For i:=1 to ord(s[0]) do  c[i] := 23 Xor c[i];  Label1.Caption := s;end;

A duvida ta nas linhas:

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

 

c := 23 Xor c;

[marcio.theis 3]

http://forum.imasters.com.br/public/style_emoticons/default/searchbeforeposting.gif