Subversion Repositories jumper

Compare Revisions

Regard whitespace Rev HEAD → Rev 1

/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;