테라플롭스 wrote:

> 별건 아니구여....음...

> asdf'aa''bb''cc' 라는 데이타가 들어오면 그걸 나누는 걸랑여......

> asdf 는 data라는 버퍼에

> aa는 data1

> bb는 data2

> cc는 data3

> 에 넣어야 하는 데여....

> 방법 좀 갈켜주세여.....길이가 가변이라서여.....음....

> 플래그를 써야 하나여.....제가 초보라...제발



방법은 있습니다. ^^



다음의 소스를 참고 해 보시기 바랍니다.



procedure TForm1.Button2Click(Sender: TObject);

var

myStringList : TStringList;

myData : array[0..3] of String;

i, j : Integer;

begin

myStringList := TStringList.Create;



// Edit1.text 에는 asdf'aa''bb''cc' 이게 들어가 있습니다.

// StringReplace는 따옴표를 개행문자로 바꾸어 줍니다.

myStringList.Text := StringReplace(Edit1.Text, '''', #13#10, [rfReplaceAll]);



for i := 0 to 3 do

for j := i to myStringList.Count do

if myStringList.Strings[j] <> '' then

begin

mydata[i] := myStringList.Strings[j];

myStringList.Strings[j] := '';

break;

end;



showmessage('첫번째 값은 '+mydata[0]);

showmessage('두번째 값은 '+mydata[1]);

showmessage('세번째 값은 '+mydata[2]);

showmessage('네번째 값은 '+mydata[3]);



myStringList.Free;

end;



행복하셔요~

안녕하세요

청개구리 남기석( http://www.delphitravel.com )입니다.



데이터가 들어올 때 일정한 규칙이 있으면 가능합니다.

예를 들어 항상 한 칸씩 띄어서 들어 온다거나...

아님... 특수 문자( 콤마 또는 따옴표 등 )를 이용해서 구분을 했다거나...

이런 식으로 구분을 해서 데이터를 읽을 수 있다면.....

여기 게시판에서 Token 이라는 검색어로 검색해 보세요....

원하시는 답을 얻을 수 있을겁니다.



만약...구분을 지을 수 없다면....

흑흑...그럴 경우엔..방법이 없네요....



행복하세요...



=====================================================================================



테라플롭스 wrote:

> 별건 아니구여....음...

> asdf'aa''bb''cc' 라는 데이타가 들어오면 그걸 나누는 걸랑여......

> asdf 는 data라는 버퍼에

> aa는 data1

> bb는 data2

> cc는 data3

> 에 넣어야 하는 데여....

> 방법 좀 갈켜주세여.....길이가 가변이라서여.....음....

> 플래그를 써야 하나여.....제가 초보라...제발