-
Forum: Datenbanken
by calikey,
18. Apr 2015
ok dann anderen weg wie muss ich denn um schreiben das ein pfad angelegt wird und der dann in der datenbank kommt. vieleicht funktioniert das dann besser als der blob
-
Forum: Datenbanken
by calikey,
18. Apr 2015
ok der hinweis ist weg danke :-)
nur leider wird immer noch nichts gespeichert.
im debugger steht folgendes.
procedure TBlobField.SaveToFile(const FileName: string);
var
Stream: TStream;
begin
Stream := TFileStream.Create(FileName, fmCreate);
try
-
Forum: Datenbanken
by calikey,
18. Apr 2015
So quellcode
bei BlobStream.Free; meldet er denn hinweis
type
TForm2 = class(TForm)
Button1: TButton;
Button2: TButton;
odBlob: TOpenDialog;
sdBlob: TSaveDialog;
Button3: TButton;
-
Forum: Datenbanken
by calikey,
18. Apr 2015
So beim compelieren ist mir eine warnung auf gefallen
doku.pas(171): W1036 Variable 'BlobStream' ist möglicherweise nicht initialisiert worden
-
Forum: Datenbanken
by calikey,
14. Apr 2015
Bin froh das man soviel gedult hat. Ich muss mich erst mal um meine kleine kümmern und lese mir heute abend denn link durch. Ich schreib dann heute abend weiter. Bedanke mich erst mal ganz herzlich bei allen die bis jetzt geholfen haben.
-
Forum: Datenbanken
by calikey,
14. Apr 2015
sdBlob: TSaveDialog; oder die daten vom object inspektor?
-
Forum: Datenbanken
by calikey,
14. Apr 2015
habe im debugger ein halte punkt bei der fehlermeldung gesetzt und das steht drin :-)
-
Forum: Datenbanken
by calikey,
14. Apr 2015
constructor TFileStream.Create(const AFileName: string; Mode: Word; Rights: Cardinal);
var
LShareMode: Word;
begin
if (Mode and fmCreate = fmCreate) then
begin
LShareMode := Mode and $FF;
if LShareMode = $FF then
LShareMode := fmShareExclusive; // For compat in case $FFFF passed as Mode
inherited Create(FileCreate(AFileName, LShareMode, Rights));
-
Forum: Datenbanken
by calikey,
14. Apr 2015
genau richtig ich wähle eine jpg datei aus und dann kommt der fehler
-
Forum: Datenbanken
by calikey,
14. Apr 2015
so es sind keine fehler mehr und es lässt sich compilieren nur leider passiert nichts.
fehler meldung im programm die syntax für denn dateiname verzeichnissname oder datenträgerbezeichnung ist falsch?:(
-
Forum: Datenbanken
by calikey,
14. Apr 2015
das ist diese
TclientdatasetAfterScroll(TDataSet); //2010
-
Forum: Datenbanken
by calikey,
14. Apr 2015
ok jetzt kommt nur noch 1 fehler
doku.pas(165): E2010 Inkompatible Typen: 'TDataSet' und 'class of TDataSet'
procedure tclientdatasetAfterScroll(DataSet1: TDataSet);
private
{ Private-Deklarationen }
-
Forum: Datenbanken
by calikey,
14. Apr 2015
die clientdataset ist in form1 und die daten also pass bild kopie arbeitsvertrag ... sollen halt unter extra form angezeigt werden also form 2
-
Forum: Datenbanken
by calikey,
14. Apr 2015
Vor und nachname der person
-
Forum: Datenbanken
by calikey,
14. Apr 2015
ich hau mal denn ganzen quell text rein vielleicht bringt das hilfe
type
TForm2 = class(TForm)
MainMenu1: TMainMenu;
OpenPictureDialog1: TOpenPictureDialog;
SavePictureDialog1: TSavePictureDialog;
Button1: TButton;
Button2: TButton;
odBlob: TOpenDialog;
-
Forum: Datenbanken
by calikey,
14. Apr 2015
Delphi schimpft da wieder das alles undeklariert ist
-
Forum: Datenbanken
by calikey,
14. Apr 2015
Da schimpft delphi undeklarierter bezeichner Tclientdataset1 und auch edit1
-
Forum: Datenbanken
by calikey,
14. Apr 2015
ClientDataSet1: TClientDataSet;
DataSource1: TDataSource;
Hab mal beide versuch mit clientdataset1 und auch beide datasource aber leider immer noch der fehler
-
Forum: Datenbanken
by calikey,
14. Apr 2015
so hab das jetzt mal etwas für mich angepasst. leider bekomme ich bei meinem angepassten code nur denn Fehler:
doku.pas(135): E2076 Diese Form des Methodenaufrufs ist nur für Klassenmethoden oder Konstruktoren zulässig
procedure TForm2.btnLoadClick(Sender: TObject);
var
FileStream: TFileStream;
BlobStream: TStream;
begin
if (sdBlob.Execute) then
begin
-
Forum: Datenbanken
by calikey,
14. Apr 2015
Bin noch anfänger :-)
Aber wie lad ich jetzt am blödesten ins feld ohne das es zur bmp wird?
-
Forum: Datenbanken
by calikey,
14. Apr 2015
So habe die meisten Probleme gelöst. nur Leider wird ein JPG was ich in mein Blob Feld lade extrem groß. JPG größe 1,19 mb wird zu 27mb in der Datenbank. Habe das die feld def als FTgraphic und als normal blob versucht. in der clientdataset ist die feld def grad <FIELD attrname="Arbeitsvertragimg" fieldtype="bin.hex" SUBTYPE="Graphics"/> definiert
als Quellcode hab ich es so versucht, es...