<P>function TForm1.PaxCompiler1UsedUnit(Sender: TPaxCompiler; const UnitName: string; var SourceCode: string): Boolean;<BR>begin<BR>// Use OnUsedUnit event to prevent loading Unit1.pas from disk.<BR> // We are going to import types of Unit1.pas, not to compile the unit.</P> <P> Sender.RegisterImportUnit(0, UnitName);<BR> result := true;<BR> SourceCode := '';<BR> end;</P>
46464644
猜你喜欢
转载自www.cnblogs.com/jailbreaker/p/8995312.html
今日推荐
周排行