5
5411
Unregistered / Unconfirmed
GUEST, unregistred user!
for i := 1 to length(s) do
begin
edit2.Text:=edit2.Text + inttohex(ord(s),2);
end;
end;
begin
edit2.Text:=edit2.Text + inttohex(ord(s),2);
end;
end;