Q&A
- for문돌리는것좀 봐주세요..^^
고수님들 마니 바쁘신가봐염...
글 올려두 답을 안주시네염....
음...많은 문제들을 조금씩해결해가구있구염....^^
그중에 해결안된게 있어서 다시금 올립니다....
요번에는 꼭 답변주시길 빌께여.....^^
스트링그리드에 다음과 같이 있습니다.
---------------------------------
분류 항목 비교
----------------------------------
지역 서울 and
성별 남 and
---------------------------------
스트링 그리드 안에 있는 것을 가져다가 검색을 하려합니당....
그래서 전 다음과 같이 했지요...
*******************
procedure TForm1.Button2Click(Sender: TObject);
var
c:string;
k:integer;
begin
c:='';
for k := 1 to i do //i는 전역변수로 스트링그리드의 내용이 추가시 증가합니다.
begin //sg는 스트링그리드이름입니다.
if sg.cells[0,k]='지역' then sg.Cells[0,k]:='ADDRH'
else if sg.cells[0,k]='성별' then sg.Cells[0,k]:='SEX';
c:=c + ' '+sg.cells[2,k]+' '+sg.Cells[0,k]+' like :cc ';
with query1 do
begin
close;
sql.clear;
sql.Add('select * from CRM_CUSTOMER ');
sql.Add('where cname=cname ');
sql.add(c);
parambyname('cc').asstring:=sg.cells[1,k]+'%';
open;
end;
end;
end;
************************
이렇게 해서 돌리면 말이져....
스트링그리드에 내용이 하나있을때는 검색이 잘됩니다....
근데 위에서 적은 예제같이 row가 2이상일때는 검색한 내용이 하나두 없다구 나오는군여...
제가 for문을 잘못돌렸던지.....parambyname부분을 잘못한거 같은데.....
도대체 모가 잘못된건지여????
제발 답변 부탁합니다.........
글 올려두 답을 안주시네염....
음...많은 문제들을 조금씩해결해가구있구염....^^
그중에 해결안된게 있어서 다시금 올립니다....
요번에는 꼭 답변주시길 빌께여.....^^
스트링그리드에 다음과 같이 있습니다.
---------------------------------
분류 항목 비교
----------------------------------
지역 서울 and
성별 남 and
---------------------------------
스트링 그리드 안에 있는 것을 가져다가 검색을 하려합니당....
그래서 전 다음과 같이 했지요...
*******************
procedure TForm1.Button2Click(Sender: TObject);
var
c:string;
k:integer;
begin
c:='';
for k := 1 to i do //i는 전역변수로 스트링그리드의 내용이 추가시 증가합니다.
begin //sg는 스트링그리드이름입니다.
if sg.cells[0,k]='지역' then sg.Cells[0,k]:='ADDRH'
else if sg.cells[0,k]='성별' then sg.Cells[0,k]:='SEX';
c:=c + ' '+sg.cells[2,k]+' '+sg.Cells[0,k]+' like :cc ';
with query1 do
begin
close;
sql.clear;
sql.Add('select * from CRM_CUSTOMER ');
sql.Add('where cname=cname ');
sql.add(c);
parambyname('cc').asstring:=sg.cells[1,k]+'%';
open;
end;
end;
end;
************************
이렇게 해서 돌리면 말이져....
스트링그리드에 내용이 하나있을때는 검색이 잘됩니다....
근데 위에서 적은 예제같이 row가 2이상일때는 검색한 내용이 하나두 없다구 나오는군여...
제가 for문을 잘못돌렸던지.....parambyname부분을 잘못한거 같은데.....
도대체 모가 잘못된건지여????
제발 답변 부탁합니다.........
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 정은재
- 2001.08.09 03:07
- 0 COMMENTS
- /
- 0 LIKES
-
- 김춘성
- •
- 2001.08.09 02:58
- 1 COMMENTS
- /
- 0 LIKES
-
똘망울•2001.08.09 03:20델파이 HELP 의 인덱스에서 ExtractFileName ExtractFileDir 찾아보셈... 해당부분만 잘라서 ...
-
- 이건오
- •
- 2001.08.09 02:46
- 2 COMMENTS
- /
- 0 LIKES
-
free0210•2001.08.09 03:20//아래 소스를 참고하세요 procedure TForm1.TreeView1Click(Sender: TObject); var TViewTest : THitTes...
-
성고훈•2001.08.09 06:47답변 감사드립니다. 그런데 님께서 알려주신데로 했더니 빈영역에 클릭을 하면 사이트로 이동하는 현상은...
-
- 김재성
- 2001.08.09 02:34
- 0 COMMENTS
- /
- 0 LIKES
-
- prosit
- •
- 2001.08.09 02:24
- 2 COMMENTS
- /
- 0 LIKES
-
똘망울•2001.08.09 03:24case문에는 숫자밖에 안되네요.. 버튼을 이용할려면.. 버튼의 속성중 tag에 숫자를 넣어서.. comp...
-
prosit•2001.08.18 03:54답변에 진심으로 감사드립니다.
-
- 델군
- 2001.08.09 02:07
- 0 COMMENTS
- /
- 0 LIKES
-
- 라일락
- •
- 2001.08.09 01:12
- 1 COMMENTS
- /
- 0 LIKES
-
free0210•2001.08.09 03:10http://board6.free.cgiserver.net/CrazyWWWBoard.cgi?mode=read&num=184&db=free021002b&fval=jpeg&backde...
-
- 노력중인 초보
- •
- 2001.08.09 00:38
- 1 COMMENTS
- /
- 0 LIKES
고수님들 마니 바쁘신가봐염... 글 올려두 답을 안주시네염.... 음...많은 문제들을 조금씩해결해가구있구염....^^ 그중에 해결안된게 있어서 다시금 올립니다.... 요번에는 꼭 답변주시길 빌께여.....^^ 스트링그리드에 다음과 같이 있습...-
나그네•2001.08.09 03:05음 저 부분 코딩만 보고는 좀 난해 하네요... SringGrid 의 구성이 어케 되어 있는 건가요? 이것보다는 ...
-
- mushe
- 2001.08.09 00:33
- 0 COMMENTS
- /
- 0 LIKES
-
- in-color
- 2001.08.08 23:51
- 0 COMMENTS
- /
- 0 LIKES
-
- 웹초보
- •
- 2001.08.08 23:28
- 1 COMMENTS
- /
- 0 LIKES
-
데빠이•2001.08.09 02:18웹초보 wrote: > TwebBrowser를 사용하여 web browser를 만들어 보았습니다만, > > 그위에서 오른쪽 버...
-
- Delp1
- •
- 2001.08.08 23:11
- 2 COMMENTS
- /
- 0 LIKES
-
나그네•2001.08.09 03:03Delp1 wrote: > > 휴우~ 왕왕 초보임다. > > ODBC로 연결된 데이타베이스에서 Query 문을 통해, 10대...
-
똘망울•2001.08.09 03:28SELECT '10' ,USERNAME , DATA1, DATA2 FROM TEST_TABLE WHERE ROUND(AGE / 10) = 1 UNION SELECT '20' ,...
-
- 정용광
- •
- 2001.08.08 22:15
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2001.08.08 22:36정용광 wrote: > 선택한 디렉토리에 파일이 몇개인지를 알고 싶습니다. > > 그래서 파일 갯수만큼 돌려...
-
- 이나우스
- 2001.08.08 22:08
- 0 COMMENTS
- /
- 0 LIKES
-
- 박영아
- 2001.08.08 21:55
- 0 COMMENTS
- /
- 0 LIKES
-
- 델 사용자
- 2001.08.08 21:07
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- 2001.08.08 20:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보자
- •
- 2001.08.08 21:04
- 2 COMMENTS
- /
- 0 LIKES
-
류종택•2001.08.08 22:55코딩의 목적을 전혀 짐작할 수가 없네요.. 여하튼 에러가 난 부분의 mrOK는 Controls 라는 Unit에.. 정의...
-
초보자•2001.08.08 23:22류종택 wrote: > 코딩의 목적을 전혀 짐작할 수가 없네요.. > 여하튼 에러가 난 부분의 mrOK는 Controls ...
-
- 나종길
- 2001.08.08 20:37
- 0 COMMENTS
- /
- 0 LIKES
-
- jewel
- •
- 2001.08.08 20:12
- 3 COMMENTS
- /
- 0 LIKES
-
송병철•2001.08.09 07:43unit Fzap400; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Fo...
-
jewel•2001.08.10 01:25제가 머리가 너무 나쁜탓일까여? 저는 아무리 드려다바두.......이해가 안가여.. 저한테는 OnNeedDat...
-
송병철•2001.08.10 20:18> 저한테는 OnNeedData에서 가로로 찍을수 있는 방법이 중요하거든여 > > 그러니깐.... 이미 스트링 ...
SringGrid 의 구성이 어케 되어 있는 건가요?
이것보다는 프로젝트 자체를 올려놓으시는 편이 도움 받으시기에 좋을 것 같네요...
노력중인 초보 wrote:
> 고수님들 마니 바쁘신가봐염...
> 글 올려두 답을 안주시네염....
> 음...많은 문제들을 조금씩해결해가구있구염....^^
> 그중에 해결안된게 있어서 다시금 올립니다....
> 요번에는 꼭 답변주시길 빌께여.....^^
>
> 스트링그리드에 다음과 같이 있습니다.
> ---------------------------------
> 분류 항목 비교
> ----------------------------------
> 지역 서울 and
> 성별 남 and
> ---------------------------------
> 스트링 그리드 안에 있는 것을 가져다가 검색을 하려합니당....
>
> 그래서 전 다음과 같이 했지요...
> *******************
> procedure TForm1.Button2Click(Sender: TObject);
> var
> c:string;
> k:integer;
> begin
>
> c:='';
>
> for k := 1 to i do //i는 전역변수로 스트링그리드의 내용이 추가시 증가합니다.
> begin //sg는 스트링그리드이름입니다.
> if sg.cells[0,k]='지역' then sg.Cells[0,k]:='ADDRH'
> else if sg.cells[0,k]='성별' then sg.Cells[0,k]:='SEX';
>
> c:=c + ' '+sg.cells[2,k]+' '+sg.Cells[0,k]+' like :cc ';
>
> with query1 do
> begin
> close;
> sql.clear;
> sql.Add('select * from CRM_CUSTOMER ');
> sql.Add('where cname=cname ');
> sql.add(c);
>
> parambyname('cc').asstring:=sg.cells[1,k]+'%';
>
> open;
>
> end;
> end;
> end;
>
> ************************
> 이렇게 해서 돌리면 말이져....
> 스트링그리드에 내용이 하나있을때는 검색이 잘됩니다....
> 근데 위에서 적은 예제같이 row가 2이상일때는 검색한 내용이 하나두 없다구 나오는군여...
> 제가 for문을 잘못돌렸던지.....parambyname부분을 잘못한거 같은데.....
> 도대체 모가 잘못된건지여????
> 제발 답변 부탁합니다.........
>