Q&A

  • 문자열을 아스키값으로 바꾸는방법좀..

edit1.text 에 있는 문자들을 아스키값으로 바꿔서

Sendmessage 해서 윈도우로 보내려고 했는데 잘 안대서요;;

부탁해요 ♡


이 게시물을
1  COMMENTS
  • Profile
    비루스 • 2003.08.20 21:20

    var
      S : string;
      i : integer;
    begin
      edit2.text := '';
      S := '';
      S :=  edit1.text;
      for i:=1 to length(S) do
      begin
        edit2.text := edit2.text + '['+inttohex(ord(S[i]),2)+']';
      end;
    end;
←First Page
585 586 587 588 589 590 591 592 593 594
Last Page→
한델 로그인 하기