안녕하세요~~

현재 가지고 있는 문제로
질답 검색을 하려는데 어떤 문구로 검색을 해야할지 난감해서
그냥 씁니다.(문자열이 주제어로 맞긴 한거 같은데...)

ㅡ,.ㅡ;;;


procedure TForm1.Button1Click(Sender: TObject);
var
temp1 : string;
temp2 : string;
begin
  temp1 := edit1.text;
  //formatbuf(temp2,20,'%s',4,[temp1]);
setlength(temp1,20);
  showmessage(temp1);
  memo1.Text := memo1.Text + temp1;
end;

end.

요런 버튼 이벤트가 있습니다.
temp1 에는 텍스트 박스에 입력된 문자열이 들어가구요.(ABC..etc..)

temp2는 temp1에 입력된 문자열의 크기를 20으로 맞춰서
가지고 있습니다....그니깐
에디트박스의 내용 := 'ABCDE';
메모장에 찍고 싶은 거 :='ABCDE***************'; //*는 공백

프로그램상에서 temp1 :='ABCDE'; setlength 하고
쏘우메시지 하면 늘어나는게 보입니다.
근데 메모장에 찍으면 공백이 안나와요~~

그리고 temp1 := edit1.text; 이런식으로 값을 받아서 setlength 해주면
ABCDE 다음에 이상한 특수문자가 딸려 오네요~~
메모장에 찍히는것두 공백이 안나오구..

굴구 입력된 문자열의 길이가 20개 이상이면
20개만 가져와 찍구 나머지는 짤리는....그런 기능의.....

어떤 함수라도 없을까 해서 문의 드립니다..


꽁!수! 아시는분~~~~