Fórum Porque este erro???? #182612
17/09/2003
0
na uses do projeto eu acrescentei:
dbiprocs
isso foi o suficiente para causar os seguintes erros:
´(´expected but´)´ found
´)´ expected but ´END´ found
na seguinte linha de commando:
Label3.Caption := dateToStr(date) + ´ ´ + TimeToStr(time);
a linha acrescentada na uses do projeto é para a gravação direta no banco de dados aguela conhecida dbisavechanges ´(tb_mov_caixa.Handle);´
Eu particularmente como iniciante não consegui desvendar esta problema.
Machado
Curtir tópico
+ 0Posts
17/09/2003
Arc
Se vc tirar o DBIProcs de uses o sistema funciona normal ?????
Gostei + 0
17/09/2003
Garoto Programa
O Delphi esta lhe informando que era esperado ´(´ mas foi encontrado ´)´ na primeira linha, na segunda ele informa que era esperado ´(´ mas foi encontrado ´END´.
Na maioria dos casos isto ocorre porque você deve ter esquecido de especificar algum parametro. Não tem nenhuma ligação logica com você ter acrescentado uma Unit na Uses. Tente remover a unit que você acrescentou e de uma olhada também na linha do comando dbisavechanges, pode ser que o erro estejá nela.
Caso não consigua e não se importe de enviar sua Unit me passa ela em PVP que eu dou uma olhada.
Que Deus lhe abençoe!
Gostei + 0
17/09/2003
Machado
a procedure a seguir é que da erro quando eu coloco o dbiprocs na uses.
procedure TForm_principal.Timer1Timer(Sender: TObject);
begin
Label3.Caption := dateToStr(date) + ´ ´ + TimeToStr(time);
end;
Se eu coloco da erro, se eu não coloco funciona perfeitamente.
QUE ISSO?
Gostei + 0
17/09/2003
Marcelo Saviski
[color=green:e905ecd27e]dateToStr [/color:e905ecd27e]ou [color=green:e905ecd27e]date [/color:e905ecd27e]ou [color=green:e905ecd27e]TimeToStr [/color:e905ecd27e]ou [color=green:e905ecd27e]time[/color:e905ecd27e]?
Porque o Delphi pode estar confundindo essas funções com as que supostamente estão nessa Unit .
Gostei + 0
17/09/2003
Arc
procedure TForm_principal.Timer1Timer(Sender: TObject);
begin
Label3.Caption := dateToStr(date) + ´ ´ + TimeToStr(time);
end;
se deixar somente
Label3.Caption := dateToStr(date)
ele funciona
:?:
Gostei + 0
17/09/2003
Marcelo Saviski
e só: Label3.Caption := dateToStr(date) + TimeToStr(time);
sem o [color=green:5f37068e26]+ ´ ´[/color:5f37068e26] funciona?
estou sem o Delphi para poder testar
Gostei + 0
18/09/2003
Lidiane
Lidiane
Gostei + 0
18/09/2003
Dedi
Label3.Caption := dateToStr(date) +´ ´+ TimeToStr(SysUtils.Time);
Dedi.
Gostei + 0
18/09/2003
Celsos
Label3.Caption:=DateTimeToStr(Now);
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)