Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

leoprofessor

é possivel isso?

Recommended Posts

dá pra pegar o alias de um select em delphi 5?

 

ta lá o select

Bd.QyCondicoesGeraisDoTempo.Close;

Bd.QyCondicoesGeraisDoTempo.SQL.Clear;

Bd.QyCondicoesGeraisDoTempo.SQL.Add( ' Select IndicadordeLocalidade,DataHoraLocal,CondicoesGeraisDoTempo, ' );

Bd.QyCondicoesGeraisDoTempo.SQL.Add( ' (cast(''2/18/2008 01:30'' as timestamp) - cast(''2/18/2008 00:30'' as timestamp)) as VL_DECORRIDO ' );

Bd.QyCondicoesGeraisDoTempo.SQL.Add( ' from CondicoesGeraisDoTempo');

Bd.QyCondicoesGeraisDoTempo.SQL.Add( ' where CondicoesGeraisDoTempo = ''17'' and IndicadordeLocalidade = ''SBGR''');

Bd.QyCondicoesGeraisDoTempo.Open;

HorasTrv1 := TimeToStr(Bd.QyCondicoesGeraisDoTempoVL_DECORRIDO.AsSTring);

 

dá esse erro abaixo:

 

[Error] UnitBdEstatistica.pas(2676): Undeclared identifier: 'QyCondicoesGeraisDoTempoVL_DECORRIDO'

Compartilhar este post


Link para o post
Compartilhar em outros sites

Primeiro verifique se o campo VL_DECORRIDO esta dentro da qry em questão, se esta adicionado no FieldEditor, caso não esteja, pode adicionar ou fazer:

Bd.QyCondicoesGeraisDoTempo.FieldByName('VL_DECORRIDO').AsSTring
Precisa ver se não vai ocorrer mais um erro de conversão, pois esta tentando converter TimeToStr sendo que a variável que esta passando você já esta setando como .AsString, poderia somente fazer
HorasTrv1 := Bd.QyCondicoesGeraisDoTempoVL_DECORRIDO.AsSTring;

Compartilhar este post


Link para o post
Compartilhar em outros sites

Bd.QyCondicoesGeraisDoTempo.Close;

Bd.QyCondicoesGeraisDoTempo.SQL.Clear;

Bd.QyCondicoesGeraisDoTempo.SQL.Add( ' Select IndicadordeLocalidade,DataHoraLocal,CondicoesGeraisDoTempo, ' );

Bd.QyCondicoesGeraisDoTempo.SQL.Add( ' (cast(''2/18/2008 01:30'' as timestamp) - cast(''2/18/2008 00:30'' as timestamp)) VL_DECORRIDO ' );

Bd.QyCondicoesGeraisDoTempo.SQL.Add( ' from CondicoesGeraisDoTempo');

Bd.QyCondicoesGeraisDoTempo.SQL.Add( ' where CondicoesGeraisDoTempo = ''17'' and IndicadordeLocalidade = ''SBGR''');

Bd.QyCondicoesGeraisDoTempo.Open;

HorasTrv1 := FloatToStr(Bd.QyCondicoesGeraisDoTempoVL_DECORRIDO.Value);

 

fiz assim e o valor de HorasTrv1 ta igual a 0 . só que era para dar 0,0416.

adicionei o campo VL_DECORRIDO do tipo FLOAT em QyCondicoesGeraisDoTempo conforme sua orientação.

alguem pode me ajudar?

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.