Datenbank-Einsteiger-Tutorial für mySQL-Datenbanken

[Luckie]

Ich habe mich in den letzten Tagen etwas mit der Datenbankprogrammierung mit dem mySQL-DatenbankServer beschäftigt. Einen ersten Einstieg habe ich durch das Tutorial von Chewie hier in der Delphipraxis gefunden. Da ich nur eine Delphi Personal Version zur Verfügung habe, kam es mir natürlich sehr gelegen, dass eine mySQL Datenbank mit den entsprechenden Header-Übersetzungen der C-API es auch ermöglicht eine SQL-Datenbank mit Delphi Personal zu erstellen und damit dann auch zu arbeiten. Herausgekommen ist dabei ein mySQL-Tutorial und eine Demo Adresse-Datenbank. Im Gegensatz zu Chewies Tutorial werden hier weder Datenbankkenntnisse noch SQL Kenntisse vorausgesetzt.

Aus dem Inhalt:

1. Einleitung
2. Was wir brauchen - Vorbereitung
3. Datenbanken, Tabellen, SQL
4. Mit dem Server verbinden
5. Anlegen einer Datenbank
   Ausführen eines Querys
6. Anlegen einer Tabelle
   Verfügbare SQL Datentypen
   Schlüssel und Indizes
   CREATE TABLE
   Löschen einer Tabelle
7. Datensätze einfügen, editieren und löschen
   Einen Datensatz einfügen
   Einen Datensatz editieren
   Einen Datensatz löschen
8. Datensätze filtern
   ORDER BY
   WHERE

Link zum Tutorial: mySQL Datenbanken mit Delphi - Teil 1.

[mimi]

naja ich habe sie nicht gesehen.... wie denn auch sei jetzt geht es... eine frage noch:
wie kann ich die cvs datei als bin abspeichern oder bleibt das auch bei größern db als Assci ?

[drivter]

hallo luckie,

da das tutorial ja für den laien aufgebaut ist stellt sich bereits in deiner sektion

"was wir brauchen vorbereitung..."

die frage nach der konfigurationsdatei

"...ist es nötig noch eine Konfigurationsdatei im Windowsordner abzulegen, dies muss man eventuell von Hand machen"

--
mysqld]
basedir=C:/Programme/MySQL/MySQL Server 4.1/
datadir=C:/Programme/MySQL/MySQL Server 4.1/data/
[WinMySQLAdmin]
Server=C:/Programme/MySQL/MySQL Server 4.1/bin/mysqld-nt.exe
--

wo muss die datei hin, wie wird sie benannt usw.

habe ich etwas übersehen?

gruss andreas

[krzyk_91]

Hallo, ich habe das Totorial gelesen, und benutze diese Weise, mit der MySQLdatenbank zu verbinden. Ich habe nur ein kleines Problem damit. Manchmal, wenn ich etwas in der Datenbank machen will bekomme ich einen Fehler:
Lost connection to MySQL server during query

Ich weiß, aber nicht in welechem Platz das Problem steckt, denn ich bekomme keine Nachricht vom Delphikomilator. Ich möchte, falls dieses Problem vorkommt, noch einmal mit der Datenbank verbinden. Kann mir jemand dabei helfen??

[Luckie]

Könnte was mit der Netzwerkverbindung zu tun haben und wenige rmit deinem Datenbankziugriff. aber wenn du die Exception bekommst, verbinde dich doch einfach neu und führe den Query noch nmal aus.

[krzyk_91]

Da liegt der Hund begraben. Ich bekomme keine Exception, sogar wenn ich das Programm im Delphi (durch F9) betätige. Ich bekommen nur diesen Fehler und ich weiß nicht in welchem Platz das Problem steckt.

[KiroKoe]

hmm leider ist der link tot fürs tutorial

[Jumpy]

Ist nur umgezogen:

http://www.michael-puff.de/Programmi...phi/Tutorials/

[CarstenH]

Ich habe das Tutorial (sehr gut, danke!) erfolgreich in ein kleines Testprogramm umgesetzt. Nun möchte ich eine Datei als Binärdaten speichern und bekomme es nicht hin.

Ich habe mit HeidiSQl ein Blobfeld in der Tabelle angelegt und schaffe es auch, bmp-Dateien reinzuschreiben, aber diese kommen nicht immer vollständig an. Ich tippe mal, dass es ein Problem mit nullterminierten Strings ist. Folgendermaßen bin ich vorgegangen und wäre für Tipps dankbar.

Carsten

Code:

var
  s: AnsiString;
  query: AnsiString;
  f: TFileStream;
  Fehler:longint;
  
begin
  f := TFileStream.Create(FLink, fmOpenRead + fmShareDenyWrite);
  try
    SetLength(s, f.Size);
    f.ReadBuffer(Pointer(s)^, Length(s));
  finally
    f.Free;
  end;
  query:='INSERT INTO dateien(typ,buffer) VALUES(''bmp'',' + QuotedStr(s) + ')';
  
  if FDescriptor<>nil then
  begin
    Fehler:=mysql_select_db(FDescriptor, PChar(FDBName));
    if Fehler = 0 then
    begin
      Fehler:=mysql_real_query(FDescriptor, PAnsiChar(query), length(query));
    end;
    if Fehler <> 0 then
    begin
      MessageDlg(mysql_error(FDescriptor), mtWarning, [mbOK], 0);
    end;
  end
  else beep;
end;

[p80286]

Auch wenn man rein theoretisch jeden beliebigen Wert in einem Ansi-String eintragen kann, halte ich das für nicht so optimal. Ein vorhergehendes codieren (Base64 z.B.) wäre vllt. hilfreich.
und woher weißt Du, daß die Daten nicht vollständig übergeben werden?
Woliest Du die Daten wieder aus?

Gruß
K-H

[CarstenH]

HeidiSQL stellt die Binärdaten als Hexwert da und die defekten Bilder kommen nicht mit voller Länge dort an.
Base64 werde ich mir anschauen, sollte helfen, wenn meine Vermutung stimmt.

Carsten