Q&A
- 디테일 밴드의 dbtext의 값을 가져오고 싶은데...
for i:=0 to self.ComponentCount-1 do
begin
if Self.Components[i].ClassType = tqrlabel then
begin
if Self.Components[i].Tag = 12 then begin
k := TQRLabel(Components[i]).Caption;
end;
end;
if self.Components[i].ClassType = tqrdbtext then
if Self.Components[i].Tag = 15 then //////dbtext tag set
begin
m:= tqrdbtext(components[i]).Caption; 여기서 값을 가져와야
end;
end;
문제의 요지는 아무것도 모르는 상태에서
begin
if Self.Components[i].ClassType = tqrlabel then
begin
if Self.Components[i].Tag = 12 then begin
k := TQRLabel(Components[i]).Caption;
end;
end;
if self.Components[i].ClassType = tqrdbtext then
if Self.Components[i].Tag = 15 then //////dbtext tag set
begin
m:= tqrdbtext(components[i]).Caption; 여기서 값을 가져와야
end;
end;
문제의 요지는 아무것도 모르는 상태에서
2
COMMENTS
-
-
답변 감사하구요
문제는 디테일 밴드의 출력된 모든 값을 가지고와서
엑셀로 저장을 할려고 합니다.
쿼리를 이용해서 할수도 있지만 리포트에서의 보여지는 내용을
저장을 할려고 합니다. (쿼리의 내용 전부를 리포트로 출력하는게 아니라 선택적으로 리포트로 출력됩니다.)
(NOTICE) You must be logged in to comment on this post.
-
- 김종균
- •
- 2004.11.16 07:56
- 2 COMMENTS
- /
- 0 LIKES
-
석주현•2004.11.16 18:08그냥 Edit 와 updown VCL 을 이용해서 코딩을 해줘야 할거 같네요. Edit에서 커서 위치에 따라서 시간 분 ...
-
김종균•2004.11.17 06:14SpinEdit에서 커서위치를 어떻게 아는지요... 예제 있으면 올려
-
- 양기태
- •
- 2004.11.16 06:16
- 1 COMMENTS
- /
- 0 LIKES
-
이두형•2004.11.16 08:11제 생각엔 배열에 랜덤하게 직접 이미지를 넣는 방법보다, (근데 위 방법으로 랜덥하게 이미지를 선택해야...
-
- 최연진
- •
- 2004.11.16 02:11
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2004.11.16 23:24안녕하세요 하얀까마귀 입니다. 아주 오래전 도스에서 png포맷으로 프로그램을 만든 기억이 ㅎㅎㅎ ...
-
- 최성욱
- •
- 2004.11.16 01:47
- 4 COMMENTS
- /
- 0 LIKES
-
id0313•2005.05.20 18:25늦게나마 답변.. 한동안 아무 생각없이 String에 255개 이상의 문자를 대입하면 에러가 난다고 알고서 코...
-
신동호•2004.11.17 07:07sql문 자체가 TStringList 객체로 되어 있습니다. 그러므로 sql문은 한개의 Text 화일이라고 볼 수 있습니...
-
한원희•2004.11.16 05:12안녕하세요. 한원희입니다. 쿼리의 길이는 상관이 없는 것으로 알고 있습니다. 제가 여태까지 ADO를 사...
-
모영철•2004.11.16 03:45전에 1000줄 정도 되는 쿼리를 ADO가 아닌 BDE를 이용해서 날리는데요.. 정확히 몇글자 인지 모르겠지만...
-
- 최수림
- •
- 2004.11.16 00:58
- 2 COMMENTS
- /
- 0 LIKES
-
이정관•2004.11.16 01:08uses절에 ComCtrls넣어주세요.
-
최수림•2004.11.16 01:09
-
- 우용우
- •
- 2004.11.15 23:44
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2004.11.17 22:08안녕하세요. 최용일입니다. 아는 방법은 없을거 같은데요... 소켓을 오픈한다고 해도 공유기로 데이...
-
- 하수경
- •
- 2004.11.15 22:14
- 1 COMMENTS
- /
- 0 LIKES
-
정정봉•2004.11.16 17:31처음 에러는 쿼리문장이 잘못 코딩이 된것 같구요. 두번째 에러는 Key값 중복 발생 에러 인것 같네요.
-
-
한원희•2004.11.16 05:15안녕하세요. 한원희입니다. 아마도 IF 문 다음에 BEGIN ... END를 하지 않아서 그런것이 아닐까요??? ...
-
-
- ㉳㉥ㅗ㉣ㅐ㉧ㅛ
- 2004.11.15 21:30
- 0 COMMENTS
- /
- 0 LIKES
-
- 김종균
- •
- 2004.11.15 20:50
- 3 COMMENTS
- /
- 0 LIKES
-
이정관•2004.11.15 21:30showhint를 true로 하셨나요? 툴바에 버튼 등을 추가했다면 툴바의 힌트와 툴버튼의 힌트를 따로 지정해...
-
김종균•2004.11.15 21:40showhint는 ture입니다. 델파이7을 다시 설치했는데 그러네요
-
이정관•2004.11.16 18:39델파이를 새로 설치해도 그런다면 대체로 난감ㅡㅡ;;
-
- 소원석
- 2004.11.15 20:26
- 0 COMMENTS
- /
- 0 LIKES
-
- 김정현
- •
- 2004.11.15 20:01
- 4 COMMENTS
- /
- 0 LIKES
-
이정관•2004.11.15 21:22if Pan_ProjectCode1.Caption = '' then -> String문자가 아무것도 없을때 &...
-
김정현•2004.11.15 21:52제가 올려놓은 원문을 보면 SELECT ProjectCode,KorProjectName 이문장을 SQL 에 ...
-
이정관•2004.11.15 22:18gsProjectCodeTable은 String변수입니다. 즉 변수라서 지정하가 나름이죠. 그리고 LIKE ''' + '%' + Edt_K...
-
김정현•2004.11.15 23:02
-
- 초보임당
- 2004.11.15 19:23
- 0 COMMENTS
- /
- 0 LIKES
-
- 황하성
- •
- 2004.11.15 18:40
- 1 COMMENTS
- /
- 0 LIKES
-
nilriri™•2004.11.16 22:05무슨 작업을 하시려고 그러시는지 모르겠네요..^^; 디비 그리드에 서로 다른 테이블의 내용을 사용자 선...
-
- 이두형
- •
- 2004.11.15 11:23
- 7 COMMENTS
- /
- 0 LIKES
-
한원희•2004.11.15 19:34
-
이정관•2004.11.15 18:55
-
이두형•2004.11.16 08:34
-
이정관•2004.11.16 18:33
-
이두형•2004.11.16 22:09
-
이정관•2004.11.16 22:32
-
이두형•2004.11.17 01:35
-
- 노명환
- •
- 2004.11.15 10:31
- •
- 4 COMMENTS
- /
- 0 LIKES
-
이정관•2004.11.15 19:33예전에 퀵레포트 했던 경험으로는 이런 경우에 대해서 두가지 방법이 있었던것 같네요. 첫번째는 Query에 ...
-
이정관•2004.11.15 20:38두번째방법의 소스입니다.
-
노명환•2004.11.15 22:59답변 고맙습니다. 그런데 첨부하신 예제 프로그램에서 페이지 수가 무한정 늘어나 버리는데요. 뭐가 잘 ...
-
이정관•2004.11.16 01:00MsSQL2000서버의 Northwind의 Orders테이블을 연결해서 사용한 겁니다. TDataBase와 TQuery를 수정해서 ...
-
- 안중태
- 2004.11.15 01:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 임석민
- •
- 2004.11.13 17:24
- 1 COMMENTS
- /
- 0 LIKES
-
김정현•2004.11.15 18:33딱히 답변은 아니구요...^^ 예를 들어 환경설정 파일같은거나 게임환경정보를 저장해놓은....그런거... ...
-
- 가딘
- •
- •
- 2004.11.13 08:02
- 2 COMMENTS
- /
- 2 LIKES
for i:=0 to self.ComponentCount-1 do begin if Self.Components[i].ClassType = tqrlabel then begin if Self.Components[i].Tag = 12 then begin k := TQRLabel(Components[i]).Caption; end; end; if self.Components[i].ClassType = ...-
nilriri™•2004.11.15 21:57Self가 QReport라면.. 여기에서 구한 m이 필드명이 나온다면.. m:= tqrdbtext(components[i]).Caption;...
-
가딘•2004.11.16 20:14답변 감사하구요 문제는 디테일 밴드의 출력된 모든 값을 가지고와서 엑셀로 저장을 할려고 합니다. 쿼...
-
- 나그네
- •
- 2004.11.13 05:33
- 2 COMMENTS
- /
- 0 LIKES
-
구자균•2005.02.03 19:22프린터를 일단 공유를 시켜요.영수증프린터는 삼보 570으로 잡고 공유시켜요. 다른 피시에서 네트웍공유...
-
하얀까마귀•2004.11.19 19:39안녕하세요 하얀까마귀 입니다. 먼저 LTP1이란 이름은 포트명이므로 이 이름은 쓸수 없습니다. 당...
여기에서 구한 m이 필드명이 나온다면..
m:= tqrdbtext(components[i]).Caption;
value := Self.Dataset.FileldByName(m).asString;
해주시면 해당 필드의 값이 나오겠네요..
근데..이게 뭐하는데 쓰는 코드인지 모르겟네요..ㅡㅡ;
하시고자 하는 목적을 알면 더 좋았을것을요...
그냥 답을 구하기위한 엉터리 답변인듯 싶습니다..^^;