메모컴포넌트에 특정문자(예:'$')를 pos함수로 위치를 찾으려고 합니다.
그런데 메모컴포넌트의 한 라인안에 특정문자(예:'$')가 한개가 들어있다면 한개의 위치를 찾아내는건 pos함수를 이용하면 되지만 특정문자가 여러개 들어있어서 pos함수로 어떻게 모두 위치를 알아낼수있을지 난감합니다.
var
SelPos: Integer;
begin
SelPos := Pos(FindText, Memo1.Lines.Text);
if SelPos > 0 then begin
Memo1.SelStart := SelPos - 1;
Memo1.SelLength := Length(FindText);
end
else MessageDlg(Concat('Could not find "', FindText, '" in Memo1.'), mtError,[mbOk], 0);
end;
end;
SelPos: Integer;
begin
SelPos := Pos(FindText, Memo1.Lines.Text);
if SelPos > 0 then begin
Memo1.SelStart := SelPos - 1;
Memo1.SelLength := Length(FindText);
end
else MessageDlg(Concat('Could not find "', FindText, '" in Memo1.'), mtError,[mbOk], 0);
end;
end;
초보라소.. ㅡㅡ;;; 잘은 모르겠지만.. 저케 하시믄 될꺼 같은데..ㅡㅡ;;;
도움이 못되서 지송함돠.. (--)(__)(--) 꾸벅.