Forum: Datenbanken
Delphi
by blondervolker,
13. Mai 2012
hallo,
brennende augen?naja,recht hast du...:-D
immer lacht mich aus, ist ja auch ok :-D
trotzdem freue ich mich,wenn mir jemand über die strasse hilft :thumb:
Forum: Datenbanken
Delphi
by blondervolker,
11. Mai 2012
Ist es so richtig?:gruebel:
procedure TForm17.Button2Click(Sender: TObject);
var
myPDF : String;
fs : TFileStream;
begin
fs:=TFileStream.Create('c:Temp\Dok.pdf',fmCreate or fmShareExclusive);
myPDF := ADOTable1.FieldByName ('PDFFILE').AsString;
fs.Write(mypdf,length(mypdf)*Sizeof(char));
Forum: Datenbanken
Delphi
by blondervolker,
11. Mai 2012
Danke nochmal:thumb::thumb::thumb:
Hab es so gemacht:
procedure TForm17.Button2Click(Sender: TObject);
var
myPDF : String;
fs : TFileStream;
begin
fs:=TFileStream.Create('Temp\Dok.pdf',fmCreate or fmShareExclusive);
myPDF := ADOTable1.FieldByName ('PDFFILE').AsString;
Forum: Datenbanken
Delphi
by blondervolker,
11. Mai 2012
Hallo,
jetzt meckert Delphi:
Berufe.pas(614): E2003 Undefinierter Bezeichner: 'Sizeofchar'
Hab keinen Plan.Was ist da wieder falsch?:oops:
procedure TForm17.Button2Click(Sender: TObject);
var
Forum: Datenbanken
Delphi
by blondervolker,
9. Mai 2012
hab absolut keine Ahnung wie das geht.Ich hab schon gelesen und gegoogelt...
Forum: Datenbanken
Delphi
by blondervolker,
9. Mai 2012
DeddyH,
es hat sofort funktioniert!!! Danke für die Mühe:-D
Ich hab nun versucht die gespeicherte PDF mit dem Adobe Reader
aus der Datenbank herauszuholen,aber da kommt kein Mux,keine Meldung und nix passiert.
var
myPDF : String;
begin
Forum: Datenbanken
Delphi
by blondervolker,
9. Mai 2012
Wie kann ich den Inhalt auf Null prüfens.Das ist mein zigs`ter Versuch,aber ich bin leider noch zu Blöde.:oops:
Kannst bitte diesen Code vervollständigen?
Ich würde mich freuen,wenn ich endlich mal einen kleinen Erfolg hätte...:oops:
Forum: Datenbanken
Delphi
by blondervolker,
9. Mai 2012
Hallo,
ich wollte es unter "Sonstiges" eingeben.Da kam die Meldung Kontrollzentrum.Hab ich auch gemacht.:oops: