What is wrong with this query?

J West wrote:
> function TpfDCPurchaseOrder.Update: Boolean;
> var
> ms : TStream;
> begin
> Result := False;
> ms := TMemoryStream.Create;
> Query.Close;
> Query.SQL.Clear;
> Try
> PurchasePicture.Picture.Bitmap.SaveToStream(ms);
> Query.Parameters.CreateParameter('PurchasePicture' , ftBlob, pdInput,
> SizeOf(PurchasePicture.Picture),
> null);
> Query.SQL.Add('UPDATE PurchaseOrder SET' +
> ' SupplierID = ' + IntToStr(SupplierID) +
> ', PurchaseDate = ' +
> QuotedStr(FormatDateTime('YYYY/mm/dd', PurchaseDate)) +
> ', PurchaseCost = ' + FloatToStr(PurchaseCost) +
> ', PurchaseDescription = ' +
> QuotedStr(PurchaseDescription) +
> ', PurchaseEBayReference = ' +
> QuotedStr(PurchaseEBayReference) +
> ', PurchaseNotes = ' + QuotedStr(PurchaseNotes) +
> ', PurchasePicture = urchasePicture' +
> ' WHERE PurchaseOrderID = ' + IntToStr(ID));
> Query.Parameters.ParamByName('PurchasePicture').Lo adFromStream(ms,
> ftBlob);
> Query.ExecSQL;
> Result := True;
> Query.Close;
> Query.Parameters.Clear;
> Finally
> ms.Free;
> End;
> end;
>
> My picture doesn't save but every other value does!
> I'm using Delphi7 with MySQL 4.51 with ODBC and ADO
>
> Regards
>
> James West
>
>
Hard to say without seeing the layout for your table but my guess is
MySQL does not like the colon in "PurchasePicture = urchasePicture".
Something doesn't look right with the way this is specified but just a
guess........

Regards,
Wendell Jones