Q&A
- 스트링그리드의 내용을 블록으로 잡아 엑셀에 뿌려주기
스트링그리드의 내용을 블록으로 잡아서 엑셀에 뿌려주는 방법좀 갈켜주세여
With Grid do
begin
for i := 0 to ColCount - 1 do
begin
inc(k);
for j := 0 to RowCount -1 do
begin
// 스트링그리드의 내용 엑셀에 뿌려주기
xlBook.WorkSheets[1].Range[chr(k)+ InttoStr(j + 3)].Value := Cells[i, j];
xlBook.WorkSheets[1].Range[chr(k)+ InttoStr(j + 3)].Font.Size := 11;
end; // for
end;
end;
이 방법으로 하니깐 너무 느리더라구여
그래서 블록으로 잡아서 뿌려주려고
빠른 답변 부탁합니다.
With Grid do
begin
for i := 0 to ColCount - 1 do
begin
inc(k);
for j := 0 to RowCount -1 do
begin
// 스트링그리드의 내용 엑셀에 뿌려주기
xlBook.WorkSheets[1].Range[chr(k)+ InttoStr(j + 3)].Value := Cells[i, j];
xlBook.WorkSheets[1].Range[chr(k)+ InttoStr(j + 3)].Font.Size := 11;
end; // for
end;
end;
이 방법으로 하니깐 너무 느리더라구여
그래서 블록으로 잡아서 뿌려주려고
빠른 답변 부탁합니다.
0
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 호야
- 2001.01.09 18:45
- 0 COMMENTS
- /
- 0 LIKES
-
- doraman
- 2001.01.09 18:18
- 0 COMMENTS
- /
- 0 LIKES
-
- 박상규
- 2001.01.09 22:38
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금한 사람
- 2001.01.09 12:22
- 0 COMMENTS
- /
- 0 LIKES
-
- 김종섭
- •
- 2001.01.09 11:41
- 2 COMMENTS
- /
- 0 LIKES
-
TMS•2001.01.09 22:52김종섭 wrote: > 쿼리한 테이블에서 멀티 셀렉트는 구현을 하였는데 > 이것을 가지고 퀵리포트에서 인쇄...
-
승추니•2001.01.09 22:22김종섭 wrote: > 쿼리한 테이블에서 멀티 셀렉트는 구현을 하였는데 > 이것을 가지고 퀵리포트에서 인쇄...
-
- [질문]
- 2001.01.09 11:00
- 0 COMMENTS
- /
- 0 LIKES
-
- 홍진혁
- 2001.01.09 10:53
- 0 COMMENTS
- /
- 0 LIKES
-
- 선현수
- 2001.01.09 10:42
- 0 COMMENTS
- /
- 0 LIKES
-
- freelab
- •
- 2001.01.09 09:22
- 3 COMMENTS
- /
- 0 LIKES
-
홍세비•2001.01.12 20:44freelab wrote: > 델 고수님들의 도움이 필요합니다. > > 마우스가 위로 가면 버튼 색상이 바뀌게 하려...
-
xdelphi•2001.01.09 20:50freelab wrote: > 델 고수님들의 도움이 필요합니다. > > 마우스가 위로 가면 버튼 색상이 바뀌게 하려...
-
액션가면•2001.01.09 20:05안녕하세염~ 아주 좋은 예로 flatstyle컴포넌트 버튼이 있답니다.. colorfocus프로퍼티가 있는데 원...
-
- 김선태
- •
- 2001.01.09 08:18
- 1 COMMENTS
- /
- 0 LIKES
-
xdelphi•2001.01.09 20:55김선태 wrote: > 프로그램이 실행시에 > 패널이나, 리스트 박스의 크기를 바꾸는 거 어떻게 하는 쥐 아...
-
- 초보
- •
- 2001.01.09 06:47
- 1 COMMENTS
- /
- 0 LIKES
-
초보•2001.01.09 07:15자문자답이다.또 다시 --;.. XLApp.Columns.AutoFit; 기냥 막판에 이거 한 방이면 끝나네요 --;.....
-
- 문청
- •
- 2001.01.09 06:41
- 2 COMMENTS
- /
- 0 LIKES
-
뿌요•2001.01.10 18:38Table1에서 Table2로 옮길때 'mappings'라는 속성에 Table1.record = Table2.record를 쓰잖아여.. 그런데...
-
승추니•2001.01.09 21:08문청 wrote: > 테이블을 batchmove해서 옮기는데 > "incompatible record structures " 라는 에러 메시지...
-
- 윤규성
- •
- 2001.01.09 06:17
- 1 COMMENTS
- /
- 0 LIKES
-
김종섭•2001.01.09 11:16윤규성 wrote: > 마스타 디테일 테이블에서 다음과 같은 결과를 만들어 내가 위한 > 쿼리를 어떻게 설정...
-
- 최석기
- 2001.01.09 05:46
- 0 COMMENTS
- /
- 0 LIKES
-
- 이기석
- •
- 2001.01.09 05:42
- 2 COMMENTS
- /
- 0 LIKES
-
성더기•2001.01.09 22:43이기석 wrote: > 안녕하세요! > > 몇시간 전에 같은 질문을 올리고 답변을 받았습니다. > 그런데 잘 ...
-
승추니•2001.01.09 21:04이기석 wrote: > 안녕하세요! > > 몇시간 전에 같은 질문을 올리고 답변을 받았습니다. > 그런데 잘 ...
-
- 슬픈비
- •
- 2001.01.09 05:27
- 2 COMMENTS
- /
- 0 LIKES
-
승추니•2001.01.09 20:35슬픈비 wrote: > 저는 시분만 사용 하려고 하는데 > > TMaksEdit 는 공백 입력이 안되는 것으로 알...
-
슬픈비•2001.01.10 03:51무~
-
- 이슬사랑
- 2001.01.09 04:29
- 0 COMMENTS
- /
- 0 LIKES
-
- 아무개
- 2001.01.09 03:35
- 0 COMMENTS
- /
- 0 LIKES
스트링그리드의 내용을 블록으로 잡아서 엑셀에 뿌려주는 방법좀 갈켜주세여 With Grid do begin for i := 0 to ColCount - 1 do begin inc(k); for j := 0 to RowCount -1 do begin // 스트링그리드의 내용 엑셀에 뿌려주기 xlBook.WorkS...
-
- 허접이.
- 2001.01.09 03:19
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- 2001.01.09 03:15
- 0 COMMENTS
- /
- 0 LIKES
