Q&A
- 디비그리드에 레코드중 특정 값에 색깔은 어캐 줘영?
디비그리도 내용중 일수에 관한것이 있는데
일수가 제가 정한 일수 보다 크면 값을 빨간색으로 바꿀려고 합니다.
그게 잘 안돼네영..
실패한 내 코딩은 다음과 같습니다.
procedure Tform1.query1CalcFields(DataSet: TDataSet); // 계산 필드
var
aaa : integer;
begin
with query1 do
begin
aaa := FieldByName('Il_su').asInteger; // 일수를 받음
if aaa > 7 then // 7일보다 크면 if 실행
begin
dbgBalList.Columns[6].font.color := clRed; // 디비그리드의 일수
// 필드
end
end;
end;
이렇게 하니깐 각 레코드중 값이 7이상만 색깔이 변화는 것이 아니라...
모두 바뀌어 버리더군요..
그러니깐 레코드중 7보다 큰값 하나만 있으면 모두 변화해 버려요.
각각의 레코드에 적용 시킬려면 어떻게 어느 이벤트를 써서 해야 하나요?
추우신데 감기 조심 하시고요..
모두 즐꼬요..
일수가 제가 정한 일수 보다 크면 값을 빨간색으로 바꿀려고 합니다.
그게 잘 안돼네영..
실패한 내 코딩은 다음과 같습니다.
procedure Tform1.query1CalcFields(DataSet: TDataSet); // 계산 필드
var
aaa : integer;
begin
with query1 do
begin
aaa := FieldByName('Il_su').asInteger; // 일수를 받음
if aaa > 7 then // 7일보다 크면 if 실행
begin
dbgBalList.Columns[6].font.color := clRed; // 디비그리드의 일수
// 필드
end
end;
end;
이렇게 하니깐 각 레코드중 값이 7이상만 색깔이 변화는 것이 아니라...
모두 바뀌어 버리더군요..
그러니깐 레코드중 7보다 큰값 하나만 있으면 모두 변화해 버려요.
각각의 레코드에 적용 시킬려면 어떻게 어느 이벤트를 써서 해야 하나요?
추우신데 감기 조심 하시고요..
모두 즐꼬요..
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 이쁜이
- •
- 2001.10.10 21:24
- 1 COMMENTS
- /
- 0 LIKES
-
정성훈•2001.10.10 23:15이쁜이 wrote: > 델파이로 프로그램을 작성해서 프린트 했을때 종이에 바코드가 나오게 할수 있는 > 그...
-
- oranzi
- •
- 2001.10.10 20:58
- 1 COMMENTS
- /
- 0 LIKES
-
이경문•2001.10.11 06:18ClientSocket에서는 OnRead라는 이벤트라 발생하구여, Indy에서는 Connect한 다음 ReadLn, ReadBuffer하면...
-
- 최강석
- 2001.10.10 23:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 늘초보
- •
- 2001.10.10 20:51
- 1 COMMENTS
- /
- 0 LIKES
디비그리도 내용중 일수에 관한것이 있는데 일수가 제가 정한 일수 보다 크면 값을 빨간색으로 바꿀려고 합니다. 그게 잘 안돼네영.. 실패한 내 코딩은 다음과 같습니다. procedure Tform1.query1CalcFields(DataSet: TDataSet); // 계산 ...-
irookie•2001.10.10 21:40이것이 찾는 답이길 바라면서... 이벤트중에 DrawCell이 있습니다. 질답이 많이 있으니 검색해 보세...
-
- 이지우
- •
- 2001.10.10 20:48
- 5 COMMENTS
- /
- 0 LIKES
-
irookie•2001.10.10 21:47
-
이지우•2001.10.10 22:53
-
이지우•2001.10.10 23:05
-
정성훈•2001.10.10 23:39
-
이지우•2001.10.10 23:58
-
- 델초보쭈니~
- 2001.10.10 20:48
- 0 COMMENTS
- /
- 0 LIKES
-
- 이성용
- •
- 2001.10.10 20:39
- 1 COMMENTS
- /
- 0 LIKES
-
정성훈•2001.10.10 23:45이성용 wrote: > dxdbgrid가 그냥 dbgrid랑 어떻게 틀려요. > 뭐 할때 이거 사용해요? > 게시판에 관련 ...
-
- 궁금이
- 2001.10.10 20:35
- 0 COMMENTS
- /
- 0 LIKES
-
- 더벅이
- 2001.10.10 20:29
- 0 COMMENTS
- /
- 0 LIKES
-
- 이지우
- •
- 2001.10.10 20:25
- 3 COMMENTS
- /
- 0 LIKES
-
정성훈•2001.10.11 00:07이지우 wrote: > 델파이 도움말에서 문법구문 함수좀 보려고 하는데요.. > 도움말 파일 사용이 어렵네요....
-
정성훈•2001.10.11 00:06이지우 wrote: > 델파이 도움말에서 문법구문 함수좀 보려고 하는데요.. > 도움말 파일 사용이 어렵네요....
-
정성훈•2001.10.11 00:05이지우 wrote: > 델파이 도움말에서 문법구문 함수좀 보려고 하는데요.. > 도움말 파일 사용이 어렵네요....
-
- kittysp
- 2001.10.10 20:23
- 0 COMMENTS
- /
- 0 LIKES
-
- kittysp
- •
- 2001.10.10 20:21
- 1 COMMENTS
- /
- 0 LIKES
-
류응철•2001.10.19 02:57kittysp wrote: > 다시 질문 올립니다. 지송... > 넘 급해서요... > ADOConnection 상태가 LAN이 잠깐 ...
-
- 구롱이~
- 2001.10.10 20:06
- 0 COMMENTS
- /
- 0 LIKES
-
- 이쁜이
- •
- 2001.10.10 19:31
- 1 COMMENTS
- /
- 0 LIKES
-
구롱이~•2001.10.10 20:12그건여...이렇게 함 되지 않을까여 ㅡ.ㅡ var data : string; begin data := '1234567890'; edit...
-
- nilriri
- •
- 2001.10.10 19:23
- 1 COMMENTS
- /
- 0 LIKES
-
nilriri•2001.10.10 20:38CREATE OR REPLACE package pkg_cashreport as --cursot define type t_cu...
-
- 왕왕초보
- •
- 2001.10.10 19:21
- 1 COMMENTS
- /
- 0 LIKES
-
정성훈•2001.10.10 23:49왕왕초보 wrote: > 델파이를 처음 접해보는 왕초보자입니다. > > 프로그램을 막 시작해서 공부하는 도...
-
- 박태준
- •
- 2001.10.10 18:37
- 3 COMMENTS
- /
- 0 LIKES
-
이경문•2001.10.11 06:34상대방것을 알기는 힘들구여^^. RunDosCommand라는 것으로 조회해 보세요. ipconfig명령을 RunDosCommand...
-
박태준•2001.10.12 21:36델파이에서 도스명령어 실행을 어떻게 하나요? RUNDOSCOMMAND 는 없다구 나오는데요 이경문 wrote: ...
-
이경문•2001.10.12 22:01http://www.delphi.co.kr/cgi-bin/cwb/CrazyWWWBoard.cgi?mode=read&num=17954&db=newqa&fval=RunDosComman...
-
- 극초보
- 2001.10.10 18:25
- 0 COMMENTS
- /
- 0 LIKES
-
- 왕 초보...
- 2001.10.11 11:24
- 0 COMMENTS
- /
- 0 LIKES
-
- 델피언
- 2001.10.10 08:51
- 0 COMMENTS
- /
- 0 LIKES
이벤트중에 DrawCell이 있습니다.
질답이 많이 있으니 검색해 보세요.
원하는것을 찾을 수 있을것 입니다.
그럼, 20000
i believe i can fly~~
------------
늘초보 wrote:
> 디비그리도 내용중 일수에 관한것이 있는데
> 일수가 제가 정한 일수 보다 크면 값을 빨간색으로 바꿀려고 합니다.
> 그게 잘 안돼네영..
>
> 실패한 내 코딩은 다음과 같습니다.
> procedure Tform1.query1CalcFields(DataSet: TDataSet); // 계산 필드
> var
> aaa : integer;
> begin
> with query1 do
> begin
> aaa := FieldByName('Il_su').asInteger; // 일수를 받음
> if aaa > 7 then // 7일보다 크면 if 실행
> begin
> dbgBalList.Columns[6].font.color := clRed; // 디비그리드의 일수
> // 필드
> end
> end;
> end;
>
> 이렇게 하니깐 각 레코드중 값이 7이상만 색깔이 변화는 것이 아니라...
> 모두 바뀌어 버리더군요..
> 그러니깐 레코드중 7보다 큰값 하나만 있으면 모두 변화해 버려요.
> 각각의 레코드에 적용 시킬려면 어떻게 어느 이벤트를 써서 해야 하나요?
> 추우신데 감기 조심 하시고요..
> 모두 즐꼬요..
>