Q&A

  • text file로 저장시 줄이 안넘어 가게 할려면
안녕하세요

AssignFile(F, SaveDialog1.FileName);

Rewrite(F);

try



for i := 1 to ExcelRowNum do

for j := 1 to ExcelColNum do

Writeln(F, StringGrid1.Cells[j, i] + ';');

finally

CloseFILE(F);

스트링그리드의 내용을 위와 같이 저장을 했습니다.

그랬더니



1;

구명현;

011-302-5274;

3462-0865;

928-7274;

74.9.22;

huny9022@yahoo.co.kr;



내용이 위와 같이 나오는데

저걸 줄을 넘기지 말고

1;구명현;011-302-5274;3462-0865;928-7274;74.9.22;huny9022@yahoo.co.kr;

이렇게 말들고 싶습니다.



부탁드립니다.



좋은 하루 되세요



3  COMMENTS
  • Profile
    꼴통 2000.11.14 19:52
    꼴통 wrote:

    > 안녕하세요

    > AssignFile(F, SaveDialog1.FileName);

    > Rewrite(F);

    > try

    >

    > for i := 1 to ExcelRowNum do

    > for j := 1 to ExcelColNum do

    > Writeln(F, StringGrid1.Cells[j, i] + ';');

    > finally

    > CloseFILE(F);

    > 스트링그리드의 내용을 위와 같이 저장을 했습니다.

    > 그랬더니

    >

    > 1;

    > 구명현;

    > 011-302-5274;

    > 3462-0865;

    > 928-7274;

    > 74.9.22;

    > huny9022@yahoo.co.kr;

    >

    > 내용이 위와 같이 나오는데

    > 저걸 줄을 넘기지 말고

    > 1;구명현;011-302-5274;3462-0865;928-7274;74.9.22;huny9022@yahoo.co.kr;

    > 이렇게 말들고 싶습니다.

    >

    > 부탁드립니다.

    >

    > 좋은 하루 되세요

    >

  • Profile
    컴맹 2000.11.13 18:45
    아하...

    그럴때는 Writeln을 쓰지 마시구..

    Write를 쓰세염...

    그럼 이만...



    꼴통 wrote:

    > 안녕하세요

    > AssignFile(F, SaveDialog1.FileName);

    > Rewrite(F);

    > try

    >

    > for i := 1 to ExcelRowNum do

    > for j := 1 to ExcelColNum do

    > Writeln(F, StringGrid1.Cells[j, i] + ';');

    > finally

    > CloseFILE(F);

    > 스트링그리드의 내용을 위와 같이 저장을 했습니다.

    > 그랬더니

    >

    > 1;

    > 구명현;

    > 011-302-5274;

    > 3462-0865;

    > 928-7274;

    > 74.9.22;

    > huny9022@yahoo.co.kr;

    >

    > 내용이 위와 같이 나오는데

    > 저걸 줄을 넘기지 말고

    > 1;구명현;011-302-5274;3462-0865;928-7274;74.9.22;huny9022@yahoo.co.kr;

    > 이렇게 말들고 싶습니다.

    >

    > 부탁드립니다.

    >

    > 좋은 하루 되세요

    >

  • Profile
    soriso 2000.11.13 18:43
    꼴통 wrote:

    > 안녕하세요

    > AssignFile(F, SaveDialog1.FileName);

    > Rewrite(F);

    > try

    >

    > for i := 1 to ExcelRowNum do

    > for j := 1 to ExcelColNum do

    > Writeln(F, StringGrid1.Cells[j, i] + ';');

    > finally

    > CloseFILE(F);

    > 스트링그리드의 내용을 위와 같이 저장을 했습니다.

    > 그랬더니

    >

    > 1;

    > 구명현;

    > 011-302-5274;

    > 3462-0865;

    > 928-7274;

    > 74.9.22;

    > huny9022@yahoo.co.kr;

    >

    > 내용이 위와 같이 나오는데

    > 저걸 줄을 넘기지 말고

    > 1;구명현;011-302-5274;3462-0865;928-7274;74.9.22;huny9022@yahoo.co.kr;

    > 이렇게 말들고 싶습니다.

    >

    > 부탁드립니다.

    >

    > 좋은 하루 되세요

    >



    writeln 대신 write함수를 써보세요.