edit3의 exit event나 keypress event에서 쿼리실행시킨다..

with query do

begin

Close;

Sql.Clear;

Sql.Add('Select max(A) aaa from B(테이블명) ');

Sql.Add(' where A like :bbb ');

ParamByName('bbb').AsString := edit1.Text + edit2.Text + '%';

Open;

edit3.Text := FieldByName('aaa').AsString;

end;



질문의 요지가 맞았는지 모르겠네요...즐거운하루~



권세용 wrote:

> 안녕하세요... 제가 워낙 무능력해서.. 이렇게 도움을 부탁드립니다.

>

> edit box에 자동으로 순번을 부여하려 합니다. 그런데 그냥 단순하게 그 edit box가 하나의 field라면 별로 문제될 것은 없다고 생각됩니다. 그냥 조회해서 그 field값에 있는 값중 최고값에다 1을 더해주는 루틴을 주면 될 것 같은데,

> 문제는 이 edit box가 key 값이라는 겁니다. (에고..설명하기도 힘들다..)

>

> edit1 edit2 edit3

> ----- ----- -----

> 2자리 2자리 3자리 --> 7자리

> -----

> ---> one field (A)

>

> 위에 있는 7자리가 바로 key 값이거든요. 제 의도는 위에 있는 edit3에 아무런 값을

> 주지 않아도 자동으로 다음 순번이 입력되게 하고 싶은데요...

>

> Sql 문에서 where like를 주면 될 것 같은데, 코딩하는 방법을 잘 모르겠습니다

>

> 만약에

>

> Select max(A) from B(테이블명)

> where A like(edit1edit2%)

>

> 이렇게 sql문을 써 준다면 제가 원하는 가장 큰 값이 나오기는 하는데,

> 코딩할 때에는 어떻게 해 주어야 하는건지 도대체 알 수가 없습니다.

>

> 고수님들의 많은 도움 부탁드립니다.

권세용 wrote:

> 안녕하세요... 제가 워낙 무능력해서.. 이렇게 도움을 부탁드립니다.

>

> edit box에 자동으로 순번을 부여하려 합니다. 그런데 그냥 단순하게 그 edit box가 하나의 field라면 별로 문제될 것은 없다고 생각됩니다. 그냥 조회해서 그 field값에 있는 값중 최고값에다 1을 더해주는 루틴을 주면 될 것 같은데,

> 문제는 이 edit box가 key 값이라는 겁니다. (에고..설명하기도 힘들다..)

>

> edit1 edit2 edit3

> ----- ----- -----

> 2자리 2자리 3자리 --> 7자리

> -----

> ---> one field (A)

>

> 위에 있는 7자리가 바로 key 값이거든요. 제 의도는 위에 있는 edit3에 아무런 값을

> 주지 않아도 자동으로 다음 순번이 입력되게 하고 싶은데요...

>

> Sql 문에서 where like를 주면 될 것 같은데, 코딩하는 방법을 잘 모르겠습니다

>

> 만약에

>

> Select max(A) from B(테이블명)

> where A like(edit1edit2%)

>

> 이렇게 sql문을 써 준다면 제가 원하는 가장 큰 값이 나오기는 하는데,

> 코딩할 때에는 어떻게 해 주어야 하는건지 도대체 알 수가 없습니다.

>

> 고수님들의 많은 도움 부탁드립니다.



무슨 말인지 몰겠땅 ^^;;;; 죄송 꾸벅...

제가 보기에는 특정 필드에.. 빈공간이 들어가더라도...

계속 인설트 되는..그런거 맞습니까.?

어떤 데이타 베이스를 쓰시는지는 몰르겠습니다만...

데이타 베이스에서 필드 설정하실때 빈문자열 허용 이라고하는 이런 설정하는게 있을껀데... mdb는 그렇거든요.. 다른건 몰겠네여 자세히...

그냥 잡담이였습네다 ^^;;;