Fórum Máximo valor de um campo usando select #175667

18/08/2003

0

Caros colegas,

preciso de uma ajuda.
Preciso manipular (por na variável max_valor) o maior valor do campo (incremento) de uma tabela ( no Access). Uso Delphi 6 e ADOQuery.
Incremento é do tipo AutoNumeração, MylineSQL é do tipo string, max_valor é do tipo integer.

estou fazendo assim:

MylineSQL := ´Select Max(Incremento) from TabControle_Diario´;

Screen.Cursor := crHourGlass;
With ADOQuery do
begin
Active := False;
Sql.Clear;
Sql.Add(MylineSQL);
max_valor:=FieldByName(´Incremento´).value;//Aqui é o problema
Active := True;
end;
Screen.Cursor := crDefault;


Agradeço.

Abraço

James


Jbond

Jbond

Responder

Posts

18/08/2003

Weber

MylineSQL := ´Select Max(Incremento) as MaxValor from TabControle_Diario´;

Screen.Cursor := crHourGlass;
With ADOQuery do
begin
Active := False;
Sql.Clear;
Sql.Add(MylineSQL);
max_valor:=FieldByName(´MaxValor´).asInteger; *
Active := True;
end;
Screen.Cursor := crDefault;

* Voce pode usar asInteger caso seu campo no banco seja inteiro ou asCurrency caso o campo no banco seja decimal
Voce deverá declacar sua variavel da mesma forma
exemplo:

var
max_valor : Currency;

ou

var max_valor : Integer;


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar