SUM

بسم الله الرحمن الرحيم اخي العزيز Pati ان عمليه انشاء ملفات Dll هي عبارة ان علميات برمجيه او اكود برمجيه تتم بدون ضهور نوافذ تصميميه (كما في عمل اي برنامج عادي) طبعاً عملية بناء ملفات Dll تعتمد اعتماداً رأيسياً على ال procedure و ال Function وسأشرح لك الآن طري…

بسم الله الرحمن الرحيم اخي العزيز السراحي اهلاً وسهلاً بك معنا في هذا المنتدى وإن شاء الله تجد به ماينفعك على العموم جواب سؤالك هو ان دلفي معروفه بأنها قويه في مجالات قواعد البيانات فهي تستطيع الربط مع اي قاعده بيانات كانت وطبعاً توجد هناك قواعد بيانات خاصه با…

بسم الله الرحمن الرحيم اخي العزيز اهلاً وسهلاً بك في هذا المنتدى وعسى ان تجد فيه ماتريد على العموم احببت ان اوضح لك بعض النقاط لأنه ليس لدي وقت لشرح مشكلتك طبعاً هم نقطه احببت ان اوضحها هي عمليت الربط فقم اولاً بضبط اعدادت القاعده بواسطة ODBC (( طبعاً لا يحتاج…

اولاً اهنك اخي Pati على هذا البرنامج واعتذر على عدم ردي على سؤالك لأنه ليس لدي وقت لأبحث فيه على العموم انتظرني في هذه الفتره لأني منشغل جداً وعندما اعود إن شاء الله سأبحث لك عما تريد وتقبل اطيب تحياتي اخوك SUM

اخي العزيز عنيزه انصحك بأن تبحث عن الكائنات التي تريد في المواقع الخاصه بها مثل : Delphi32.com Torry.net وغيرها واعذرني على عدم بحثي لك عن ماتريد لأني والله مشغول هذه الفتره ولا استطيع دخول الأنترنت وتقبل اطيب تحياتي اخوك SUM

بسم الله الرحمن الرحيم مع اول مشاركه وقبل البدء اود ان اعتذر من الأخوه رواد هذا المنتدى عن الأنقطاعه على العموم اخي العزيز يمكن رفع موضوعك الى الأخ محمد بدوي او الأخ خضر ترزي وتقبل اطيب تحياتي اخوك SUM

بسم الله الرحمن الرحيم اخي العزيز مادي الصحيح اني كتبت الكود وانا مستعجل وبدون مااجربه على الدلفي على العموم هذا تصحيح للكود procedure TForm1.FormCreate(Sender: TObject); begin Screen.Cursors[1]:=LoadCursorfromfile('D:My PicturesimageCURSORSGLOBE.ani'); end; ه…

طبعاً اذا كنت ماتحب تستخدم الكائنات فاليك هذا الكود الي يبين طريقة ارسال البيانات على البرامج الأخرى بواسطة SendMessage procedure SendMsg(const h: HWND; const s: string); var i: integer; begin if h = 0 then Exit; if Length(s) = 0 then Exit; for i:= 1 to Length…

بسم الله الرحمن الرحيم اخي العزيز يوجد عدة طرق لأرسال بيانات الى برامج اخرى وطبعاً يوجد كمبوننت لهذه الأعمال وانا افضل ان تستخدمها على العموم قم بتحميل هذا الكائن الذي سيساعدك في هذه العمليات من هذه الوصلة: http://delphi.icm.edu.pl/ftp/d20free/sendkeys.zip ثم …

اخي العزيز مادي والله الصحيح اني انا منشغل شوي ولا اقدر ارسل لك الملف على البريد بس على العموم ابغا اسوي تعديل بسيط على الكود الي اعطانا اياه اخونا pati فقم اولاُ بكتابة هذا الكود في وحدة Create لل Form Screen,Crusors[1]:=LoadCursorfromfile('D:My Picturesimage…

اخي العزيز MR CD الرابط شغال 100% بس ممكن انت جربته في وقت كان السيرفر موقف على العموم حاول تجربه مره ثانيه واعطيني خبر انا انتظر ردك وتقبل اطيب تحياتي اخوك SUM

بسم الله الرحمن الرحيم اخي العزيز مادي اليك هذا المثال الي سويته لك على الدلفي http://www.8op.com/sum/Cursor.zip وتقبل اطيب تحياتي اخوك SUM

اخي العزيز يمكنك الأطلاع على هذا الموضوع http://arabteam.nicmatic.com/vb/showthread...3?threadid=3488 وتقبل اطيب تحياتي اخوك SUM

بسم الله الرحمن الرحيم اولاً ارحب بك اخي DR_A في هذا المنتدى وإن شاء الله تجد فيه مايفيدك على العموم حل مشكلتك هي استخدام امر Copy لنسخ الجمل المخصصة في النصوص مثلاً لديك 2 متغيير string الأول اسمه a و الثاني اسمه b المتغيير الأول a يحمل هذا النص Hello Server:…

بسم الله الرحمن الرحيم اولاً اشكر الأخ ASP4DB على اجابة وارحب ايضاً بكلاً من الأخ بوب عابد ومحمد الفياض طبعاً يااخ بوب عابد قد اجاب عليك الأخ ASP4DB واما انت يااخ محمد الفياض فعلى مااظن ان سبب مشكلتك هو انه حصل خلل اثناء تحميل الملف فأنا انصحك بأن تستخدم برنام…

ألآن يمكنكم تنزيل كتاب Mastering Delphi 6 وبصيغة PDF من الرابط التالي http://www.inprises.com/control/Mastering%...hi6%20Ebook.rar وتقبلوا اطيب تحياتي اخوكم SUM هذا الكلام منقول عن منتدى Kdtools

اخي العزيز عنيزه الكمبوننت نفسه متوافق مع السي بلدر ايضاً يمكنك التجربه وتقبل اطيب تحياتي اخوك SUM

بسم الله الرحمن الرحيم اخي العزيز عنيزه اليك هذا الكود وارجوا ان يكون هو ماتريد var i,s:integer; begin for i:=0 to Richedit1.Lines.Count-1 do begin if pos('a',Richedit1.Lines.Strings )<>0 then for s:=1 to pos('a',Richedit1.Lines.Strings ) do RichEdit1.Lines.St…

قم بتجربة هذه الوحده ممكن تنفع معك unit HintX; interface uses Windows, Messages, Controls; type TIconHintX = class(THintWindow) protected procedure Paint; override; public function CalcHintRect(MaxWidth: Integer; const AHint: string; AData: Pointer): TRect; ov…

بسم الله الرحمن الرحيم اولاً اشكر الأخوه الذين قاموا بالرد على اخونا ASP4DB وخاصة الأخ محمد الغياث على العموم فيمكنك اخي ASP4DB بأن تنادي كل خليه بأسمها بواسطة FiledByName ومن ثم تقوم بالعمليات عليها مثلاً لديك 3 حقول الحقل الأول يحمل اسم A الحقل الثاني يحمل ا…