Subject | Suggestions please |
---|---|
Author | Daniel Bertin |
Post date | 2002-03-06T18:52:27Z |
Hi all,
In my quest to learn this properly, I would appreciate suggestions, on the
proper way to write a record to the database. Using TField way of thinking
I would do this;
DataM.Axles.Insert;
DataM.AxlesIDVEH.AsInteger := DataM.VehiclesIDVEH.AsInteger;
DataM.AxlesAXPOS.AsVariant := EDAxPos.AsValue;
DataM.AxlesAXSTEER.AsInteger := Steer.AsValue;
DataM.AxlesPICTURE.Assign(JfDbFocusImage1.Picture.Bitmap);
DataM.AxlesPOSLO_T.AsString := '********';
DataM.AxlesPOSLI_T.AsString := '********';
DataM.AxlesPOSRO_T.AsString := '********';
DataM.AxlesPOSRI_T.AsString := '********';
DataM.Axles.Post;
I know this is not the correct approach, so I tried using this, from an
example IBO program.
but cannot insert the picture(BMP) into the table. Is my approach wrong ?
should I use DSQL component? or the SQL property of the IBOQuery?
DataM.Axles.ExecuteImmediate( 'INSERT INTO AXLES ( AXPOS, IDVEH ) ' +
'VALUES ( ' + inttostr(EDAxPos.Value) + ' , ' +
inttostr(DataM.VehiclesIDVEH.AsInteger) + ',' +
DataM.ImagesIMGBMP.BlobType + ') ', nil );
DataM.Axles.Refresh;
Can Someone give suggestions to a Newbie?
thanks
Daniel
In my quest to learn this properly, I would appreciate suggestions, on the
proper way to write a record to the database. Using TField way of thinking
I would do this;
DataM.Axles.Insert;
DataM.AxlesIDVEH.AsInteger := DataM.VehiclesIDVEH.AsInteger;
DataM.AxlesAXPOS.AsVariant := EDAxPos.AsValue;
DataM.AxlesAXSTEER.AsInteger := Steer.AsValue;
DataM.AxlesPICTURE.Assign(JfDbFocusImage1.Picture.Bitmap);
DataM.AxlesPOSLO_T.AsString := '********';
DataM.AxlesPOSLI_T.AsString := '********';
DataM.AxlesPOSRO_T.AsString := '********';
DataM.AxlesPOSRI_T.AsString := '********';
DataM.Axles.Post;
I know this is not the correct approach, so I tried using this, from an
example IBO program.
but cannot insert the picture(BMP) into the table. Is my approach wrong ?
should I use DSQL component? or the SQL property of the IBOQuery?
DataM.Axles.ExecuteImmediate( 'INSERT INTO AXLES ( AXPOS, IDVEH ) ' +
'VALUES ( ' + inttostr(EDAxPos.Value) + ' , ' +
inttostr(DataM.VehiclesIDVEH.AsInteger) + ',' +
DataM.ImagesIMGBMP.BlobType + ') ', nil );
DataM.Axles.Refresh;
Can Someone give suggestions to a Newbie?
thanks
Daniel