MySQL ohne Komponenten

[Chewie]

@Schuster: Bei dir geht es aber die Struktur MYSQL_RESULT, nicht um die Zugangskennung!

[Gigant02]

also ich habe ein problem

also ich speicher daten in eine Datenbank

das mache ich so

Delphi-Quellcode:

  query := PChar('UPDATE posts SET test = "' + cText + '" WHERE id = "' + cTableID + '"');
  mysql_real_query(_myCon, query, Length(query));

und nun will ich gerne wissen ob das auch geklappt hat weil es durchaus vorkommt das der server urplötzlich downgeht und zur sicherrung soll er dann halt mir nee nachricht geben wenn es nicht geklapt hat

wie mache ich das an besten ??

lg, Gigant

[Sharky]

Hai Gigant02,

gibt mysql_real_query nicht einen Integer mit der Menge der betroffenen Zeilen zurück?

[Chewie]

Zitat:

Zitat von Sharky

Hai Gigant02,

gibt mysql_real_query nicht einen Integer mit der Menge der betroffenen Zeilen zurück?

Nein, aber mysql_affected_rows tut das.

[citybreaker]

Hab das ganze auch mal Probiert, hänge aber schon beim Verbinden fest.
Habe das mit dem Verbinden auf einen Button gelegt.

Sobald ich auf den Button klicke, stürzt das Programm ab.

Zitat:

Im Projekt 'Projekt1.exe' ist eine Exception der Klasse EAccessViolation aufgetreten.
Meldung: 'Zugriffsverletzung bei Adresse 00000000'. Prozess wurde angehalten.
Weiter mit ...

[Chewie]

Das sieht so aus, als würde die DLL (libmysql.dll) nicht gefunden. Ist diese vorhanden? Wenn ja, wo?

[childen]

Vielen Dank für das Tut. Es hat mir sehr bei der Lösung einiger Probleme geholfen.

Allerdings hab ich noch folgendes Problem: Wenn ich die Serverdaten (host,user,passwd) nicht direkt vor dem verbinden setze, sondern aus textfeldern lade, erhalte ich wie mein Vorredner :

Zitat:

Im Projekt 'Projekt1.exe' ist eine Exception der Klasse EAccessViolation aufgetreten.
Meldung: 'Zugriffsverletzung bei Adresse 00000000'. Prozess wurde angehalten.
Weiter mit ...

wenn ich die Serverdaten direkt in die Variablen schreibe funktioniert der Code.

mein code zum einlesen:

Delphi-Quellcode:

var host,user,passwd:pchar;
begin
host := pchar(eing1.text);
user := pchar(eing2.text);
passwd := pchar(eing3.text);
end;

[teebee]

Deklariere Deine Variablen mal als String und caste dann beim Connect zu PChar.
PChar reserviert von alleine keinen Speicher sondern ist nur ein Zeiger.

Gruß, teebee

[childen]

Vielen Dank schon mal für die Idee allerdings hat es leider nicht ganz so funktioniert.

Hab jetzt folgendes:

Delphi-Quellcode:

type tserverdata = record
                      host:string;
                      user:string;
                      passwd:string;
                    end;

procedure connect(serverdata:tserverdata);
function getserverdata():tserverdata;

implementation

procedure connect(serverdata:tserverdata);
var _myCon: PMySQL;
    host,user,passwd,db:PChar;
begin
  host := pchar(serverdata.host);
  user := pchar(serverdata.user);
  passwd := pchar(serverdata.passwd);
  db := 'test1';
  _mycon := mysql_init(nil);
  
  if mysql_real_connect(_myCon, host, user, passwd, db, 3306, nil, 0) = nil then
  begin
    ShowMessage('Die Verbindung konnte nicht hergestellt werden. Ursache: ' + mysql_error(_myCon));
    Exit;
  end;
end;

function getserverdata():tserverdata;
begin
  result.host := edit1.text;
  result.user := edit2.text;
  result.passwd := edit3.text;
end;

nacheinander werden aufgerufen getserverdata
und dann connect mit dem ergebniss von get serverdata

leider bekomm ich immernoch bei der Zeile: _mycon := mysql_init(nil);

Zitat:

Im Projekt 'Projekt1.exe' ist eine Exception der Klasse EAccessViolation aufgetreten.
Meldung: 'Zugriffsverletzung bei Adresse 00000000'. Prozess wurde angehalten.
Weiter mit ...

[Luckie]

host user und passwd sind ja immer noch PChars bei dir.