براي ذخيره كردن عكس توي بانك اطلاعاتي مشكل دارم.

[heydar110]

سلام.من براي ذخيره كردن عكس توي بانك اطلاعاتي مشكل دارم.اگه ممكنه يه راهنمايي بكنيدواگه دم دست بود يه سايت آموزشي هم بديد.خيلي ممنونم.باتشكر :)

[MAR_Programmer]

من خودم یکم مشکل دارم؟
اما یه راهنمایی می تونم بکنم
من تا الان فقط عکس هایی با پسوند های
ICO BMP
رو تونستم داخل بانک ذخیره کنم
برای این کار یک
DBImage
داخل فرم قرار بده بعد از طریق
Propertis
این شی او نو به یک دیتا سورس وصل کند بعد فیلد عکس رو انتخاب کن یک قسمت داخل پروپرتی هست به اسم
DataField
مقدار اون رو با اسم فیلد عکست داخل دیتا بیس یکی کن. بعد از او به وسیله مقدار های زیر یک عکس به او نسبت بده (با همان پسوند هایی که بهت گفتم)
DBImage1.Picture.Graphic.LoadFromFile();
داخل پرانتز باید مسیر فایل تصویر باشه. بعد از اون می تونی با
Post
کردن
Table
مربوطه این عکس رو داخل دیتا بیس ذخیره کنی
اگه به مشکلی برخوردی برام میل بزن
MARProgrammer@yahoo.com

[mahdi bg]

يك راه بهتر اينكه آدرس را ذخيره كني نه عكس را

[b_yaghobi]

//--------------------------------------------------------------------------------------------------
Procedure CopyGraphic2Filed(Graphic:TGraphic;Fld:TField);
var ms:TMemoryStream;
begin
ms:=TMemoryStream.Create;
try
Graphic.SaveToStream(ms);
ms.Seek(0,0);
if ms.size>0 then TBlobField(Fld).LoadFromStream(ms);
Finally
ms.Free;
end;
end;
//--------------------------------------------------------------------------------------------------
Procedure CopyFilde2pic(Fld:TBlobField;Pic:Tpicture);
var
TmpFileName:string;
Buf:array[0..255] of char;
FileNameSize:integer;
begin
FileNameSize:=GetTempPath(length(buf),buf);
if FileNameSize>0 then
TmpFileName:=string(buf)+'$$$.'+GetGraphicExt(Fld. Value)
else
TmpFileName:='c:\$$$.'+GetGraphicExt(Fld.Value);
Fld.SaveToFile(TmpFileName);
pic.LoadFromFile(TmpFileName);
deletefile(TmpFileName);
end;

//--------------------------------------------------------------------------------------------------

[alpina]

سلام
من می خوام تو #c عکسی رو که اسکن کردم ذخیره کنم و در صورت نیاز نمایش بدم
باید چی کارکنم؟

[mojtaba-design]

يك راه بهتر اينكه آدرس را ذخيره كني نه عكس را
واقعا خسته نباشيد اينم شد راه
شايد اين برنامه بخواهد در رايانه ديگري استفاده بشه اونوقت چي ؟ 60 ،70 تا عكسم بايد دقيقا تو اون مسيري كه در كامپيوتر اول بود ذخيره كني
حتي اگه مثلا آدرس درايو e باشه و كامپيوتر دوم درايو c نداشته باشه اونوقت مكافات شروع ميشه
در ضمن دوستمون خواسته كه تصوير رو تو بانك اطلاعاتي ذخيره كنه نه آدرسشو
ابته نميخوام ناراحتت كنم اما سعي كنيم كه جواب هاي درستي بديم
-----------------------------------------------------------------------------------------------------------
در مورد دوست عزيزمون هم سرچ كني هستش
حتي ميتوني به كتابي كه دوستان معرفي كردن مراجعه كني
نام كتاب Mastering Delphi
نويسنده : ماركو كانتو
------------------------------------
يك چيز هم بگم ميتونه يكي از فيلد ها بايد نوعش رو به ole object تغيير بدي (در بانك اطلاعاتي اكسس)

[NoneForce]

سلام

مجتبي جان داري خانه تكاني مي كني؟! به تاريخ اين تاپيك توجه كردي؟ 2006

[mojtaba-design]

آه راست ميگي !!!!!!!!!!!!!!!!!!!1
بابا آخه معمولا اون صفحات جديد رو پر رنگ تر نشون ميده ، منم بدون توجه به تاريخش ( چون ديدم پر رنگه ) پست دادم !
خوب تجربه اي شد
از همه معذرت ميخوام