bayana

شكرا لكم اخوتي على المساعدة عموما انا عرفت وين الخطأ في البداية اقوم بتحويل الصورة الملونة الى الوانها الاصلية احمر اخضر ازرق وبعدها افلتر الصور (4 صور: ملونه , احمر, اخضر, ازرق) اقوم بقراءة الصور الثلاث الاخيرة عن طريقpicture.point فنتيجة الصورة الحمراء والخض…

شكرا لك اخي الفاضل جربت طريقتك ومانفعت اريد حل ثاني

السلام عليكم ورحمة الله وبركاته اخواني اذا ممكن تشوفون هذا الكود For w = 0 To 5 For u = 0 To 0 R = fr(w, u) G = fg(w, u) B = fb(w, u) 'Print , B fcolor(w, u) = (256 * 256 * B) + (256 * G) + R Print , fcolor(w, u) 'fcolor(w, u) = RGB(R, G, B) ' Picture9.PSet (w…

السلام عليكم اخوتي انا جربت ثانيا : الترتيب بطريقة الاختيار Selection Sort Private Sub Command1_Click () Cls Dim x(1 To 20) As Single Dim n, J, k, temp, I As Single n = InputBox("إدخل عدد الارقام") For J = 1 To n x(J) = InputBox("إدخل القيمة") Next J For J = 1…

شكرا لكم اخوتي على المرور بس حبيت اعطيكم المعلومة الي عرفتها البكسل في vb لما نقرأه يكون RGB من غير alpha اي انه 3 بايت فقط شكرا مرة اخرى

شكرا لك اخي الكريم على طرح هذا السؤال وانا بعد اواجه مشكلة في فتح الملف استخدمت input#1,var الداتا الموجودة عندي مسيفة على هيئة array in 2D عملت لووب For i = 1 To Picture1.ScaleHeight For j = 1 To Picture1.ScaleWidth Input #2, Color [code] R = Color Mod 256 G …

اذا في احد يقدر يعطيني الجواب؟؟؟ البكسل لما يكون long هل يكون بايت red بايت green بايت blue بايت alpha ولما اضع البكسل في array كل بكسل يكون حد في المصفوفة؟؟؟؟ ام ان يكون 3 حدود؟؟؟ حدred حد green وحد blue -waf

شكرا لكم جميعا وشكر خاص ل kindy_ibrahim والشكر الجزيل للاخت بنت اليمن على الشرح المفيد شكرا مرة ثانية

شكرا اخي الكريم على هذا الرد انا استخدمت محرك البحث وحصلت على هذا الكود n = FreeFile Open FileName For Input As #n Text1 = Input$(LOF(n), n) Close #n او n = FreeFile Open FileName For Input As #n Do While Not EOF(n) Line Input #n, Linen Text1 = Text1 & vbNewLi…

-waf السلام عليكم اريد اعرف كيف اقرأ من txt file انا عندي ارقام مسيفين في الفايل على هيئة long 2D array في صورة كيف اقرأ من هذا الفايل؟؟؟ اريد اقرأ رقم رقم وشكرا

اخي Mohammed Sayed انا اقصد long بيكون R G B +ALPHA??? لهذا يكون 4 بايت؟؟؟ امن انه 3 بايت؟؟؟؟ وانا قرأت الصورة على هيئة LONG وسيفتها في txt وكانت على هيئة array in 2D فكيف اقرأ هذه الارقام مرة ثانية من الفايل علشان اعمل لها سورت واحدد الميدين وبعد ذلك اطبع الص…

اخي الكريم كما ذكرت سابقا انا اريد اعمل MEDIAN FILTER لذلك انا بحاجة لقيمة كل بكسل احتى ارتبهم واقارن بالميدين القيمة الي طبعتها عبارة عن LONG طلعت RGB وطبعته فما كان يتجاوز قيمته عن 256 سؤالي لما تكون قيمة البكسل ب LONG هي عبارة عن 3 او 4 بايت؟؟؟؟ وهل كل بايت…

شكرا اخي الكريم انا كنت مطلع على الموضوع الي طرحته الفرق بين طرق الترتيب والترتيب الي ابحث عنه مختلف اريد ترتيب مصفوفة بحيث اعمل على نصفها بمعنى اذا كانت من 9 خانات ارتب ابتداءا من النصف فاذا كان اكبر انزل تحت للخانة 7 واذا كان اكبر انزل للخانة 9 ويستقر اخذ ال…

حين نحصل على pixel يكون long ويحتوي على R G B لكل واحد بايت فهل لما نسيف قيمة البكسل(in long) في array ياخذ ثلاث خانات ؟؟ يعني خانة تكون R والثانية Gوالثالثة B?? ام ان LONG ياخذ 4 بايت؟؟؟واذا كان 4 بايت فلماذا؟؟

شكرا جزيلا على الردود طيب عندي سؤال الرقم لما يتخزن long يكون كم بايت؟؟؟ 3 او 4؟؟؟ هل بايت R وبايت G وبايت B ام ماذا?? ولما نسيفه في array ياخذ كل بايت خانه؟؟؟

السلام عليكم ورحمة الله وبركاته اريد اعمل sorting بحيث اخذ مصفوفة وتحتوي عل تسع خانات اقارن الرقم الاول من المصفوفة التي اريد اعمل لها سورت بمنتصف هذه المصفوفة الخانة 5 ا. فاذا كان اكبر اقارنه بالخانة 7 واذا كان اكبر اقارنه بالخانة 9 اذا كان اصغر من 9 نضعه في …

شكرا جزيلا عرفت كيف اظهر الصورة باللون الاخضر والازرق واستطعت ان اجعل الصورة تظهر بدمج هذين اللونين وذلك باستخدام هذا الكود Case Red SetPixel TargetPic.hdc, X, Y, RGB(RPattern, 0, 0) Case Green SetPixel TargetPic.hdc, X, Y, RGB(0, GPattern, 0) Case Blue SetPix…

شكرا اخي على المساعدة انا استخدمت هذه Function Color_to_RGB (Color As Long , R As Integer , G As Integer , B As Integer ) As Long R = Color Mod 256 G = (Color \ 256 ) Mod 256 B = (Color \ 256 \ 256 ) Mod 256 End Function الاولى اظهرت الصورة بالاحمر لكن لم استط…

شكرا لك اخي msayed2004 جربت GetPixel وSetPixel لكن ما عرفت شلون اطلع RED GREEN BLUE picture = SetPixelV(Picture2.hDC, i, j, RGB(255, 0, 0)) هذا الكود يطلع الصورة بلون احمر من دون اي ملامح لها وشكرا

اخي انا لما اشغل البرنامج تطلع هذه المسج compile error user-defined type not defined واذا ممكن تشرح لي اكثر عن البرنامج هل الفلترات جاهزة؟؟