Q&A
- 가변데이타 기법으로 class와 record로 저장하던중문제
type
TAData = record
a : array of string
b : array of widestring
end;
type
TBData = class(Tcomponent)
private
strA : String
strB :
.
.
aData : TAData
published
....
end;
이런식으로
한클래스안에 동적배열을 가진 레코드를 넣어서
가변데이타 기법으로 화일을 저장하려고 합니다.
for i := ComponentCount-1 downto 0 do
begin
if Components[i] is TBData then
begin
tmpStream.WriteComponent( Components[i] );
Components[i].Free;
end;
end;
그랬더니 값은 들어가지는데 화일로는 저장이 되질않더군요
혹시 포인터값으로만 연결된 관계인가요?
하루종일 이것만 붙잡고 있군요.. 꾸벅꾸벅 졸면서.. --;;;
어떻게 해결하면 좋을까요?
클래스안에 클래스를 넣어야하는건지..
클래스를 record처럼 array of string 하면 에러가 나서..--;
데이타 구조는 {a,b,c,(1,2,3....)} 이런식으로 들어갈꺼구요..
누구 아시는분 손좀 ~..ㅠ_ㅠ
TAData = record
a : array of string
b : array of widestring
end;
type
TBData = class(Tcomponent)
private
strA : String
strB :
.
.
aData : TAData
published
....
end;
이런식으로
한클래스안에 동적배열을 가진 레코드를 넣어서
가변데이타 기법으로 화일을 저장하려고 합니다.
for i := ComponentCount-1 downto 0 do
begin
if Components[i] is TBData then
begin
tmpStream.WriteComponent( Components[i] );
Components[i].Free;
end;
end;
그랬더니 값은 들어가지는데 화일로는 저장이 되질않더군요
혹시 포인터값으로만 연결된 관계인가요?
하루종일 이것만 붙잡고 있군요.. 꾸벅꾸벅 졸면서.. --;;;
어떻게 해결하면 좋을까요?
클래스안에 클래스를 넣어야하는건지..
클래스를 record처럼 array of string 하면 에러가 나서..--;
데이타 구조는 {a,b,c,(1,2,3....)} 이런식으로 들어갈꺼구요..
누구 아시는분 손좀 ~..ㅠ_ㅠ
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 마르
- •
- 2002.12.21 04:18
- 1 COMMENTS
- /
- 0 LIKES
type TAData = record a : array of string b : array of widestring end; type TBData = class(Tcomponent) private strA : String strB : . . aData : TAData published .... end; 이런식으로 한클래스안에 동적배열을 가진 레코드를 넣...-
최용일•2002.12.21 04:55안녕하세요. 최용일입니다. 동적배열과 스트링(Ansi String, Wide String), 포인터, 객체를 포함하는 레...
-
- 정인규
- •
- 2002.12.21 03:45
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2002.12.21 05:00안녕하세요. 최용일입니다. 흠~ 로컬이 아니라 웹에 있는 이미지네요... 일단 URL을 알고 있으니까 T...
-
- 임청택
- •
- 2002.12.21 03:35
- 1 COMMENTS
- /
- 0 LIKES
-
마르•2002.12.21 04:46ado 콤포넌트로 연결할수 있습니다.
-
- 궁금이
- •
- 2002.12.21 03:27
- 1 COMMENTS
- /
- 0 LIKES
-
열심히•2002.12.23 21:12StringEdit가 구체적으로 어떤 컴퍼넌트인지는 모르지만.. 님이 원하시는 값은 코딩상으로 구현이 가능 ...
-
- 김홍중
- •
- 2002.12.21 03:06
- 1 COMMENTS
- /
- 0 LIKES
-
이병협•2002.12.21 04:52각 Explorer의 핸들을 구하여 CloseWindow(ExplorerHandle) 하면 되지 않을까요? FindWindow ...
-
- 델파이초보
- •
- 2002.12.21 02:27
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2002.12.21 05:13안녕하세요. 최용일입니다. 지금 간단히 테스트를 해본 결과 여러줄을 보내도 여러줄을 받는군요... ...
-
- 구창우
- •
- 2002.12.21 02:08
- 2 COMMENTS
- /
- 0 LIKES
-
김봉식•2002.12.21 22:50전 이렇게 했습니다 전체를 디테일로 해서 하나의 레코드로 잡고 위라래 폼을 두개 그려주고 임시 테이...
-
구창우•2002.12.23 20:46우선 답변해주셔서 감사합니다.. 근데 제가 잘 이해가 가질 않은데 디테일에 잡으면 디테일이 레코드...
-
- 초보
- 2002.12.21 02:05
- 0 COMMENTS
- /
- 0 LIKES
-
- 김수정
- •
- 2002.12.21 02:03
- 1 COMMENTS
- /
- 0 LIKES
-
이병협•2002.12.21 05:22이렇게 하면 되는군요.... Procedure TC.All; var aList : TStringList; begin &...
-
- 이치영
- •
- 2002.12.21 01:20
- 1 COMMENTS
- /
- 0 LIKES
-
최은석•2002.12.21 02:24editmask 를 다음 값으로 해보세여... !000-0000-0000;1;_ 국번 4자리로 인식이...
-
- 도리도리
- •
- 2002.12.21 01:19
- 3 COMMENTS
- /
- 0 LIKES
-
구창민•2002.12.21 01:47안녕하세요~ 구창민입니다. 폼위에 TPanel 을 하나 올리고, Mediaplayer 의 속성중 Display 를 보시... -
도리도리•2002.12.21 02:08먼저 답변 감사합니다. 지금은 Amimate로 해서 Display했는데 먼저는 panel로 diaplay로 해서 재생을 해...
-
구창민•2002.12.21 03:22제가 정확하지 못한 답변을 드렸네여..용서하세요.. ^_^; Display 되는 Panel 의 Resize 코드에.. 아래...
-
- 델쿠이
- •
- 2002.12.21 01:15
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2002.12.21 01:24안녕하세요~ 방법론만 말씀드릴께요. 참고하세요. 먼저 엑셀로 그 파일을 띄우게 하고, 특정 쉬트가 가...
-
- 홍석균
- •
- 2002.12.21 00:46
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2002.12.21 01:40안녕하세요~ 구창민입니다. 저는 파스칼에서 공용체를 지원하지 않는줄 알았는데, 뉴스그룹에서 뒤져...
-
- 우이
- 2002.12.21 00:36
- 0 COMMENTS
- /
- 0 LIKES
-
- 반프
- •
- 2002.12.21 00:16
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2002.12.21 05:56안녕하세요. 최용일입니다. 아마도 인터베이스 기본 SQL에는 없을겁니다. 대신에 UDF를 사용하시면 됩니...
-
- 한규호
- •
- 2002.12.21 00:10
- 2 COMMENTS
- /
- 0 LIKES
-
최용일•2002.12.21 05:37안녕하세요. 최용일입니다. Synchronize써서 호출해보세요... ^^ 항상 즐코하세요...
-
한규호•2002.12.23 04:25
-
- 도니
- •
- 2002.12.20 23:24
- 3 COMMENTS
- /
- 0 LIKES
-
최용일•2002.12.21 05:33안녕하세요. 최용일입니다. 몇번째인가는 별로 중요하지 않을거 같은데... 메세지를 받을때 파라매터로 ...
-
도니•2002.12.21 19:52답변 감사하고여 그걸 이용할라면 어떻게 이용해야하나요? 클라이언트가 사설아이피를 쓰는경우가 있어...
-
최용일•2002.12.22 02:50안녕하세요. 최용일입니다. 사설아이피여도 상관이 없습니다. UDP라면 상관이 있지만 TCP라면 사설아이...
-
- 구영옥
- •
- 2002.12.20 23:15
- 1 COMMENTS
- /
- 0 LIKES
-
김희권•2002.12.20 23:31Close 이벤트탭에서 Action := caFree; 하시면 됩니다.
-
- 구영옥
- 2002.12.20 23:05
- 0 COMMENTS
- /
- 0 LIKES
-
- 인범진
- •
- 2002.12.20 22:44
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2002.12.21 05:43안녕하세요. 최용일입니다. 몇십번을 그려도 선이 두꺼워지지 않는데요... 중간에 rect값을 변경하는...
동적배열과 스트링(Ansi String, Wide String), 포인터, 객체를 포함하는 레코드형은 파일로 저장할수 없습니다. 왜냐하면 이것들은 파일로 저장할때 참조하는 데이터의 크기를 알 수가 없기때문입니다. 이들 자료형의 크기는 모두 4바이트이지만 실질적으로 가리키는 내용들의 크기는 천차만별이죠...
String, WideString형 대신에 ShortString이나 널종료문자열을 사용하세요...
배열은 그 크기를 명시해주시구요...
이런 방식이 싫으시다면 레코드를 통째로 저장하시지 마시고 레코드의 필드들을 각각 저장하세요...
아참 컴포넌트의 데이터를 저장하는 거였네요... 쩝~
컴포넌트의 필드들은 그냥 선언만 한다고 저장되고, 불러오고 할수없습니다. 내부적으로 따로 처리를 해주어야 합니다. 새로 만든 속성들도 published가 아니면 역시 마찬가지입니다... published절에 있는 속성들만이 자동으로 스트림화되어집니다...
아래 세가지 메소드를 오버라이드해서 이 메소드내에서 컴포넌트의 속성이나 값들을 억세스할 수 있도록 만들어 주셔야합니다...
procedure DefineProperties(Filer: TFiler); virtual;
procedure ReadState(Reader: TReader); virtual;
procedure WriteState(Writer: TWriter); virtual;
^^ 항상 즐코하세요...