我是這樣做的!
前台delphi
procedure Tfmor.Image1DblClick(Sender: TObject);
begin
begin
if OpenPictureDialog1.Execute then
begin
Image1.Picture.LoadFromFile(OpenPictureDialog1.Filename);
end;
end;
procedure Tfm_b.sb1Click(Sender: TObject);
begin
begin
with sp1 do
beginparams[0].Assign(Image1.Picture);
Prepare;
ExecProc;
end;
end;
後台sql server7.0
CREATE PROCEDURE pcc @picture image
AS
insert into cc(p )
values(@picture)
可是:用DBimage顯示。顯示出來的圖片為什麼部分圖片是黑色?