運行時創建DSServerClass？

-1

任何人都知道如何在運行時創建並運行DSServerClass？運行時創建DSServerClass？

一切都很好，如果我在DSServer開始之前（運行時）創建它，在客戶端找到類。但是，如果我在DSServer啓動後創建它，客戶端將無法找到該類。

我應該在設計時爲每個表和其他每個連接表的其他DSServerClasses手動創建超過100個DSServerClasses嗎？

任何建議，將不勝感激。謝謝。

來源

2012-06-07 theodorusap

Andreano Lanusse有兩篇關於在運行時創建DataSnap DSServerClass的博文。也許那裏的信息可以幫助你。

http://www.andreanolanusse.com/en/registering-datasnap-server-class-in-runtime-with-delphi/

http://www.andreanolanusse.com/en/publishing-providers-when-registering-datasnap-server-class-in-runtime/

來源

2012-06-07 13:02:15 Erwin

它仍然不能糾正我的問題。我的模塊是從TDSServerModule繼承的TBasicDBSrvModule。建議的serverclass是TSimpleServerClass，按鈕單擊以註冊該TSimpleServer類，並將TBasicDBSrvModule作爲持久類參數。在調試模式下，我發現TSimpleServerClass.GetDSClass方法從不調用。有什麼不對？ – theodorusap

我從建議的網站上了解到的東西，看看這一行的註冊類：斷言（AServer.Started = false，'無法將類添加到非活動服務器'）; 當我調試該行時，發現服務器啓動時，新的serverclass永遠不會添加。這意味着，當服務器啓動時，您將無法添加新的服務器類。如果服務器未啓動，下一行將被執行。斷言（條件，ALERTMSG）如果條件爲假，alerMsg出現和下一行不會被執行 Aserver.started = FALSE; - 如果服務器已停止，假如果服務器開始 – theodorusap

@theodorusap> TRUE：正確。如果服務器正在運行，則無法添加或更改serverclass方法。您必須重新啓動服務器，以便客戶端能夠查看新的serverclass方法。 – Erwin

第一種方式是發送一個參數表名這樣

procedure ActiveRecord(const TableName:string;Id:Integer); 
begin 
    // do something 
end;

其他方式create TDSServerClass in runtime。

來源

2012-06-07 13:07:15 MajidTaheri

這是什麼意思？ – theodorusap

運行時創建DSServerClass？

回答

相關問題