kullanıcı oturum açsın bazı alanları doldursun ve ek olarak resim çeksin ve bu çektiği resimi rutin insert içerisine ekleyerek veritabanına göndersin
Kod: Tümünü seç
procedure TForm1.TakePhotoFromCameraAction1DidFinishTaking(Image: TBitmap);
begin
KameraResim.Bitmap.Assign(Image);
end;
bu şekilde resimi image olarak ekrana alabiliyorum
Kod: Tümünü seç
procedure TForm1.Button1Click(Sender: TObject);
var
ws:Service1Soap;
begin
ws:=GetService1Soap(True,'',nil);
ws.ariza_kaydet(wmkod,strtoint(sl_ariza_id[ComboBox1.ItemIndex]),Memo1.Text);
ShowMessage('Arıza kaydı tamamlanmıştır..');
end;
end;
asıl mesele bu resimi nasıl insert içerisine ekleyerek veritabanına kayıt edeceğim