vagnermeireles Novato

Registrado: Terça-Feira, 6 de Julho de 2010 Mensagens: 4
|
Enviada: Qua Fev 22, 2012 3:51 pm Assunto: função locate |
|
|
Meus amigos será que alguém pode me ajudar?
É o seguinte, estou acrecentando produto, no dbgrid na tela de vendas. Supomos que eu já tenha colocado varios produtos, 06 por exemplo, quando estou colocando o último, digamos que sem querer repito o primeiro produto, nesse caso queria que o sistema informasse, 'Produto já lançado', e deletasse o mesmo, ou então travasse a navegação no dbgrid, ficasse apenas no item em questão, até que mudasse o ítem, ou deletasse.
Quando uso a opção locate:
if tabela_vendas.locate('nome',tabela_Temp['Nome'],[]);
o sistema procura o item repetido, que foi lancado primeiro.
aí é que estar o problema queria que o sistema soubesse que estar sendo repetido ítem, mais que não fosse selecionar o ítem repetido.
uso delphi 7 banco de dados access, e Paradox
|
|
leandroksc Profissional

Registrado: Quinta-Feira, 29 de Setembro de 2011 Mensagens: 528
|
Enviada: Qua Fev 22, 2012 4:22 pm Assunto: |
|
|
Tente desta forma:
Código: |
var
Point: Pointer;
begin
Point := Tabela_Vendas.GetBookmark;
Tabela_Vendas.DisableControls;
if tabela_vendas.locate('nome',tabela_Temp['Nome'],[]) then
Result := True;
Tabela_Vendas.GotoBookmark(Point);
Tabela_Vendas.EnableControls;
end;
|
|
|