「類」單位實施

Question

也許我是個盲人，但我不能在類的的Free Pascal源文件的實現和其他一些單位，比如系統發現。大多數情況下，但不是唯一的，我感興趣的TObject，TPersistent和TControl代碼代碼。我在SourceForge上的Lazarus和FP站點搜索了這兩個文件。我的問題是文件列表非常大。谷歌拒絕搜索，因爲robots.txt。

有一個lclclasses.pas單位，但它不是我要找的 - 在uses塊它指的是類，但沒有文件（我的意思是我找不到它）像「類」。 PAS」。

Here我發現了TControl的實現，但這在層次結構中太過分了。

在this page有一個信息是，在TPersistent「classesh.inc」的定義，我下載的源代碼，它確實是在RTL \ objpas \類\ classesh.inc，但是，似乎這個文件只是interface部分單位。

我也將這個問題標記爲「delphi」，因爲實際上如果有一些Delphi的開源代碼，我也可以接受。如果這個基類TObject和TPersistent的實現是某種內置功能（System單元，我想），我也可以看看C語言（或任何其他語言）的源代碼。

任何人都可以幫助我找到Classes單元的實現和在那裏定義的對象嗎？

Answer 1

由於FPC支持許多不同的平臺上，RTL代碼的結構有些複雜。

但是，您可以在source\rtl\objpas目錄下找到您感興趣的RTL代碼的平臺無關部分。

• Classes的代碼包含在source\rtl\objpas\classes的包含文件中。相關文件爲classesh.inc和classes.inc。前者包含接口部分的代碼，後者則是實現部分的代碼。
• 的System單位是非常具體的平臺。根據source\rtl查找您的平臺。
• 對於source\rtl\objpas\sysutils下SysUtils的樣子。