Advertisement
Guest User

Untitled

a guest
Oct 22nd, 2015
146
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. method Window1.AdNum_KeyUp(sender: System.Object; e: System.Windows.Input.KeyEventArgs);
  2. begin
  3.   case e.Key of
  4.     Key.F9 :
  5.       begin
  6.         NotesBox.Text := ROService.GetAdNotes(AdNum.Text,AdYearCombo.Text,0);
  7.         e.Handled := true;
  8.       end;
  9.     Key.F10:
  10.         begin
  11.           Clipboard.SetText(NotesBox.Text,TextDataFormat.Text);
  12.           e.Handled := true;
  13.         end;
  14.   end;
  15.  
  16. end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement