program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {flogin},
Unit2 in 'Unit2.pas' {DM: TDataModule},
Unit3 in 'Unit3.pas' {fmian},
Unit4 in 'Unit4.pas' {fpass},
Unit5 in 'Unit5.pas' {adduser},
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(Tflogin, flogin);
Application.CreateForm(TDM, DM);
Application.CreateForm(Tfmian, fmian);
Application.CreateForm(Tfpass, fpass);
Application.CreateForm(Tadduser, adduser);
Application.Run;
end.
uj5u.com熱心網友回復：
你是除錯或者構建的時候出現的吧，它不是在這里的錯誤，只是被包含在這里面，你應該看你的主視窗提示的什么或者你參考的單元提示的錯誤在哪里，而不是找begin的錯誤，因為你所運行的是被包含這個begin里面的uj5u.com熱心網友回復：
這里 Unit5 in 'Unit5.pas' {adduser},把逗號改成分號
Unit5 in 'Unit5.pas' {adduser};
uj5u.com熱心網友回復：
Begin 之前的陳述句未結束，應該在第名結果尾次“，”改為“；”。
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {flogin},
Unit2 in 'Unit2.pas' {DM: TDataModule},
Unit3 in 'Unit3.pas' {fmian},
Unit4 in 'Unit4.pas' {fpass},
Unit5 in 'Unit5.pas' {adduser};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(Tflogin, flogin);
Application.CreateForm(TDM, DM);
Application.CreateForm(Tfmian, fmian);
Application.CreateForm(Tfpass, fpass);
Application.CreateForm(Tadduser, adduser);
Application.Run;
end.
uj5u.com熱心網友回復：
Begin 之前的陳述句未結束，應該在第9句結果尾“，”改為“；”。轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/78871.html
標籤：語言基礎/算法/系統設計
上一篇：FireDac 的查詢修改問題