mysql

[hellarazor]

Hi, ich hab mir das tutorial
durchgelesen.

Aber wie kann ich jetzt zu der datenbank auf meine Funpic Server connecten ????

Delphi-Quellcode:

var 
  _myCon: PMySQL;       //unseren Verbindungsdeskriptor 
  host, user, pass, db: PChar;       //die Anmeldedaten 
begin 
  //wir werden uns als Root-Benutzer in localhost einloggen, ohne eine 
  //bestimmte Datenbank auszuwählen 
  host := 'localhost'; 
  user := 'root'; 
  pass := nil; 
  db := nil; 
  
  //jetzt wird _myCon initialisiert 
  _myCon := mysql_init(nil); 
  if _myCon = nil then 
  begin 
    ShowMessage('Nicht genug freier Speicher, um Verbindungsdeskriptor zu initialisieren'); 
    Exit; 
  end; 
  
  //anschließend wird die Verbindung hergestellt 
  if mysql_real_connect(_myCon, host, user, pass, db, 3306, nil, 0) = nil then 
  begin 
    ShowMessage('Die Verbindung konnte nicht hergestellt werden. Ursache: ' + mysql_error(_myCon)); 
    Exit; 
  end; 
  
  ShowMessage('Verbindung hergestellt'); 
  
  //zum Schluss wird die Verbindung wieder geschlossen 
  mysql_close(_myCon); 
end;