).AsString) ;
>>moDescr.Text :=
>> Trim(datamod.ADOQ.FieldByName('Description').AsString) ;
>>ms := TMemoryStream.Create ;
>>try
>> ImgField := datamod.ADOQ.FieldByName('Image');
>> ImgField.SaveToStream(ms)
hOut;
> BMPOut.Height:=HeightOut;
> BMPOut.Canvas.Stretchdraw(Rect(0,0,WidthOut,HeightOut),JPGOut);
>
> John
>
>
> -----Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On
> Behalf Of Neven MacEwan
> Sent: Tuesday, 19 August 2008 11:28 a.m.
Developers Group - Delphi List
Subject: Re: [DUG] Images and MS SQL Server
Dave
>
> It actually appears to be something to do with the image being a jpeg.
> If I use a bitmap image, the TDBImage shows the bitmap correctly.
Yes i don't think TDBImage supports JPGs by default
end ;
finally
ms.Free ;
end ;
end ;
finally
datamod.ADOQ.Close ;
end ;
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> On Behalf Of Neven MacEwan
> Sent: Tuesday, 19 August 2008 10:18 a.m.
> To: NZ Borla
Brien
Sent: Tuesday, 19 August 2008 10:55 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Images and MS SQL Server
How is ADOQueryGetMacroFileCol defined?
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
On Behalf Of Leigh Wanstead
Sent: Tuesday, 19 A
;
Image.Picture.Bitmap.LoadFromStream(ms);
finally
st.Free ;
end ;
finally
ms.Free ;
end ;
end ;
finally
datamod.ADOQ.Close ;
end ;
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
On Behalf Of Neven Mac
How is ADOQueryGetMacroFileCol defined?
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
On Behalf Of Leigh Wanstead
Sent: Tuesday, 19 August 2008 10:28 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Images and MS SQL Server
I assume this code
al Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Dave O'Brien
Sent: Tuesday, 19 August 2008 10:11 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Images and MS SQL Server
That's exactly what I am doing to save the image, how do I retrieve it?
E
ge-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf Of Dave O'Brien
> Sent: Monday, 18 August 2008 4:17 p.m.
> To: NZ Borland Developers Group - Delphi List
> Subject: Re: [DUG] Images and MS SQL Server
>
>
> So did I, but I can't tell if it's
Group - Delphi List
Subject: Re: [DUG] Images and MS SQL Server
IIRC, I will do this way.
varStream just a memory stream, you might want to instante with
a
TFileStream
ADOQueryTest.sql.text := 'UPDATE table SET FileCol =
:FileColOBJECTS WHER
elphi List
Subject: Re: [DUG] Images and MS SQL Server
Dave
Have you used the IDE interactively to open the query and check the type
of field created?
I use ADO (but my delphi system is down right now) so i'll have a look
What is your MSSQL Datatype?
FieldByName would return a tfield (wh
;Image')).Saveto...), but either this
doesn't work or my save code doesn't work.
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
On Behalf Of Neven MacEwan
Sent: Monday, 18 August 2008 4:06 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re
either this
> doesn't work or my save code doesn't work.
>
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> On Behalf Of Neven MacEwan
> Sent: Monday, 18 August 2008 4:06 p.m.
> To: NZ Borland Developers Group - Delphi List
> Subject: Re: [DUG] Im
AIL PROTECTED] [mailto:[EMAIL PROTECTED]
> On Behalf Of Neven MacEwan
> Sent: Friday, 15 August 2008 4:02 p.m.
> To: NZ Borland Developers Group - Delphi List
> Subject: Re: [DUG] Images and MS SQL Server
>
> Dave
>
> Hasn't Tblobfield got the same streaming functions IIRC
&g
#x27;t work or my save code doesn't work.
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
On Behalf Of Neven MacEwan
Sent: Monday, 18 August 2008 4:06 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Images and MS SQL Server
Dave
I thought y
ailto:[EMAIL PROTECTED]
> On Behalf Of Neven MacEwan
> Sent: Friday, 15 August 2008 4:02 p.m.
> To: NZ Borland Developers Group - Delphi List
> Subject: Re: [DUG] Images and MS SQL Server
>
> Dave
>
> Hasn't Tblobfield got the same streaming functions IIRC
>
>> I h
en MacEwan
Sent: Friday, 15 August 2008 4:02 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Images and MS SQL Server
Dave
Hasn't Tblobfield got the same streaming functions IIRC
>
> I have worked out how to save an image into an Image field, but I'm
> having
Dave
Hasn't Tblobfield got the same streaming functions IIRC
>
> I have worked out how to save an image into an Image field, but I’m
> having brain fade on how to retrieve the image... Using TADOQuery, D2005.
>
> Save:
>
> ...
>
> datamod.ADOU.SQL.Add(':Image)') ;
>
> ms := TMemoryStream.Create ;
STeven,
I made my own component to do that, would you like a copy ?
On 18 Oct 99 at 8:24, Steven Wild wrote:
>
> We want to put an image onto a MDI parent form that will not show
> through overlaid child forms in the way visible components on
> parent forms do. (I just need a graphic backgr
Paint the rest of the client area.
Procedure .Paint;
begin
FillRect(ClientRect);
DOTextDrawing;
end;
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
Behalf Of [EMAIL PROTECTED]
Sent: Wednesday, September 08, 1999 2:27 AM
To: Multiple recipients of list de
t; To: Multiple recipients of list Delphi
> Subject: Re: [DUG]: Images
>
>
> Anyone able to help on this one?
>
> Steven
Patrick Dunford, ChristChurch, NZ
http://patrick.dunford.com/
--
Steven
>
>
> > To:Multiple recipients of list Delphi
> <[EMAIL PROTECTED]>
> > Reply-to: [EMAIL PROTECTED]
> > Date: Sun, 07 Feb 1999 19:16:33 +1300
> > From: Chris Chambers <[EMAIL PROTECTED]>
> > Subject: Re: [DUG]: Im
gt;
> Reply-to: [EMAIL PROTECTED]
> Date: Sun, 07 Feb 1999 19:16:33 +1300
> From: Chris Chambers <[EMAIL PROTECTED]>
> Subject: Re: [DUG]: Images
> A while back when I last looked the most expensive (but not too bad if you
> really needed it)
A while back when I last looked the most expensive (but not too bad if you
really needed it) and by far the most robust application for viewing many
formats and the technical drawings of very large file size etc. was the
Canadian product Imagenation. This was fully OLE 2 client and server before
24 matches
Mail list logo