Q&A
- 어떤 Type의 array를 txt로 출력할때...
제가 정의한 형의 array를 txt로 출력할려고 하는데....
이상한 쓰레기 값들이 계속 파일에 쓰여지는 군요....
고수님들의 지적을 부탁드립니다...(제 생각에는 간단한 것인 것 같은데..)
------------------------------------------------------------------------
------------------------------------------------------------------------
//위에 생략
AssignFile(F, 'C:TestData'+fName);
ReWrite(F);
j:=1;
for i:= 1 to gMaxRecord do
begin
OutPut.No:= j; //output은 제가 정의한 record형
OutPut.Date:= gSource[i].Date;
OutPut.Price:= gSource[i].Price;
tReg:= GetSlopenR(i, tRange, tcount);
OutPut.Slope:= tReg.Slope;
OutPut.RSquare:= tReg.R;
OutPut.ChkRSquare:= GetChkR(OutPut.RSquare);
Write(F, OutPut); // 이부분이 뭔가가....
j:= j+1;
end;
CloseFile(F);
------------------------------------------------------------------------
------------------------------------------------------------------------
이상한 쓰레기 값들이 계속 파일에 쓰여지는 군요....
고수님들의 지적을 부탁드립니다...(제 생각에는 간단한 것인 것 같은데..)
------------------------------------------------------------------------
------------------------------------------------------------------------
//위에 생략
AssignFile(F, 'C:TestData'+fName);
ReWrite(F);
j:=1;
for i:= 1 to gMaxRecord do
begin
OutPut.No:= j; //output은 제가 정의한 record형
OutPut.Date:= gSource[i].Date;
OutPut.Price:= gSource[i].Price;
tReg:= GetSlopenR(i, tRange, tcount);
OutPut.Slope:= tReg.Slope;
OutPut.RSquare:= tReg.R;
OutPut.ChkRSquare:= GetChkR(OutPut.RSquare);
Write(F, OutPut); // 이부분이 뭔가가....
j:= j+1;
end;
CloseFile(F);
------------------------------------------------------------------------
------------------------------------------------------------------------
2
COMMENTS
-
-
정말 감사합니다.
정욱님의 빠른 답변이 저에게 엄청난 도움이 되었답니다..
정말 감사합니다....
(NOTICE) You must be logged in to comment on this post.
-
-
신인재•1999.06.26 18:56ActiveX컨트롤이라면 델파이 내부로 일딴 임포트를 하셔야 합니다.. 컴포넌트 메뉴에 import activex...
-
-
- 박성훈
- •
- 1999.06.26 17:23
- 1 COMMENTS
- /
- 0 LIKES
-
최석기•1999.06.26 17:39박성훈 께서 말씀하시기를... > 에디트컴포넌트에서 코드상으로 undo기능을 구현하려면 어떻게 합니까? >...
-
- 박성훈
- •
- 1999.06.26 17:10
- 1 COMMENTS
- /
- 0 LIKES
-
최석기•1999.06.26 17:37박성훈 께서 말씀하시기를... > panel1.caption:=formatfloat('#,##0',strtofloat(s)); > > 여기서 pan...
-
- 박성훈
- 1999.06.26 17:04
- 0 COMMENTS
- /
- 0 LIKES
-
- 이한나(소라동생)
- •
- 1999.06.26 14:07
- 2 COMMENTS
- /
- 0 LIKES
-
김영대•1999.06.26 20:16이한나(소라동생) 께서 말씀하시기를... > 리치에디터에서 콜럼값과 라인값을 리턴받아 그에 해당하는 문...
-
이한나(소라동생)•1999.06.27 12:08김영대 께서 말씀하시기를... > 이한나(소라동생) 께서 말씀하시기를... > > 리치에디터에서 콜럼값과 라...
-
- 이태호
- 1999.06.26 11:59
- 0 COMMENTS
- /
- 0 LIKES
-
- 이소라
- 1999.06.26 09:59
- 0 COMMENTS
- /
- 0 LIKES
-
- 이소라
- •
- 1999.06.26 06:13
- 1 COMMENTS
- /
- 0 LIKES
-
이정욱•1999.06.26 08:55Readln말고 Read나 BlockRead를 사용하시면 원하는 만큼 읽어오실 수 있습니다. 이소라 께서 말씀하시기...
-
- 임재문
- •
- 1999.06.26 05:04
- 1 COMMENTS
- /
- 0 LIKES
-
김대원•1999.07.03 05:59임재문 께서 말씀하시기를... > query된 내용을 액셀로 변환할때, > 액셀에서 처럼 합계나 계산식을 값(...
-
- 문보석
- •
- 1999.06.26 04:44
- 1 COMMENTS
- /
- 0 LIKES
-
이정욱•1999.06.26 09:02다음의 예는 TImage에 있는 BMP를 JPG로 변환하는 예제 입니다. var Jpeg1: TJpegImage; Image1: TIma...
-
- 왕초
- 1999.06.26 04:41
- 0 COMMENTS
- /
- 0 LIKES
-
- 이소라
- 1999.06.26 04:39
- 0 COMMENTS
- /
- 0 LIKES
-
- 한상훈
- •
- 1999.06.26 03:59
- 1 COMMENTS
- /
- 0 LIKES
-
이정욱•1999.06.26 04:38BDE를 같이 포함하셔서 셋업을 만드셔야 합니다. BDE가 설치가 안되어있는 컴퓨터에는 BDE를 설치해주어야...
-
- 오인균
- •
- 1999.06.26 02:44
- 1 COMMENTS
- /
- 0 LIKES
-
홍희석•1999.06.28 22:52오인균 께서 말씀하시기를... > 델파이4에서 DB2를 이용하여 테이블을 작성하는데 > 아래의 파일이 없다...
-
- 시리
- •
- 1999.06.26 02:34
- 1 COMMENTS
- /
- 0 LIKES
-
이정욱•1999.06.26 08:59입력하자마자 변하게 하는것은 아마도 힘들것 같습니다. 만약 서버쪽에서 클라이언트에게 신호를 해주지 ...
-
- 이주흥
- 1999.06.26 01:33
- 0 COMMENTS
- /
- 0 LIKES
-
-
이정욱•1999.06.26 04:40만약 P라는 변수에 넣을것이라면.. If CheckBox.Checked then P := 1 else P := 0; 해주시면 되지만....
-
-
- 장연태
- •
- 1999.06.26 01:09
- 1 COMMENTS
- /
- 0 LIKES
-
이정욱•1999.06.26 09:05Out of Bounds 라는 에러는 리스트 박스 같은데서 실제로 존재하지 않는 인덱스를 사용하려고 할때 에러가 ...
-
- 우민석
- 1999.06.25 23:40
- 0 COMMENTS
- /
- 0 LIKES
-
- 김지건
- •
- 1999.06.25 23:37
- 2 COMMENTS
- /
- 0 LIKES
제가 정의한 형의 array를 txt로 출력할려고 하는데.... 이상한 쓰레기 값들이 계속 파일에 쓰여지는 군요.... 고수님들의 지적을 부탁드립니다...(제 생각에는 간단한 것인 것 같은데..) ----------------------------------------------...-
이정욱•1999.06.26 00:01아래 코드에서는 당연히 바이너리코드가 들어가게 되어 있습니다. 쓰레기 값은 아니구요.. 사실 Read로 Out...
-
김지건•1999.06.26 00:37정말 감사합니다. 정욱님의 빠른 답변이 저에게 엄청난 도움이 되었답니다.. 정말 감사합니다....
Writeln(F,IntToStr(Output.No);
Writeln(F,DateToStr(Output.Date));
Writeln(F,IntToStr(Output.Price));
등등.. 모든 데이터 형을 스트링 형으로 바꾸어서 Write하시는 방법으로 사용하는 방법이 있죠. 그렇게 되면 읽을때도 썼던 형식데로 읽으셔야 합니다.
김지건 께서 말씀하시기를...
> 제가 정의한 형의 array를 txt로 출력할려고 하는데....
>
> 이상한 쓰레기 값들이 계속 파일에 쓰여지는 군요....
>
> 고수님들의 지적을 부탁드립니다...(제 생각에는 간단한 것인 것 같은데..)
>
> ------------------------------------------------------------------------
> ------------------------------------------------------------------------
> //위에 생략
> AssignFile(F, 'C:TestData'+fName);
> ReWrite(F);
> j:=1;
> for i:= 1 to gMaxRecord do
> begin
> OutPut.No:= j; //output은 제가 정의한 record형
> OutPut.Date:= gSource[i].Date;
> OutPut.Price:= gSource[i].Price;
>
> tReg:= GetSlopenR(i, tRange, tcount);
> OutPut.Slope:= tReg.Slope;
> OutPut.RSquare:= tReg.R;
>
> OutPut.ChkRSquare:= GetChkR(OutPut.RSquare);
> Write(F, OutPut); // 이부분이 뭔가가....
> j:= j+1;
> end;
> CloseFile(F);
>
> ------------------------------------------------------------------------
> ------------------------------------------------------------------------
>
>
>
>
>
>