type Tmunje=record mun:string[255]; ans:string[1]; end; var munje:array [1..5500] of Tmunje; 위와 같이 레코드형을 선언하고 각각의 변수에 텍스트파일로부터 문자열을 읽어들였습니다. 변수에 저장되어있는 내용중 특정 문자열을 ...
최용일
•
2000.09.06 23:21
안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다.
Pos는 특정 문자열이 ...
Pos는 특정 문자열이 발견된 위치를 돌려줍니다. 발견되지 않으면 0을 돌려주구요..
아래와 같이 하세요...
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
begin
for I := Low(Munje) to High(munje) do
if Pos('특정문자열', Munje[I].Mun) <> 0 then
ShowMessage('특정문자열이 ' + IntToStr(I) + '번째에서 발견되었습니다.');
end;
^^ 항상 즐코하세요.
샘나라 wrote:
> type
> Tmunje=record
> mun:string[255];
> ans:string[1];
> end;
>
> var
> munje:array [1..5500] of Tmunje;
>
> 위와 같이 레코드형을 선언하고 각각의 변수에 텍스트파일로부터 문자열을 읽어들였습니다.
> 변수에 저장되어있는 내용중 특정 문자열을 검색하는 방법을 모르겠어요.
> pos라는 명령이 있는걸로 알고있는데, 어떤식으로 돌려야할지... 쩝~
> 고수님들의 가르침 부탁드립니다. (^^)(__)
>