Consulta Sql com order by

Delphi

15/10/2003

Boa noite galera, estou com um problema que não estou conseguindo resolver, tenho uma tela de consulta que permite selecionar meus clientes, mas se selecionar o cliente pelo campo NOME, CONTRATO, EMPRESA que estão com cláusula order by ´CAMPO´, estou recebendo um erro quando tento alterar o registro corrente.
´QRCliente: Cannot modify a read-only dataset´
Se eu tirar a cláusula order by funciona , mas preciso destes dados em ordem, alguém tem alguma dica?
Segue abaixo meu código.

DM1.QrCliente.Close;
DM1.QrCliente.SQL.Clear;
DM1.QrCliente.SQL.Add(´SELECT * FROM Clientes´);
case ComboBox1.ItemIndex of
0: DM1.QrCliente.SQL.Add(´WHERE Contrato LIKE :vDados order by Contrato´); // não funciona quando tento editar o registro.
1: DM1.QrCliente.SQL.Add(´WHERE Nome LIKE :vDados´); // funciona mas não mostra em ordem.
2: DM1.QrCliente.SQL.Add(´WHERE Empresa LIKE :vDados order by Empresa´);
end;
DM1.QrCliente.ParamByName(´vDados´).AsString := Edit1.Text + ´¬´;
DM1.QrCliente.Open;


GALERA DESDE JÁ OBRIGADO....


Vieira_alex

Vieira_alex

Curtidas 0

Respostas

Adilsond

Adilsond

15/10/2003

Qdo voce utiliza join ou order by por uma coluna que não seja uma primary key ou um índice(não me lembro corretamente), a sua query se torna read-only. Utilize um Tclientdataset.


GOSTEI 0
POSTAR