cancelar modifica��o do registro

Question

Como cancelar a modifica��o de um registro se o campo Data_saida estiver preenchido....

Vinicius2k · Answer

Franck, vc poderia nos fornecer mais detalhes, como qual banco de dados, qual tipo de conex�o e quais componentes de acesso vc est� utilizando?T+...

Franck.c · Answer

uso uma table, paradox, o nome do form � FOSRetirar o nome da tabela � Table1 e o banco � OS.db e o campo � dt_saida...

Vinicius2k · Answer

Franck,desculpe, mas ainda n�o consigo entender o que vc precisa...descreva para n�s a l�gica detalhada do processo... T+...

Adilsond · Answer

No evento BeforePost de sua Table1 coloque:

if not Table1Dt_saida.IsNull then
raise EDatabaseError.Create(�Mensagem�);

ou

if not Table1Dt_saida.IsNull then
begin
ShowMessage(�Mensagem�);
Abort;
end;

As duas formas mostrar�o uma caixa de mensagem e abortar�o a altera��o. Se voce deseja que esta verificac�o seja feita apenas qdo o usu�rio altera e caso seja uma inclus�o permitir, coloque o comando abaixo:

if (Table1.State = dsEdit) and
(....)

Franck.c · Answer

Em meu form FOSRetira tenho um campo chamado Dt_saida que est� no DBEdit47, que o mesmo s� � preenchido na hora que sai o produto da loja. Quando chega o produto, � criado uma Ficha. Quando o produto � consertado, � colocado nessa ficha as pe�as que foram utilizadas nesse produto, logo, resta esperar o produto sair da loja. Quando o cliente vier buscar � entrado nessa ficha e colocado a data de sa�da. O que eu quero fazer � o seguinte, depois que o funcion�rio preencher este campo de sa�da, o sistema n�o deixa o funcion�rio modificar a ficha que est� preenchido a data de sa�da. Seria tipo uma verifica��o se o campo estiver preenchido, n�o deixa fazer qualquer modifica��o no registro.
Entendeu?

Vinicius2k · Answer

Franck,vejamos ent�o... supondo que a O.S � selecionada num DBGrid e o usu�rio clica num bot�o para fazer a edi��o...no evento AfterEdit da Table1 vc vai fazer algo baseado nesta id�ia :[code:1:7338ddede2]procedure TForm1.Table1AfterEdit(DataSet: TDataSet);begin if not Table1.FieldByName(�Dt_saida�).IsNull then  begin   Application.MessageBox(�Esta O.S j� est� fechada e n�o pode ser modificada.�,�Erro�,mb_iconhand+mb_ok);   Table1.Cancel;  end;end;[/code:1:7338ddede2]a rotina testa se o campo data de sa�da � nulo e caso n�o seja ela avisa ao usu�rio e cancela a edi��o... se sua edi��o estiver sendo feita num outro form, vc pode, inclusive, fechar o form depois do �Cancel�...veja se � isto, mesmo e qq coisa poste aqui novamente...espero ter ajudado......

Franck.c · Answer

ok, seu certo, vlw kra....

F�rum cancelar modifica��o do registro #214655