for i := 0 to length(edtusername.Text) do begin
j := j + inttostr(ord(edtusername.text[i]));
end;
위와 같은 형태로 에디트박스에 입력한 텍스트를 숫자형태로 바꾸어서 텍스트파일에 저장했습니다. 그런데 저장된 내용을 다시 문자로 바꾸어서 가져오려고 했습니다.
AssignFile(outfile, 'c:outfile.txt');
Reset(outfile);
while not Eof(outfile) do begin
Readln(outfile,line);
str.Add(line);
end;
showmessage(str[0]);
showmessage(str[1]);
sname2 := chr(strtoint(str[0]));
바로 위처럼 해서 가져오려고 했는데요... 텍스트파일에 저장된 숫자형태가
0177232193248200191 이런 형태로 integer 형으로 가져올 수가 없는데요
어떻게 해줘야 원래 입력했던 텍스트 형태로 가져올 수 있나요..
꼭 좀 알려주세요...
밑에 답변 적어놨는데.... 못보셧나요?
그리고 제가 답변 한게 안올라갔나해서 보니까.. 똑같은 질문이 또있더군요..
답변쓴거 읽어보시구요.. 그리고 찾는게 그게 아니라면
다른내용으로 올려주시기 바랍니다.. 그럼.