Subversion Repositories plumbers

Compare Revisions

Regard whitespace Rev 17 → Rev 18

/trunk/SceneEditor/Unit1.pas
20,7 → 20,7
Menus;
 
const
CUR_VER = '2017-10-08';
CUR_VER = '2020-06-08';
 
type
TForm1 = class(TForm)
411,9 → 411,14
end;
 
procedure TForm1.Button14Click(Sender: TObject);
resourcestring
S_DISCARD = 'Are you sure you want to discard all changes and create a new game file?';
begin
if MessageDlg(S_DISCARD, mtConfirmation, mbYesNoCancel, 0) = mrYes then
begin
New;
end;
end;
 
procedure TForm1.DisableEnableSceneControls(enable: boolean);
begin