+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : Invalid Enum Value (/showthread.php?tid=9086)
Invalid Enum Value - mohamed49 - 02-01-2018
السلام عليكم
استخدمت unit خاصة بتحميل ملف من الانترنت ExtActns باستخدام ميثود TDownLoadURL تعمل جيدا لكن مع الروابط التي تبدا ب HTTPS تقع مشكلة ليست في التحميل وانما في محاولته تحويل حالة كود ال API الى Enum value حسب بحثي في احد المواقع لرد احد الاعضاء
TDownloadURL tries to convert API status codes into
TURLDownloadStatus enum values. The error you are seeing is thrown when the
API reports a status code that TDownloadURL does not recognize.
Which OS are you running under? There are currently 27 API status codes
that TDownloadURL does not recognize. That suggests to me that TDownloadURL
was written for an older version of the API and has not been updated to
support the latest version
فهل يمكن التعديل على unit في هذه الحالة وكيف؟
او هل يوجد نسخة محدثة منExtActns unit او كحل بديل كيف يمكن اظهار progress statut to progressbar في حالة تحميل الملف
وشكرا
RE: Invalid Enum Value - mohamed49 - 02-01-2018
هذا الكود
[CSHARP]function TfrmURLS.DownloadHTML(const sURL,
sLocalFileName: string): Boolean;
begin
Result:=True;
with TDownLoadURL.Create(nil) do
try
URL:=sURL;
Filename:=sLocalFileName;
OnDownloadProgress := URL_OnDownloadProgress;
try
ExecuteTarget(nil);
except
Result:=False
end;
finally
Free;
end;
end;
procedure TfrmURLS.URL_OnDownloadProgress;
begin
Label1.Caption := StatusText;
pbarCurrentProgress.Max := ProgressMax;
pbarCurrentProgress.Position := Progress;
end;[/CSHARP]
للتذكير فقط الخطا هنا OnDownloadProgress := URL_OnDownloadProgress;
كيف يمكن اضافة فكرة لجلب حجم الملف مثلا لعمل مزامنة مع البروجريس بار او طريقة ما
RE: Invalid Enum Value - مبرمج حر - 07-01-2018
السلام عليكم
شوف هاذ المثال
http://delphi4arab.net/forum/showthread.php?tid=6075
RE: Invalid Enum Value - mohamed49 - 08-01-2018
(07-01-2018, 02:20 PM)مبرمج حر كتب : السلام عليكم
شوف هاذ المثال
http://delphi4arab.net/forum/showthread.php?tid=6075
يعطيك العافية اريده باستخدام هذا الكومبننت لذا اريد معرفة كيفية تجاوز هذا العائق استخدمت موقع اخر بنفس خصائص الاول يبدا بال http: وعمل جيدا لكن الموقع الثاني https تقع المشكلة اريد طريقة لحلها
ملاحظة استقبال نص html من الموقع يعمل عادي كذلك تحميل الملف المشكل فقط عند استخدام المزامنة مع البروجريس بار