Huhu @ll

Ich habe folgendes Problem und hoffe, dass ihr mir helfen könnt:
Ich habe eine Paradox 7 Tabelle mit verschiedenen Daten, unter anderen ein Bild (Blob Grafik). Im Delphi formular kann man nun mit Hilfe der entsprechenden Felder(Editfelder+DBImage) und eine. TDBNavigator neue Datensätze anlegen, alte bearbeiten bzw. löschen (wie meistens halt =) ).
Mit dem Bild handelte ich es zunächst so, dass ich einfach ein bild geöffnet habe, es dann kopiert und anschließen mit strg+p in das DBImage eingefügt habe. Das fand ich allerdings ein wenig umständlich. also habe ich einen Button gemacht, mit dem ich mit hilfe des OpenPictureDialogs eine Grafik auswählen und einfügen kann. funktioniert auch soweit, allerdings wenn ich nun anschließend im Programm auf den Haken des DBNavigators klicke, wird das Bild nicht mit abgespeichert. Kann mir jemand sagen woran das liegt, bzw. wie ich das ändern kann?

Nachfolgend noch der Quelltext des Buttons :



Moderiert von AXMD: Delphi-Tags hinzugefügt.

Du Musst vor Deinem Code



ausführen, dann geht es wahrscheinlich.

Erstmal danke für die schnelle Antwort.

Ich hab das jetzt mal probiert, geht leider nich

Noch irgend eine andere Idee?


Könnte es vielelicht funktionieren, wenn ich das Bild innerhalb des Programms in die Zwischenablage kopiere und eben auch von dort aus einfüge? - Hab allerdingskeine Ahnung, wie das funktioniert, kann mir das irgendwer aufschreiben?

Das Bild ist korrekt mit dem Blob-Field verbunden?

nein noch garnicht. Innerhalb des Programms soll man ein Bild auswählen und hinzufügen können.

Die Paradox Tabelle ist anfangs (beim ersten Start des Programms) komplett leer. Und wird durch die Eingaben innerhalb des Programms ergänzt.

Ich meinte mit "verbunden" ob Du beim DBimage die Eigenschaften DataSource und DataField richtig gesetzt hast?

axo... ja das hab ich gemacht.

ändere den Quelltext:

Hexy hat folgendes geschrieben:

Huhu @ll Nachfolgend noch der Quelltext des Buttons : markieren Delphi-Quelltext     1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: var   bild :string; begin   OpenBild.InitialDir := extrctfilepath(paramstr(0));   if OpenBild.Execute then begin     try       Tabelle.Edit;         Tabellenname[Feldname].LoadFromFile(OpenBild.FileName);       Tabelle.Post;     except     // ev. Fehler abfangen hier     end;   end; end;

Ersetze Tabellenname mit den Namen der Tabelle, nicht mit dem verbundenen Control auf der GUI.

grez
msch

Also irgendwie steh ich grad auf'm Schlauch...

Meine Tabelle heißt Test und das Feld für das Bild Picture.
In Delphi ist das Datenmodul als dmTest und die Tabelle als tbTest deklariert. Wie schreib ich das jetzt genau?

Versuchs mal so:

Hexy hat folgendes geschrieben:

Huhu @ll Nachfolgend noch der Quelltext des Buttons : markieren Delphi-Quelltext     1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: var   bild :string; begin   OpenBild.InitialDir := extrctfilepath(paramstr(0));   if OpenBild.Execute then begin     try       Test.Edit;         TestPicture.LoadFromFile(OpenBild.FileName);       Test.Post;     except     // ev. Fehler abfangen hier     end;   end; end;

grez
msch