JPG im Blob Feld wird extrem groß

[DeddyH]

Und wann genau tritt der Fehler auf? Ich tippe bei einem LoadFromFile oder SaveToFile des ClientDatasets, aber das ist nur geraten.

[himitsu]

Und wie lautet der Dateiname? (inkl. Pfad)




Tipp 1: Strg+C funktioniert auch bei Fehlerdialogen und im Log der IDE. (via Strg+V als Text in den Beitragseditor einfügen)

Tipp 2: Du könntest dir ein Tutorial suchen "Was ist ein Debugger und wie benutzt man den".

Satzzeichen und die Großschreibung

[calikey]

Zitat:

Zitat von DeddyH (Beitrag 1297688)

Und wann genau tritt der Fehler auf? Ich tippe bei einem LoadFromFile oder SaveToFile des ClientDatasets, aber das ist nur geraten.

genau richtig ich wähle eine jpg datei aus und dann kommt der fehler

[calikey]

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));
if FHandle = INVALID_HANDLE_VALUE then
raise EFCreateError.CreateResFmt(@SFCreateErrorEx, [ExpandFileName(AFileName), SysErrorMessage(GetLastError)]);
end

[Sherlock]

Zitat:

Zitat von calikey (Beitrag 1297694)

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));
if FHandle = INVALID_HANDLE_VALUE then
raise EFCreateError.CreateResFmt(@SFCreateErrorEx, [ExpandFileName(AFileName), SysErrorMessage(GetLastError)]);
end

Wozu postest Du das?

:?

Sherlock

[calikey]

habe im debugger ein halte punkt bei der fehlermeldung gesetzt und das steht drin :-)

[DeddyH]

Also anscheinend in der Zeile

Zitat:

Delphi-Quellcode:

FileStream := TFileStream.Create(sdBlob.FileName,fmCreate);

Falls ja, finde ich das jetzt etwas merkwürdig. Lass Dir doch sdBlob.FileName einmal ausgeben, kannst das auch hier posten, aber es würde mich wundern, wenn ein Dialog einen ungültigen Dateinamen zurückgibt.

[himitsu]

Wie TFileStream.Create aussieht, wissen wir auch schon.
Wichtiger ist es zu wissen was "in" sdBlob.FileName drin steht.

[mkinzler]

Zitat:

Zitat von calikey (Beitrag 1297693)

Zitat:

Zitat von DeddyH (Beitrag 1297688)

Und wann genau tritt der Fehler auf? Ich tippe bei einem LoadFromFile oder SaveToFile des ClientDatasets, aber das ist nur geraten.

genau richtig ich wähle eine jpg datei aus und dann kommt der fehler

Wo wählst Du sie aus?

Und wo übergibst Du diese? Wohin? Fragen über Fragen.

[calikey]

Delphi-Quellcode:

    sdBlob: TSaveDialog;

oder die daten vom object inspektor?