+- Delphi Can (https://www.delphican.com)
+-- Forum: Delphi (https://www.delphican.com/forumdisplay.php?fid=3)
+--- Forum: Genel Programlama (https://www.delphican.com/forumdisplay.php?fid=6)
+--- Konu Başlığı: WebModule Multipart File Upload İşlemi (/showthread.php?tid=7964)
WebModule Multipart File Upload İşlemi - pro_imaj - 09-12-2024
Merhaba,
Uzun bir aradan sonra, Python, Flutter, C#'dan sonra yeniden Delphi tarafına gelmekten dolayı mutluluk duyuyorum, forumdaki arkadaşlarla zaten hep irtibat halindeydik, denedik gördük diyelim şimdilik.
Aşağıdaki python kodu ile yazdığım backend projesini Delphi tarafında WebModule kullanarak çözmeye çalışıyorum fakat birçok yolu denememe rağmen başarılı sonuca ulaşamadım, yeniden öğrenme sürecine başlıyorum.
Yapmak istediğim şey; Aşağıdaki resimde de görüleceği üzere herhangi bir dosyayı post metodu ile gönderip bunu delphi tarafında webmodule ile okuyup C:\Temp klasörüne dosyanın uzantısı ne ise aynı uzantıda fakat başka bir isimde kaydetmek.
*Buraya sormadan önce çok fazla araştırdım ChatGPT, Claude de kullandım fakat sonuca ulaşamadım.
*Ekte Postman gönderim ekran görüntüsü ve Delphi koduna ulaşabilirsiniz.
Cvp: WebModule Multipart File Upload İşlemi - vkamadan - 10-12-2024
(09-12-2024, Saat: 22:55)pro_imaj Adlı Kullanıcıdan Alıntı: Merhaba,
Uzun bir aradan sonra, Python, Flutter, C#'dan sonra yeniden Delphi tarafına gelmekten dolayı mutluluk duyuyorum, forumdaki arkadaşlarla zaten hep irtibat halindeydik, denedik gördük diyelim şimdilik.
Aşağıdaki python kodu ile yazdığım backend projesini Delphi tarafında WebModule kullanarak çözmeye çalışıyorum fakat birçok yolu denememe rağmen başarılı sonuca ulaşamadım, yeniden öğrenme sürecine başlıyorum.
Yapmak istediğim şey; Aşağıdaki resimde de görüleceği üzere herhangi bir dosyayı post metodu ile gönderip bunu delphi tarafında webmodule ile okuyup C:\Temp klasörüne dosyanın uzantısı ne ise aynı uzantıda fakat başka bir isimde kaydetmek.
*Buraya sormadan önce çok fazla araştırdım ChatGPT, Claude de kullandım fakat sonuca ulaşamadım.
*Ekte Postman gönderim ekran görüntüsü ve Delphi koduna ulaşabilirsiniz.
Merhaba ,
WebModule deki OnAction içine düşen Request:TWebRequest nesnesinin Files özelliğinden dosyalara ulaşabilmen lazım,
Örn ; istek içindeki ilk dosyayı kaydetmek için ,
procedure TWebModule1.WebModule1UploadAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
TMemoryStream(Request.Files[0].Stream).SaveToFile('c:\deneme.jpg');
end;
Fikir vermiştir umarım.
iyi çalışmalar.
WebModule Multipart File Upload İşlemi - yhackup - 10-12-2024
(09-12-2024, Saat: 22:55)pro_imaj Adlı Kullanıcıdan Alıntı: Merhaba,
Uzun bir aradan sonra, Python, Flutter, C#'dan sonra yeniden Delphi tarafına gelmekten dolayı mutluluk duyuyorum, forumdaki arkadaşlarla zaten hep irtibat halindeydik, denedik gördük diyelim şimdilik.
Flutter işleri yalan dolan abi ne varsa delphi de var
Cvp: WebModule Multipart File Upload İşlemi - pro_imaj - 11-12-2024
Merhaba,
Bu konuda çokça araştırma yaptım ve bu işte uzman arkadaşlardan da destek almam rağmen çözemedim.
Dosya göndermeme rağmen Files.count = 0 geliyor. (Aynı postman çağrısını Python ile yazdığım backend'e gönderdiğimde dosyayı okuyabildiğini teyit ediyorum.), WebModule projesi ile dosya alan bunun deneyimleyen var mı acaba.
Kod:
CountFilesInFormData(Request) > 0@vkamadan cevap için teşekkürler önerdiğin şekilde olmadı.
@yhackup Delphi konusunda nasrettin hocanın şu hikayesi gibi olabilir mi!
Bir gün cemaat Nasrettin hocaya dua ediyormuş Allah'ım hocamın dertlerini gider diye, bunu duyan hoca, aman ne yapıyorsunuz demiş, ben şu anki dertlerimle yaşamayı öğrendim şimdi bu dertler giderse yerine yenileri gelecek onlara alışamam belki demiş.
Cvp: WebModule Multipart File Upload İşlemi - delphi.developer - 11-12-2024
Web Broker ile upload işlemleri için uses bloğuna Web.ReqMulti birimini ekleyerek tekrar deneyin. Web.ReqMulti birimi sınıfları sunucuya upload edilen stream datalarının işlenmesini sağlar. Web Broker upload işlemi örneği için aşağıdaki makale linkini ayrıca inceleyebilirsiniz.
https://www.delphican.com/showthread.php?tid=7625
Cvp: WebModule Multipart File Upload İşlemi - pro_imaj - 11-12-2024
(11-12-2024, Saat: 16:53)delphi.developer Adlı Kullanıcıdan Alıntı: Web Broker ile upload işlemleri için uses bloğuna Web.ReqMulti birimini ekleyerek tekrar deneyin. Web.ReqMulti birimi sınıfları sunucuya upload edilen stream datalarının işlenmesini sağlar. Web Broker upload işlemi örneği için aşağıdaki makale linkini ayrıca inceleyebilirsiniz.
https://www.delphican.com/showthread.php?tid=7625
Cevap için teşekkürler çözüldü. IDE bunu bir şekilde bildirseydi ilgili kütüphane uses bloğuna eklenmeyince derlenirken belirtseymiş. Aynı kodu bu uses bloğunu eklemeden çalıştırınca aldığım hata
Alıntı:Access violation at address 00B12A1D in module 'project1.exe' (offset 4D2A1D). Read of address 00000000
Sizin belirttiğiniz şekilde uses bloğuna Web.ReqMulti ekleyince sorun çözmüş oldu.
procedure TWebModule1.WebModule1UploadAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
TMemoryStream(Request.Files[0].Stream).SaveToFile('C:\Temp\deneme.jpg');
end;