TMySQLConnection

[Jonas Shinaniganz]

Es geht um den Datenbankkomponenten TMySQL50Connection.

TDataConSingel: TMySQL50Connection;

Code:

constructor TDataConSingel.Create(AVPassword: String; AVUserName: String;
  AVPort: Cardinal; AVHostName: String; AVDatabaseName: String);
begin
  KeepConnection := true;
  LoginPrompt := true;
  Password := AVPassword;
  UserName := AVUserName;
  HostName := AVHostName;
  DatabaseName := AVDatabaseName;

//Die oberen 6 Zeilen laufen.

  Port := AVPort;
  Connected := True;
end;  

//Und bei diesen 2 Zeilen bekomme Ich dann einen Fehler beim Kompilieren.

Der Fehler der angezeigt wird: Exeption-Klasse:>>External:SIGSEGV<< ausgelöst.

Warum kann ich die anderen Datenfelder bearbeiten aber diese 2 nicht?
Ist Port und Connected besonders? Okay, die Anderen sind 4 Strings aber auch 2 mal Bool. Bitte erbarme sich jemand =)

[DeddyH]

Hallo und Willkommen in der DP ,

ist TDataConSingel nun eine Variable des Typs oder eine Ableitung von TMySQL50Connection? Ich wundere mich ein wenig über den Konstruktor, daher die Frage.

[Jonas Shinaniganz]

Das Ganze ist als Ableitung von TMySQL50Connection gedacht.

Allerdings ist die Klasse noch komplexer. (Komposition)

Es soll später als Globale Variable nach dem Singelton Pattern überall verfügbar sein.

Dabei ging es mir unteranderem auch darum die GUI von der Datenbankverbindung zu kapseln.

Gruß!

[DeddyH]

Müsste dann nicht zumindest ein "inherited" enthalten sein?

[Jonas Shinaniganz]

Erstmal Vielen Dank für deine Aufmerksamkeit DeddyH.

Durch einen Haltepunkt habe Ich herrausgefunden, dass es kein Datenfeld mit dem Namen Port gibt!! Also kein Wunder das Ich den Speicherzugriffs-Fehler bekomme.

FConnected kann True/False annehmen aber nur True sein wenn alle Angaben gemacht wurden (logisch).

Aber wieso gibt es in meiner Klasse kein Port-Attribut? Versteckt sich das Port im MySQL50Connection unter einem anderen Namen? Gruß

[DeddyH]

Ich habe Lazarus nur auf meinem Privatrechner installiert und kann daher im Moment nicht nachsehen. Allerdings verwundert es mich ein wenig, dass sich das Projekt überhaupt kompilieren lässt, obwohl Du auf nicht existente Felder zugreifst

[Jonas Shinaniganz]

Ich hatte derweilen ein Neues Projekt erstellt in welchem Ich mir das Problem genauer anschauen kann, deswegen...

1: Die mysql50connection-Komponente habe ich Visuell auf der Form.

Debugger-Start, Haltepunkt: Screenshot.

Dann Debugger stoppen und ein Port(3306) ins Port-Datenfeld beim Objektinspektor eintragen.
Dann Start.
Dann nachschauen was sich verändert hat.
Nichts. (Außer die Speicheradressen)

alle anderen Values werden in '' hinter der Adresse angezeigt.

Als Referenz habe ich Databasename benutzt, hierbei verhält sich die Instanz normal...

???

[DeddyH]

Moment, wenn Du im OI den Port der MySQLConnection ändern kannst, dann muss es ja eine published-Property sein.

[Jonas Shinaniganz]

Es hat sich endlich erledigt...

Ich habe einen kleinen Buchstabendreher in 2 sehr ähnlichen Prozeduren-Namen gehabt. Deswegen kam es nicht dazu, dass das Objekt meiner Klasse auch korrekt instanziert wurde. Dann habe ich auf nicht vorhandene Teile zugegriffen! Unglaublich...

Trotzdem vielen Dank für den Beistand,

Grüße