Cita:
Empezado por kuan-yiu
Tienes el open antes de cargar la sentencia SQL
|
Código:
With ADOQuery1 do
begin
Close;
Sql.Clear;
Sql.Text := 'SELECT * FROM tiket T INNER JOIN (SELECT MIN(Item) AS MINIMO FROM tiket WHERE estatus =: 'NEW' ;
Open;
ADOQuery1.First;
while not ADOQuery1.Eof do
begin
Label1.Caption := 'A000' + ADOQuery1.fieldbyname('Item').asstring;
end;
No ni siquiera haciendo eso es que el error me lo da justamente es esta linea y no me deja compilarlo para verificar