$M+ Mode und published

[monta]

Code: Alles auswählen

Error: Only classes which are compiled in $M+ mode can be published

Code: Alles auswählen

type
  // data module to access to a TXMLDocument and TIdHTTP
  TdmClient = class(TComponent)
    xmlDoc: TXMLDocument;
      httpClient: TIdHTTP;  //<< da liegt das Problem
  private
  protected
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
  end;

Folgende Seite erklärt ja im Prinziep, wo das Problem liegt, es fehlt, so wie ich das rauslese RTTI, was nicht einkompiliert wurde.
http://www.freepascal.org/docs-html/prog/progsu44.html" onclick="window.open(this.href);return false;

Aber wie beseitigt man nun am günstigsten das Problem?

Die Komponente stammt aus den Indy. Man könnte natürlich die Indys mit M+ durchjagen, aber das erzeugt erstmal neue Fehler. Außerdem änder ich ungern Sachen direkt am Indy-Source, das erschwert nur die Weitergabe.

{$mode delphi} übergeht das Problem, aber wie lässt sich dies im FPC-Mode realisieren?

[mse]

Indy ist Delphi code? Dann könntest du die Indy units doch mit -Mdelphi Kommandozeilen-Parameter kompilieren? Seltsam ist, dass TIdHTTP von TComponent abstammt, welches auf jeden Fall RTTI besitzen sollte.

[martin_frb]

Die frage ist soll httpClient den published sein? oder wuerde es genuegen den in der public (oder private) section aufzufuehren?
(alles zwischen "class()" and dem ersten "private" oder anderem class-section) ist published)

TdmClient = class(TComponent)
xmlDoc: TXMLDocument;
private
httpClient: TIdHTTP; //<< da liegt das Problem
...

[monta]

Indy ist Delphi code? Dann könntest du die Indy units doch mit -Mdelphi Kommandozeilen-Parameter kompilieren? Seltsam ist, dass TIdHTTP von TComponent abstammt, welches auf jeden Fall RTTI besitzen sollte.

Vielleicht hab ich dich auch falsch verstanden, aber die Indy-Dateien für die Lazarus/FPC-Version includieren doch alle schon entsprechende Defines, unter anderem auch Mode Delphi:

Code: Alles auswählen

// FPC (2+)
 
{$IFDEF FPC}
  {$DEFINE USEINLINE}
  {$DEFINE USECLASSINLINE}
  {$MODE Delphi}
//...

Indy selbst läuft ja auch bestens, es gibt halt nur scheinbar keine RTTI wenn man von Indy selbst etwas ableiten will. Auch, wie du schon gesagt hast, wenn man sich über etliche Zwischenschritte zu TComponent durchhangeln kann, von welchem TIdHTTP abstammt.

Die frage ist soll httpClient den published sein? oder wuerde es genuegen den in der public (oder private) section aufzufuehren?
(alles zwischen "class()" and dem ersten "private" oder anderem class-section) ist published)

Danke, das war mein Fehler. Privat langt nicht, da es quasi als Datenmodul eingebunden werden soll, aber mit public geht es und das ist völlig aussreichend, da der Typ eh nur intern verwendet wird.
Ich hab das so von der ehemals Delphi-Komponente übernohmen und mir war gar nicht bewusst, das alles, was da oben steht (unnützer) Weise published ist. Danke für den Hinweis. (Obwohl man eigentlich durch die Fehlermeldung drauf kommen müsste )

[martin_frb]

Die frage ist soll httpClient den published sein? oder wuerde es genuegen den in der public (oder private) section aufzufuehren?
(alles zwischen "class()" and dem ersten "private" oder anderem class-section) ist published)

Ich hab das so von der ehemals Delphi-Komponente übernohmen und mir war gar nicht bewusst, das alles, was da oben steht (unnützer) Weise published ist. Danke für den Hinweis. (Obwohl man eigentlich durch die Fehlermeldung drauf kommen müsste )

Ich bin da nur draufgekommen, weil ich selbst (vor gar nicht alzulanger Zeit) mal ein paar Stunden ueber die gleiche FehlerMeldung nach gedacht hatte.