Q&A
- query 해온 값들을 따로따로 저장하려면...
table에서 like를 사용하여 조건에 맞는 값들을 모두 불러 오고자 합니다.
그래서, 그 값들을 tblname 이라는 배열에 따로 따로 저장하고 싶습니다.
그런 의도로 이렇게 코드를 작성했는데....
아무래도 잘못 된 것 같습니다.
고수님들의 도움을 바랍니다.
...................................................................
with Query1 do
begin
Active := False;
SQL.Clear;
SQL.Add('select tblname from dbocateg');
SQL.Add('where categ = 'lec');
SQL.Add(format('and bbsname like ''%s''', [bbsname]));
Open;
count := RecordCount ;
First;
for i := 1 to count do
tblname[i] := fieldbyname('tblname').AsString;
그래서, 그 값들을 tblname 이라는 배열에 따로 따로 저장하고 싶습니다.
그런 의도로 이렇게 코드를 작성했는데....
아무래도 잘못 된 것 같습니다.
고수님들의 도움을 바랍니다.
...................................................................
with Query1 do
begin
Active := False;
SQL.Clear;
SQL.Add('select tblname from dbocateg');
SQL.Add('where categ = 'lec');
SQL.Add(format('and bbsname like ''%s''', [bbsname]));
Open;
count := RecordCount ;
First;
for i := 1 to count do
tblname[i] := fieldbyname('tblname').AsString;
4
COMMENTS
-
-
chobo wrote:
> table에서 like를 사용하여 조건에 맞는 값들을 모두 불러 오고자 합니다.
> 그래서, 그 값들을 tblname 이라는 배열에 따로 따로 저장하고 싶습니다.
>
> 그런 의도로 이렇게 코드를 작성했는데....
> 아무래도 잘못 된 것 같습니다.
>
> 고수님들의 도움을 바랍니다.
>
> ...................................................................
>
> with Query1 do
> begin
> Active := False;
> SQL.Clear;
> SQL.Add('select tblname from dbocateg');
> SQL.Add('where categ = 'lec');
> SQL.Add(format('and bbsname like ''%s''', [bbsname]));
> Open;
> count := RecordCount ;
>
> First;
>
> for i := 1 to count do
> tblname[i] := fieldbyname('tblname').AsString;
> => for i := 1 to count do
begin
tblname[i] := fieldbyname('tblname').AsString ;
// 현재 record의 값을 참조한다.
next ;
// record 를 다음으로 이동한다
end ;
-
그렇게 next를 주어도,
결국은 제일 처음 값 하나만 보여주게 된답니다.헉~
김주석 wrote:
> chobo wrote:
> > table에서 like를 사용하여 조건에 맞는 값들을 모두 불러 오고자 합니다.
> > 그래서, 그 값들을 tblname 이라는 배열에 따로 따로 저장하고 싶습니다.
> >
> > 그런 의도로 이렇게 코드를 작성했는데....
> > 아무래도 잘못 된 것 같습니다.
> >
> > 고수님들의 도움을 바랍니다.
> >
> > ...................................................................
> >
> > with Query1 do
> > begin
> > Active := False;
> > SQL.Clear;
> > SQL.Add('select tblname from dbocateg');
> > SQL.Add('where categ = 'lec');
> > SQL.Add(format('and bbsname like ''%s''', [bbsname]));
> > Open;
> > count := RecordCount ;
> >
> > First;
> >
> > for i := 1 to count do
> > tblname[i] := fieldbyname('tblname').AsString;
> > => for i := 1 to count do
> begin
> tblname[i] := fieldbyname('tblname').AsString ;
> // 현재 record의 값을 참조한다.
> next ;
> // record 를 다음으로 이동한다
> end ;
>
>
-
chobo wrote:
> 그렇게 next를 주어도,
> 결국은 제일 처음 값 하나만 보여주게 된답니다.헉~
>
>
> 김주석 wrote:
> > chobo wrote:
> > > table에서 like를 사용하여 조건에 맞는 값들을 모두 불러 오고자 합니다.
> > > 그래서, 그 값들을 tblname 이라는 배열에 따로 따로 저장하고 싶습니다.
> > >
> > > 그런 의도로 이렇게 코드를 작성했는데....
> > > 아무래도 잘못 된 것 같습니다.
> > >
> > > 고수님들의 도움을 바랍니다.
> > >
> > > ...................................................................
> > >
> > > with Query1 do
> > > begin
> > > Active := False;
> > > SQL.Clear;
> > > SQL.Add('select tblname from dbocateg');
> > > SQL.Add('where categ = 'lec');
> > > SQL.Add(format('and bbsname like ''%s''', [bbsname]));
> > > Open;
> > > count := RecordCount ;
> > >
> > > First;
> > >
> > > for i := 1 to count do
> > > tblname[i] := fieldbyname('tblname').AsString;
> > > => for i := 1 to count do
> > begin
> > tblname[i] := fieldbyname('tblname').AsString ;
> > // 현재 record의 값을 참조한다.
> > next ;
> > // record 를 다음으로 이동한다
> > end ;
> >
> >
간단한 코드므로 아래에서 잘못될 소지는 거의 없다고 봅니다. 결국 데이터가 없던지
where 조건이 잘못된것 같군요. 위의 조건대로면 bbsname이란 변수에 '%'나'_'를 포함하는 Like문에서 필요한 내용이 들어가야겠군요.
(NOTICE) You must be logged in to comment on this post.
-
-
- 이호환
- •
- 2000.03.10 17:02
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.03.10 19:18안녕하세요 하얀까마귀 입니다. 말씀하신걸 보니 프로젝트를 하고 계시나 보죠??? 그럼 조금 힘드시겠지만...
-
- 이상주
- •
- 2000.03.10 16:34
- 2 COMMENTS
- /
- 0 LIKES
-
장은석•2000.03.11 03:08이상주 wrote: > stringgrid에서 특정row 에 콤보박스를 집어넣을려면???? > 단콤보박스에나오는인덱스는...
-
조복기•2000.03.10 20:35이상주님이 말씀하신 그리드는 인터넷상에 프리웨어 또는 쉐어웨어로 존재를 합니다.. 델파이안에 기본...
-
- 박종삼
- 2000.03.10 16:26
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보자
- •
- 2000.03.10 06:47
- 3 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.03.10 19:05안녕하세요 하얀까마귀 입니다. 밑에 다른두분의 답변을 읽어 보았는데.. 저는 조금 다른 생각이어서 몇자...
-
김정선•2000.03.10 15:38이러면 어떠하실지... uCommon 이라는 유닛에 이렇게 각 폼에 대한 활성화 여부를 할 수 있는 레코드를...
-
강인규•2000.03.10 07:17제가 질문을 이해했다면...... 이런 방법이 있습니다. child form의 close event에 아래와 같이 코딩...
-
- 김형선
- •
- 2000.03.10 06:16
- 1 COMMENTS
- /
- 0 LIKES
-
Castle Road•2000.03.10 18:11김형선 wrote: > > 파일을 복사하는데 그 과정을 보여주고 싶은데요... > > progressbar에 나타내고 ...
-
-
- 박성호
- 2000.03.10 04:37
- 0 COMMENTS
- /
- 0 LIKES
-
- 김진호
- •
- 2000.03.10 04:14
- 1 COMMENTS
- /
- 0 LIKES
-
이재식•2000.03.10 05:09김진호 wrote: > 안녕 하십니까... > 메모 컨트롤의 글자색을 원하는데로 고치는 방법을 알고 싶습니다.....
-
- 손인호
- •
- 2000.03.10 04:07
- 3 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.03.10 18:41안녕하세요 하얀까마귀 입니다. 출력에서 출력범위를 지정하는건 Qreport의 프린트 Setup버튼이 있죠?? 여...
-
강인규•2000.03.10 05:242.0k로 패치하세요. 손인호 wrote: > 안녕하세요? > 델파이 3.0 사용자입니다. > 스트링그리드의 내...
-
이재식•2000.03.10 05:07손인호 wrote: > 안녕하세요? > 델파이 3.0 사용자입니다. > 스트링그리드의 내용을 미리보기로 보고 프...
-
- 우민하
- •
- 2000.03.10 02:51
- 1 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.03.10 20:33우민하 wrote: > 안녕하세요!! > > 인스톨 쉴드에서 다른건 다 되는데여 인스톨을 마친후 외부프로프로...
-
- chobo
- •
- 2000.03.10 02:41
- 4 COMMENTS
- /
- 0 LIKES
table에서 like를 사용하여 조건에 맞는 값들을 모두 불러 오고자 합니다. 그래서, 그 값들을 tblname 이라는 배열에 따로 따로 저장하고 싶습니다. 그런 의도로 이렇게 코드를 작성했는데.... 아무래도 잘못 된 것 같습니다. 고수님들의 ...-
김정선•2000.03.10 14:32이러면 어떠하실지... with Query1 do begin Close; SQL.Clear; SQL.Add('SELECT TBLNAME FR...
-
김주석•2000.03.10 03:06chobo wrote: > table에서 like를 사용하여 조건에 맞는 값들을 모두 불러 오고자 합니다. > 그래...
-
chobo•2000.03.10 03:42그렇게 next를 주어도, 결국은 제일 처음 값 하나만 보여주게 된답니다.헉~ 김주석 wrote: > chobo ...
-
손인호•2000.03.10 04:18chobo wrote: > 그렇게 next를 주어도, > 결국은 제일 처음 값 하나만 보여주게 된답니다.헉~ > > >...
-
- 문영봉
- 2000.03.10 02:41
- 0 COMMENTS
- /
- 0 LIKES
-
- 천진
- •
- 2000.03.10 02:33
- 1 COMMENTS
- /
- 0 LIKES
-
Paddy•2000.03.10 21:33천진 wrote: > 델초보지만 운영을 맡게 되었습니다. > 그런데, NT서버상 문제가 발생하는 군요. 도움이 ...
-
- 이상학
- •
- 2000.03.10 02:07
- 9 COMMENTS
- /
- 0 LIKES
-
구창민•2000.03.10 02:47
-
이상학•2000.03.10 05:07
-
최용일•2000.03.10 06:08
-
이상학•2000.03.10 21:15
-
최용일•2000.03.14 07:02
-
이상학•2000.03.11 02:33
-
최용일•2000.03.11 02:46
- • • •
-
- 조영진
- 2000.03.10 01:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 착한악마
- •
- 2000.03.10 01:37
- 1 COMMENTS
- /
- 0 LIKES
-
종이학•2000.03.10 01:55착한악마 wrote: > 안녕하세요~~ > 질문은 다름이 아니라....SQL문에서 SELECT하면 약 100개의 열이 나타...
-
- 까앙패
- •
- 2000.03.10 00:56
- 2 COMMENTS
- /
- 0 LIKES
-
자유인•2000.03.11 23:05까앙패 wrote: > 안녕하세요. > > 저만 그런지 모르겠는데, popupmenu를 사용하면, > > 만약에 아...
-
최용일•2000.03.10 01:28한번 Delphi 5패치를 깔아보시는것이 어떠실지... 까앙패 wrote: > 안녕하세요. > > 저만 그런지 모...
-
- 정연
- •
- 2000.03.10 00:41
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.10 01:33VK_RETURN입니다. 다른 키값도 windows유닛에 있으니 참조하시길... 엔터키가 들어오면 SetFocus를 이용하...
-
- 진
- •
- 2000.03.10 00:10
- 1 COMMENTS
- /
- 0 LIKES
-
종이학•2000.03.10 02:02진 wrote: > dbgrid에 일단 query로 값을 뿌린 후에요 그건 그대로 유지하면서 다시 row를 추가시킬때 말...
with Query1 do
begin
Close;
SQL.Clear;
SQL.Add('SELECT TBLNAME FROM DBOCATEG');
SQL.Add('WHERE CATEG = 'lec' );
SQL.Add(format('and bbsname like ''%s''', [bbsname]));
Open;
end;
Query1.First;
for i := 1 to Query1.RecordCount do
begin
tblname[i] := Query1.FieldByName('tblname').AsString;
Query1.Next;
end;
행복하세요...
- 어설푼 이 입니다 -
chobo wrote:
> table에서 like를 사용하여 조건에 맞는 값들을 모두 불러 오고자 합니다.
> 그래서, 그 값들을 tblname 이라는 배열에 따로 따로 저장하고 싶습니다.
>
> 그런 의도로 이렇게 코드를 작성했는데....
> 아무래도 잘못 된 것 같습니다.
>
> 고수님들의 도움을 바랍니다.
>
> ...................................................................
>
> with Query1 do
> begin
> Active := False;
> SQL.Clear;
> SQL.Add('select tblname from dbocateg');
> SQL.Add('where categ = 'lec');
> SQL.Add(format('and bbsname like ''%s''', [bbsname]));
> Open;
> count := RecordCount ;
>
> First;
>
> for i := 1 to count do
> tblname[i] := fieldbyname('tblname').AsString;
>