Bilder in die DB speichern?

[DeddyH]

Wieso kein TBlobStream?

[OrNEC]

Ich hab ja meine Methode wo ich nicht weiß wie ich ein FileStream übergebe. sSQL ist ein String.

Delphi-Quellcode:

    // Tabelle media füllen
    sSQL := 'INSERT INTO media(medianr, mediatitle, description, status, isbn, publicationyear, insertdate, movedatetime, picture, ';
    sSQL := sSQL + 'fk_publisher_id, fk_place_id, fk_category_id, fk_language_id,';
    sSQL := sSQL + 'fk_author_id, fk_entleiher_id, edition) VALUES ("'+ IntToStr(varmedianr) +'",';
    sSQL := sSQL + '"'+ TitleEdit.Text +'",';
    sSQL := sSQL + '"'+ DescriptionMemo.Text +'",';
    sSQL := sSQL + '"'+ IntToStr(varstatus) +'",';
    sSQL := sSQL + '"'+ ISBNEdit.Text +'",';
    sSQL := sSQL + '"'+ PublicationyearEdit.Text +'",';
    sSQL := sSQL + '"'+ FormatDateTime('dd.mm.yyyy', Now) +'",';
    sSQL := sSQL + '"'+ varmovedatetime +'",';
    sSQL := sSQL + '"'+ fs +'",'; // <---- hier muss FileStream rein, aber wie?
    sSQL := sSQL + '"'+ IntToStr(Integer(PublisherComboBox.Items.Objects[PublisherComboBox.ItemIndex])) +'",';
    sSQL := sSQL + '"'+ IntToStr(Integer(PlaceComboBox.Items.Objects[PlaceComboBox.ItemIndex])) +'",';
    sSQL := sSQL + '"'+ IntToStr(Integer(CategoryComboBox.Items.Objects[CategoryComboBox.ItemIndex])) +'",';
    sSQL := sSQL + '"'+ IntToStr(Integer(LanguageComboBox.Items.Objects[LanguageComboBox.ItemIndex])) +'",';
    sSQL := sSQL + '"'+ IntToStr(Integer(AuthorComboBox.Items.Objects[AuthorComboBox.ItemIndex])) +'",';
    sSQL := sSQL + '"'+ IntToStr(Integer(EntleiherComboBox.Items.Objects[EntleiherComboBox.ItemIndex])) +'",';
    sSQL := sSQL + '"'+ EditionEdit.Text +'");';

[Bernhard Geyer]

Am besten List du dir mal das Tutorial beim Delphi-Treff durch

[p80286]

Im allgemeinen werden die Blobs ja in einer eigenen Tabelle gespeichert.
Z.B

Tab 1
ID,Titel,Interpret

Tab2
ID,Titel_ID,Titelcover

Gruß
K-H

[Bernhard Geyer]

Zitat von p80286:

Im allgemeinen werden die Blobs ja in einer eigenen Tabelle gespeichert.

Ist eigentlich nicht nötig. Jedes halbwegs vernünftig Implementiertes DBMS wird Blob-Felder eh außerhalb des normalen Records speichern so das hier (solange man nicht immer das Blob-Feld in den Selects anfordert) keine nennentswerten Performanceprobleme existieren. Das was du als Blob-Tabelle im ER-Modell wird intern eh schon ähnlich (optimiert) gelöst.