Hallo,
für euch Profis sicher ein Klacks, aber ich komm nicht dahinter, warum ich eine Schutzverletzung bekomme.
Diese Klasse definiere ich:
Delphi-Quellcode:
type
TMAGIX_XML =
class(TIdHTTP)
constructor Create(PostURL:
string);
destructor Destroy;
override;
public
//Die URL, mit der die Klasse kommuniziert
PostURL:
string;
//Letzte Anfrage an den Server
Request:
string;
//Antwort des Servers der letzten Anfrage
Response:
string;
function Ping: boolean;
protected
SimpleXML: TJvSimpleXML;
//Bildet eine komplette Anfrage mit XML Header und UTF-8 Encoding
function AssembleRequest(PartRequest:
string):
string;
end;
Dies ist der Code des Constructors:
Delphi-Quellcode:
//--------------- Constructor -----------
constructor TMAGIX_XML.Create(PostURL: string);
begin
inherited Create(nil);
PostURL := PostURL;
SimpleXML := TJvSimpleXML.Create(nil);
end;
Ich hab schon versucht, als Owner auch andere Objekte anzugeben, trotzdem knallts in der Zeile "inherited Create...".
So wird die Klasse aus dem Quellcode initialisiert (im OnCreate vom Formular):
Delphi-Quellcode:
var
MAGIX_XML: TMAGIX_XML;
...
procedure TMainForm.FormCreate(Sender: TObject);
begin
//XML Comm initialisieren
MAGIX_XML.Create(ServerURL);
Egal wie ich es drehe, beim inherited in der Klasse bekomm ich die Schutzverletzung. Mit der Suche im Board bin ich auf viele interessante Ideen gekommen
aber eine Lösung für mein Problem war leider nicht dabei.
Hat jemand von euch einen helfenden Tip?
Erst wenn man dreimal auf Holz klopfen will, stellt man fest, dass die Welt nur noch aus Plastik und Aluminium besteht.