Question

delphi 运行后闪退

我的delphi编完一段程序之后按F9可以运行，但是关掉并保存Delphi之后再打开Delphi然后打开之前那个编辑的程序按F9就直接闪退了。

程序如下：
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
procedure Edit2KeyPress(Sender: TObject; var Key: Char);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
i1,i2,i3: integer;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
i1:=StrToInt(Edit1.Text);
i2:=StrToInt(Edit2.Text);
i3:=i1+i2;
showmessage(inttostr(i3));
end;

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Not(key in ['0'..'9',#8]) then
key := #0;
end;

procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if Not(key in ['0'..'9',#8]) then
key := #0;
end;

end.

Answer 1

看都不用仔细看就知道不是代码问题，这些代码有没导致闪退的可能。
从别的地方找原因吧

1 也许文件遭其他软件破坏
测试办法：复制代码到别的电脑上试试
2 delphi有问题， 可以重新安装试试
3 别的软件冲突导致 你可以关闭一些软件试试
4 window问题

追问

哦，我知道了
我想再问下delphi中Save as 和 Save Project as有何区别

追答

save as 是单元文件另外保存
Save Project as 是工程另外保存

另外保存的意思： 就是比如说 aaa.pas 你save 就是继续保存到aaa.pas 而save as 会弹出个对话框 可以保存为bbb.pas

Answer 2

代码没问题，你的程序我也试了保存后再打开运行，也没问题