function GetMaxCode: Integer;
begin
with QrTemp do begin
Close;
SQL.Clear;
// 질의문은 인자로 넘겨 받으시면 다른 데서도 사용하실 수 있을겁니다.
SQL.Add('SELECT MAX(FIELD) FROM TABLE');
Prepare;
Active := True;
if Fields[0].AsString <> '' then
Result := Fields[0].AsInteger + 1
else
Result := 1;
같은 공씨라서...^^ 전 79대입니다...^^
밑에분은 쿼리를 실행시켜서 클라이언트에서 1을더한건데...
어떤상황인지는 모르지만...
select max(nvl(instances,0)) + 1
from 테이블명
where 조건...
nvl한거는 최초일경경우 1부터시작할려고 그런겁니다... 글구 오라클에서...
다른 db도 nvl이란 함수만 있으면 가능할것같고요...
즐프하세요...