Re: [delphi-br] Dbedit com EditM ask não limpa

Tue, 13 Jul 2010 09:59:46 -0700 

procedure TForm1.DBEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
   if (Key in [VK_BACK, VK_DELETE]) then
      (Sender as TDBEdit).Field.Clear
end;


[As partes desta mensagem que não continham texto foram removidas]

Responder a