DM.Query1.Locate('Cust_No',Cr,lopartialKey);

를 실행하면

incompatible types :

'Tlocateoptions and Tlocateoptions'라는 에러가 생깁니다.

도움말에는

TLocateOption = (loCaseInsensitive, loPartialKey);

TLocateOptions = set of TLocateOption;

라는 설명이 되어 있는데요..

그럼 이걸 어떻게 사용해야 실행이 될까요?



그리고 unit의 제일 상단에

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls 등이 있잖습니까..

이 참조유닛(맞나요?)의 내용을 직접 보고 싶을땐 어떻게 열어봐야 합니까..

이주흥 께서 말씀하시기를...

> 안녕들 하세요...

> 잘 안되는게 있어서요..

> 엑세스로 DB를 만들어서 날짜별로 검색을 하는데 이게 잘안되서요..

> 예를 들어 99-06-30 에서 99-07-02 사이의 레코드를 그리드에 출력

> 하는데 에러는 없는데 레코드가 그리드에 출력이 안되네요..

> sql문에서 틀린것 같은데..아래 소스가...

>

> procedure TOutcomeFrm.BitBtn1Click(Sender: TObject);

> var

> FDate,TDate : String;

> begin

> FDate := DateToStr(DateTimePicker3.Date);

> TDate := DateToStr(DateTimePicker4.Date);

> with DM.Outqr do begin

> Close;

> sql.Clear;

> sql.Add('select * from outcome');

> sql.Add('where 구입일 between '+FDate+' and '+TDate+'');

> Open;

> end;

> end;

>

> '구입일' 이라는 필드가 있고 보시는거와 같이 FDate 에서 TDate까지의

> 모든 레코드를 출력하는데 실행하면 빈 레코드가 나와요..분명이

> 해당하는 레코드가 있는데도 불구하고...'구입일'의 필드타입은 DateTime

> 입니다..도와 주세요..



제가 아는 범위내에서 문제의 소지가 있는 부분을 몇가지 짚어 보겠습니다.



1. 엑세스디비(mdb)는 날짜를 검색조건으로 사용할때 앞뒤에 #을 붙여 주어야



하는 걸로 알고 있습니다. 예로 #99-06-30# 이런식으로 말이죠...



2. sql문이 제대로 형성이 되는지 검사해 보십시요...

sql.Add('where 구입일 between '+FDate+' and '+TDate+'');

showmessage(sql.text); <-이렇게 해서 원하는 형식으로 sql이 만들어지는지...

Open;



3. between을 사용하지 않고 and문을 사용하면 어떨까요?

예)

> sql.Add('select * from outcome');

sql.Add('where (구입일 >= :FDate) and (구입일 <= :TDate) ');

parambyname('FDate').asDateTime := DateTimePicker3.Date;

parambyname('TDate').asDateTime := DateTimePicker4.Date;

> Open;



이렇게 한번 해 보심이....

잘 해결 될수 있기를 바랍니다.

강지영 wrote:

> DM.Query1.Locate('Cust_No',Cr,lopartialKey);

> 를 실행하면

> incompatible types :

> 'Tlocateoptions and Tlocateoptions'라는 에러가 생깁니다.

> 도움말에는

> TLocateOption = (loCaseInsensitive, loPartialKey);

> TLocateOptions = set of TLocateOption;

> 라는 설명이 되어 있는데요..

> 그럼 이걸 어떻게 사용해야 실행이 될까요?

>

> 그리고 unit의 제일 상단에

> uses

> Windows, Messages, SysUtils, Classes, Graphics, Controls 등이 있잖습니까..

> 이 참조유닛(맞나요?)의 내용을 직접 보고 싶을땐 어떻게 열어봐야 합니까..

>



음냐 이렇게 써보세요...

DM.Query1.Locate('Cust_No',Cr,[lopartialKey]);



그리고 참조유닛들은 dephi3/source 에 보시면 다 찾을 수 있을 겁니다.

안녕하세요..답변 감사합니다.

But!! 여전히 안되는군요...

ShowMessage결과는 맞는데...여전히 레코드가 없다고 나오는군요...

어떡하면 좋을까요..

ShowMessage결과----->

select * from outcome where 구입일 between 99-06-30 and 99-07-02



이렇게 나오고요...and를 사용해도 마찬가지...아~~~ 코드의 문제가

아닌듯한데...쩝...

신인재 wrote:

> 강지영 wrote:

> > DM.Query1.Locate('Cust_No',Cr,lopartialKey);

> > 를 실행하면

> > incompatible types :

> > 'Tlocateoptions and Tlocateoptions'라는 에러가 생깁니다.

> > 도움말에는

> > TLocateOption = (loCaseInsensitive, loPartialKey);

> > TLocateOptions = set of TLocateOption;

> > 라는 설명이 되어 있는데요..

> > 그럼 이걸 어떻게 사용해야 실행이 될까요?

> >

> > 그리고 unit의 제일 상단에

> > uses

> > Windows, Messages, SysUtils, Classes, Graphics, Controls 등이 있잖습니까..

> > 이 참조유닛(맞나요?)의 내용을 직접 보고 싶을땐 어떻게 열어봐야 합니까..

> >

>

> 음냐 이렇게 써보세요...

> DM.Query1.Locate('Cust_No',Cr,[lopartialKey]);

>

> 그리고 참조유닛들은 dephi3/source 에 보시면 다 찾을 수 있을 겁니다.

>

>

쩝.. 그렇군요.. 고맙습니다..

덕분에 길다란 for문이 몇개나 없어졌는지 모릅니다.. 이궁..

감사합니다.

이주흥 께서 말씀하시기를...

> 안녕하세요..답변 감사합니다.

> But!! 여전히 안되는군요...

> ShowMessage결과는 맞는데...여전히 레코드가 없다고 나오는군요...

> 어떡하면 좋을까요..

> ShowMessage결과----->

> select * from outcome where 구입일 between 99-06-30 and 99-07-02

>

> 이렇게 나오고요...and를 사용해도 마찬가지...아~~~ 코드의 문제가

> 아닌듯한데...쩝...



이렇게 한번 해보실래요?



sql.Add('where 구입일 between #'+ FDate +'# and #'+ TDate +'#');

Open;



그리고 현재도 그렇게 하고 계실지도 모르겠지만..

우선 액세스에서 먼저 질의를 생성해서 테스트해보고

그 질의문을 그대로 가져다 델파이에서 적용해보는것도

아주 좋은 방법이더라구요..

일단 위 코드대로 해보고 혹시나 안된다면 먼저 한번 액세스에서

해보시죠..

성공을 기원하며..