仓库管理软件版1楼: 文件头:

object FormModifyFee: TFormModifyFee
Left = 44
Top = 9
Width = 876
Height = 636
Caption = #33337#21209#36939#36027
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = ＇＇MS Sans Serif＇＇
Font.Style = []
Menu = mm1
OldCreateOrder = False
WindowState = wsMaximized
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
..........
....
..
procedure TFormModifyFee.btn10Click(Sender: TObject);
....
...
..


编译正确,用什么办法能还原呢？

2楼: 这个本来就是窗体文件，而不是pas文件。 如免费销售管理软件

3楼: 汗，楼主不知道哪里看错了

4楼: 正常,UNICODE码.不需要还原,用Delphi打开应该可以看到.

5楼: 是文件头变了,可能是计算机异常关机造成的.下面为:
procedure TFormModifyFee.btn10Click(Sender: TObject);
var
MsExcel,MsExcelworkbook,MsExcelWorkSheet : Variant;
i : Integer;
MyPath : string;
begin

MsExcel := CreateOleObject(＇＇Excel.Application＇＇);
//MsExcelWorkbook := MsExcel.Workbooks.add;
try
MyPath := ExtractFilePath(Application.ExeName)+＇＇＼ExcelApp＇＇;
MsExcel.WorkBooks.open(MyPath+＇＇＼CW_002.xlt＇＇);

6楼: gear1023说的对,但我打不开窗体呢？不知该怎么办？

仓库管理软件版7楼: 这不是.Pas文件啊
打开窗体：Shift+F12
查看单元文件Ctrl+F12

8楼: 将你这个文件前面的窗体部分剪切到一个新文件并保存为同名的DFM文件试试。

9楼: 我的窗体文件有而正确,我现在不知道这一原因是怎么形成的,有没有好的解决办法.

10楼: 异常关机了，我碰到过这情况，好像只有重做了，如果窗体比较大，那就工作量够大的

11楼: 多人接受答案了。