ذخیره کردن عکس در دیتابیس دلفی

[jaber]

سلام دوستان من سورسی می خوام که بتونه عکس رو در دیتا بیس ذخیره پاک ویرایش کنه

ممنون می شم چیزی بزارین

[lord_viper]

مثلا در Sql server میتونین نوع فیلد رو به صورت Image انتخاب کنین و با دستور زیر عکس رو بهش ارسال کنید

کد:

ADOQuery1.FieldByName('Bilde').Assign(Image1.Picture.Graphic);

روش دیگه

کد:

ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('INSERT INTO [Data] ');
  ADOQuery1.SQL.Add(' ([Data]) VALUES ( :p1 ) ');
  ADOQuery1.Parameters.ParseSQL(ADOQuery1.SQL.Text, True );
  ADOQuery1.Parameters[0].LoadFromStream(Data,ftBlob);
    try
    Result := (ADOQuery1.ExecSQL = 1);
    except
      on e: exception do begin
        Result := False;
        ShowMessageFmt('Error Inserting into Data:%s', [e.Message]);
        end;
    end;

روش دیگه

کد:

ADOTable1.Insert;
dbImage1.Picture.LoadFromFile('myJPEG.jpg');
ADOTable1.Post;