/trunk/History.pas |
---|
32,13 → 32,11 |
end; |
procedure THistoryForm.SaveBtnClick(Sender: TObject); |
resourcestring |
LNG_SAVED = 'History successfully saved!'; |
begin |
if JumpSaveDialog.Execute then |
begin |
JumpMemo.Lines.SaveToFile(JumpSaveDialog.FileName); |
MessageDlg(LNG_SAVED, mtInformation, [mbOk], 0); |
ShowMessage(LNG_SAVED); |
end; |
end; |