kkm 님이 쓰신 글 :
: 스트링 비교를 할려고 합니다.
: Lable에 있는 caption값의 일부를 비교 조건으로 걸려고 합니다.
: 만약에 캡션에 예비문자#01 예비문장#02 이렇게 있다고 하면
: 더 많을 수도 있지만 대충비교를 위해 이렇게 했습니다.
: 제가 비교 조건으로 걸려고 하는 부분이 예비문자 입니다.
: 예비문자뒤에 스피드 버튼 Enabled := False로 만들려고 비교 할려고 합니다.
: 확장을 위한 부분이지만 예비로 놓였있는 부분이라서요.
: 만약에 나중에 라벨이 변경이 되면 활성화 될 수 있게 만들면 되고요.
: 제가 생각한게 StrPlCopy를 이용해 char 배열에 입력해서 비교 할려고 했는데.
: 생각만큼 잘 안되네요...
: 혹시 해결 방법 있으면 답변 부탁드리겠습니다...
: 글 읽어 주시느라 수고하셨습니다.

우선 적용한 소스의 부분입니다.
StrPCopy(statenameTempBuf, Namearray[Tempnum].Caption);
   if (statenameTempBuf[0] = #191) and (statenameTempBuf[2] = #186) and (statenameTempBuf[4] = #199) and  (statenameTempBuf[6] = #189) and (statenameTempBuf[8] = #177)  then

이렇게 조건을 만들어서 넣었습니다. 그런데 어제 이상한 현상이 있어서 다시 또 질문드립니다 다른 분들도 그런지 궁금하네요....제가 해본 결과 델3도 같은 증상입니다. 저는 델 7쓰고요...
보통 for Count :=0 to 15 do
이렇게 하면 0부터 시작해서 15까지 루프를 도는 문장인데....

for Count := 0 to 15 do TempBuf[Count] := 1

이것을 버턴을 눌렀을대 작동하게 하면은 이상하게 16부터 꺼꾸로 내려 가더군요...
원래 이런건지 궁금합니다. 다만 0부터 가게 할는 트릭을 알아냈는데.
전역변수로 i : integer;을 선언했다고 햇을경우

for Count := 0 to 15 do
begin
i:= Count;
TempBuf[Count] := 1;
end;

이렇게 하면은 정상적으로 0부터 15까지 잘 흘러 가더군요..
이 부분을 잘 알고 계신분 있으면 답변 부탁드리겠습니다...^^