Código Delphi [-] procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if Key = #43 then ShowMessage('Signo Mas') else ShowMessage('Otra Tecla'); end;
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if Key = #43 then ShowMessage('Signo Mas') else ShowMessage('Otra Tecla'); end;