در مورد اول بايد يك سرچ كني.
قبلا در پست 19 جواب داده شده.
ولي درباره سوال 2 بايد يك سطح سكيوريتي ايجاد كني كه با ديتابيس مستوني درست كني.
Printable View
در مورد اول بايد يك سرچ كني.
قبلا در پست 19 جواب داده شده.
ولي درباره سوال 2 بايد يك سطح سكيوريتي ايجاد كني كه با ديتابيس مستوني درست كني.
سلام
مرد مباح درست ميگه. توي همين پست 19 كامل جواب دادم. اين هم لينكش.
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
لطفا کمک لطفا کمک لطفا کمک
استشو بخواین تو نت ورک من بعضیها برای بعضی کارها کارت شبکه شونو در می ارن.
من میخام یه برنامه بنویسم تا دایما اتصال به نتورکو چک کنه و اگه قطع بود یه کاری بکنه.
در ضمن میخام این یوزرهای مزاحم اجرا بودن برنامه رو در تسک منیجر نبینن ونتونن اونو ببندن.
عزيزم.
ما كه جوابتو داديم.
اون چيزي كه توي پست 19 هست رو توي يك تايمر بزار و در هر ثانيه 10 بار چك كن.
هموني كه ميخواي ميشه.
محمود جان شما كه تو پرسشت ننوشته بودي آدرس homepageفقط گفته بودی که اونا باز کنه برا همین گفتم اون رانقل قول:
نوشته شده توسط Mahmood_N
دستتم درد نکنه چون این جور چیزا که باید تو رجیستری فضولی کنی به این راحتیا درست نمیشه و بدستم نمی یاد اما
شما اونارا برا من گذاشتید بازم ممنون
بچه های فعال انجمن سلام
من دارم یه چیزی مثل اینترنت اکسپلورر میسازم و کد نویسشم تمام شده ولی یه سری باگ داره که می خوام برطرفش کنم
1. چون تو برنامه برروی دکمهenterکد نوشته شده وقتی برنامه باز میشه و شما به سایتی میرید که توش اینتر یه کاری انجام میده دیگه دکمه ی اینتر کار نمی کنه برای اینکه این مشکلا ندلشته باشم باید چکار کنم
بقیه ی سوالام را بعداً می ذارم چون الان یادم نیست
سولجر جان و بقیه ی دوستان وقتی این کد رو توی رخداد on creatبرنامم میذارم این ارور ها را میده مشکل از کجاست؟؟؟نقل قول:
سلام
کد:procedure TForm1.Button1Click(Sender: TObject);
begin
if TCP1.LocalIp = '0,0,0,0' then
Showmessage('Your not Connected!');
end;
و در اصل به tcp1 گیر میدهکد:[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'
[Error] Unit1.pas(178): Statement expected but end of file found
سلام مباح جان
ببخشيد كه خيلي طول كشيد . اما بخاطر اينكه اينجا شلوغ نشه
توي اين تاپيك مطرح كردم. خود آموزش رو هم آپلود مي كنم. ميزارم.
لينك تاپيك : [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
با سلام
من هم اين تاپيك را پيگيري مي كنم ولي سوالي دارم....
سولجير جان من برنامه اي كه براي تشخيص نوع ارتباط بود را در دلفي امتحان كردم ولي راستش خيلي چيزي از آن سر در نياوردم
اگه ممكنه برايم كمي توضيح بده (مثلا متغير result چکار مي کنه چون در مورد همين result اروور ميده و....)
البته اگه زحمتي نيست
سلامنقل قول:
با سلام
من هم اين تاپيك را پيگيري مي كنم ولي سوالي دارم....
سولجير جان من برنامه اي كه براي تشخيص نوع ارتباط بود را در دلفي امتحان كردم ولي راستش خيلي چيزي از آن سر در نياوردم
اگه ممكنه برايم كمي توضيح بده (مثلا متغير result چکار مي کنه چون در مورد همين result اروور ميده و....)
البته اگه زحمتي نيست
اون يك فانكشن هست. و يك جواب داره.
يعني مثل پروسيجر صدا زده ميشه. اما ميتوني ازش جواب هم بگيري. يعني همون نتيجه.
اينطوري :
soldier یک فانکشن هستکد:s:= soldier(3);
و به صورت بالا میشه ازش جواب یا نتیجه گرفت.
حالا امیدوارم که بتونی نتیجه فانکشن رو ازش بگیری و استفاده کنی.
مشکل دیگه ای داشتی بپرس.
فعلآ - بای
سلام
يكي جواب منا بده
سولجر جان لطفاََ دعوامون را به اينجا نكشونيد
حالا اگه هم نمي خواهيد جواب بديدي توري نيست
سلامنقل قول:
سلام
يكي جواب منا بده
سولجر جان لطفاََ دعوامون را به اينجا نكشونيد
حالا اگه هم نمي خواهيد جواب بديدي توري نيست
اگر از اين عبارات ... استفاده نكنيد.دعوايي به وجود نمياد
در ضمن . شما خيلي به خودت اطمينان داري. و همه چيز رو تقصير من ميزاري.
در ضمن هيچ توضيحي نميخواهم كه توي پست بعدي واسم ... بنويسي.
هستم خدمتتون.
سلام
سولجير جان دستت درد نكنه بررسي مي كنم اگه سوالي داشتم باز هم مزاحم مي شم
شما هنوز جواب منا نداديدا؟؟؟؟؟؟؟؟؟؟ :blink:نقل قول:
نوشته شده توسط soldier
رفيق من درباره اون كامپوننت اطلاعاتي ندارم.
سولجر جان.
لطف كن و درباره Tcp يك سري توضيحات بده و بگو توي كدوم تب از كامپوننتهاي دلفي هست.
من مشکل شما رو نمی دونم . اگر میشه کامل تر توضیح بدید.نقل قول:
شما هنوز جواب منا نداديدا؟؟؟؟؟؟؟؟؟؟
چون شما فقط یک ارر نوشتید و من نمی دونم از کجا بوجود میاد این مشکل.
خوب یه خورده بیشتر توضیح بدید.
فعلآ بای.
با سلام
خیلی واضح
من تابعی که شما نوشته بودید تو رویدادoncreatفرمم گذاشتم تا وقتی برنامه اجرا شد بفهمه وصل هستیم یا نه اما اون دوتا ارور را
داد و کار نکرد می خوام ببینم که چرا کار نمی کنه؟
2 من تو فرمم برای دکمه ی اینتر برنامه نوشتم برای همین وقتی که یه سایتی رو باز می کنه و تو اون سایت اینتر کاری انجام
میده اینتر کار نمی کنه باید چی کار کنم تا هم برای رفتن تو سایت اینتر کار کنه و تو خود سایت
سپاس از همکاریتون
کسی نمیخاد جواب بده؟
لطفا کمک لطفا کمک لطفا کمک
راستشو بخواین تو نت ورک من بعضیها برای بعضی کارها کارت شبکه شونو در می ارن.
من میخام یه برنامه بنویسم تا دایما اتصال به نتورکو چک کنه و اگه قطع بود یه کاری بکنه.
در ضمن میخام این یوزرهای مزاحم اجرا بودن برنامه رو در تسک منیجر نبینن ونتونن اونو ببندن.
سلامنقل قول:
میده اینتر کار نمی کنه باید چی کار کنم تا هم برای رفتن تو سایت اینتر کار کنه و تو خود سایت
حالا يه چيزايي متوجه شدم.
بهترين راه اينه كه اگر از WebBrowser استفاده می کنی اینه که توی OnKeyDown
اون کمپننت این رو بنویسی.
اما چون من فعلآ دلفی رو ندارم. و وضع کامپیوتر و اینترنتم کامل بهم خوردهکد:if key = chr(13) then
Button1.SetFocus;
نتونستم امتحانش کنم. کمی به کد ها ور بری مشکلت حل میشه.
(در ضمن فعلآ هم با یک کامپیوتر دیگه به انجمن میام. تا در خدمتتون باشم !:))
مشکلی داشتی بگو.
فعلآ بای.
سلام دوست عزیز.نقل قول:
کسی نمیخاد جواب بده؟
لطفا کمک لطفا کمک لطفا کمک
راستشو بخواین تو نت ورک من بعضیها برای بعضی کارها کارت شبکه شونو در می ارن.
من میخام یه برنامه بنویسم تا دایما اتصال به نتورکو چک کنه و اگه قطع بود یه کاری بکنه.
در ضمن میخام این یوزرهای مزاحم اجرا بودن برنامه رو در تسک منیجر نبینن ونتونن اونو ببندن.
ببخشید که کمی من دیر جواب دادم و نارحتت کردم.
برای چک کردن اینکه آیا نت ورک وصل هست یا نه . میتونی توی این تاپیک چیزایی پیدا کنی.
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
اگر در این مورد مشکلت حل نشد بگو تا به طور کامل و جدی پیگیری کنم.
برای اینکه میگی دایمآ چک کنه . خوب وقتی که کد رو گیر اوردی میتونی بزاریش توی یک تایمر.
برای قایم کردن فرم هم راههای زیادی هست که توی این تاپیک پیگیری شده و نتیجه هم گرفته شده.
لینک : [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
برای اینکه میگی توی تسک منیجر نبینن. بهترین راه.ساده ترین راه اینه که
تسک منیجر رو قفل کنی. با رجیستری کامپیوتر و یا خود برنامه که در پست بعدی
به صورت مفصل برات میگم.
ممنون soldier جان. لینک اولت رو فکر کنم اشتباه گذاشتی چون مربوط به بدست اوردن سریال مادربورد بود.
در مورد قفل کردن تسک منجر اگه میشه بگو..
سلام
اول از همه بهتره منو سلجر صدا بزنی.
دوم اینکه لینک اون تاپیک رو بهت داده بودم چون همش در مورد
گرفتن اطلاعات سخت افزاری از کامپیوتر بود. حالا ممکنه اسمش رو اشتباه انتخاب کرده باشن.
در ضمن من گشتم توی همون تاپیکی که لینک داده بودم. چیزی که میخواستی رو پیدا نکردم.
میتونی اونجا در خواست بدی که بهت کد رو بدن. (در خواست کد چک کردن نت ورک)
برای قفل کردن هم تا چند دقیقه میزارمش.اما روشش جالب نیست.
فکر کنم نانفرس داشته باشه. (کد قایم کردن برنامه در تسک منیج)
فعلآ بای
سولجر جان دستت درد نكنه امتحان مي كنم مي گم كار كرد يا نه
سلام
امين منتظريم ببينيم چي شد.
در ضمن هر كسي سوالي چيزي داره بپرسه. من در خدمت هستم
سولجر جان اشکال داره چون کار دکمه هایی که توی برنامه ی من هست هیچ ربطی به باز کردن سایت نداره و این کار تنها با اینتر انجام میشه
اي بابا. من كه يه طورايي گيج شدم.نقل قول:
سولجر جان اشکال داره چون کار دکمه هایی که توی برنامه ی من هست هیچ ربطی به باز کردن سایت نداره و این کار تنها با اینتر انجام میشه
اگر مي خواهي با يه اينتر دكمه مورد نظرت كليك بشه. خوب پروپرتي Defualt رو True کن.
در ضمن یه توضیحاتی بزار. من به طور کامل گیج شدم. و نمیدونم چی میخواهی.
فعلآ بای.
سولجر جان
باسلام
تو برنامه ي من پس از اينكه كاربر آدرس را وارد مي كنه يا از توي ليست انتخاب مي كنه تنها با فشار دادن دكمه ي اينتر مي تونه وارد اون سايت بشه و هيچ دكمه اي به صورت مجازي اين كارو انجام نمي ده فكر كنم خوب تو ضيح دادم
در ضمن پروپرتي default چه ربطی به این داره defyalt تنظیمات صفحه کلید را بصورت پیش فزض در میاره ! مگه نه؟
در ضمن سولجر جان گفته بودم به دل نگیر اما شما بدجوری به دل گرفتی
سلجر پس چی شد این تکه کد ما .بابا دمت گرم اینه چند دقیقه؟
سلام امیر تک
ببخشید که دیر شد . اما من اون کدی رو که نوشته بودم.
جالب نیست. یعنی اساسی نیست. روش کارم این بود که فقط تسک منیجر رو میبنده.
یه چیز دیگه. فکر کنم کد بهتر رو نانفرس داشته باشه.
اگر اون بیاد و کد رو بنویسه. خیلی بهتر و اساسی هست. اما اگر کد رو نداشت
من خودم روش خودم رو اینجا می نویسم. اینها رو هم میگم که فقط شما یه برنامه بهتر داشته باشی
فعلآ بای
سلام
منظورت از مجازی چیه؟ اگر شما یه لیست داری.
و می خواهی که فقط کلید اینتر روی لیست کار کنه. بهترین راه اینه .
که باید توی OnKeyDown شی WebBrowser باید اینطوری بنویسی.
فکر کنم اینطوری جواب بده. اگر مشکلت حل نشد. بگو که مشکلت چی هست.کد:ListBox1.SetFocus;
ListBox1.Click;
چون من دقیق یادم نمیاد که مشکلت چی بوده. در ضمن ببخشید که خیلی سوال می پرسم.
در ضمن نمیدونم با کجا هستی که میگی به دل نگیر.اما فعلآ که ناراحت نیستیم.
پس فعلآ بای. :):) (وقتی این جمله رو میگم یاد یکی از پستت میفتم که گفته بودی : به قول سلجر فعلآ بای:))
با سلامنقل قول:
نوشته شده توسط soldier
اين كار به وسيله ي يه كامبو باكس انجام مي گيره يعني يا كاربر از توي ليست كمبوباكس رسايتو انتخاب مي كنه و يا
ادرسا تو كوبو باكس تايپ مي كنه و در هر دو حالت براي رفتن به سايت مورد نظر بايد اينتر را فشار بده
ديگه كاملتر از اين نمي تونم توضيح بدم
با سپاس
خدانگهدار
سلام امین
من اون چیزی رو که میخواستی رو ساختم.
فقط چند تا چیز. با F6 کمبوباکس انتخاب میشه. در ضمن
Interval تایمر رو کم کن. و اگر میخواستی . OnChange
کمبوباکس رو هم حذف کن. چون اصلآ نیاز نیست.
این هم لینک :
[HTML]http://www.4shared.com/file/4177924/186b12c/source_a.html[/HTML]
موفق باشی.
با سلامنقل قول:
نوشته شده توسط soldier
خيلي منون اما من كه نگفتم شما بسازيد فقط اگه ميشه كدي كه روي اينتر بايد بذارم را بگيد همين
بازم ممنون اميدوارم كلتون را نخورده باشم
زكات علم آموختن آن است
سلام
خيلي خوشحالم كه بالاخره تونستم مشكلت رو حل كنم.
نه كله ام خورده نشده. ذكات علمم رو دادم :)
در مورد جمله آخر هم بايد بگم درست هست.:)
در آخر امضاي جديدت هم مبارك.
و فعلآ باي
با سلام
بابا من كه مشكلم حل نشد چون شما كدي كه بايد روي اينتر بنويسم را هنوز نگفتيد
در ضمن جمله ي آخر بخاطر اين بود كه بفهميد ذكات نادرست اما شما نفهميديد
مي خواستم ناراحت نشديد
بازم ممنون اما هنوز كدا نذاشتينا
خدا نگهدار
سلامنقل قول:
ابا من كه مشكلم حل نشد چون شما كدي كه بايد روي اينتر بنويسم را هنوز نگفتيد
كدي كه بايد توي اينتر باشه. توي اون دكمه نوشته شده.
و با يك تايمر هم تشخيص داده ميشه. اگر نمونه رو ديده باشيد متوجه ميشيد.
كار اون تايمر كه گذاشتم اينه كه وقتي كليد اينتر رو زدي. تشخيص بشه(به وسيله اون كمپننت)
و بعد دستور بده كه روي اون دكمه كليك بشه. و .....
نمونه رو با دقت بررسي كنيد. من كه بارها امتحان كردم مشكلي نداشت.
اگر مشكلي داشتيد. بگيد.
باي
خیلی ممنون مشکل حل شد
نقل قول:
نوشته شده توسط amin a.^2
خيلي خوشحال شدم.
بهت تبریک میگم.
اگه به مشکلی برخوردم بازم می پرسم
خیلی ممنون از شما
خدانگهدار
با سلام خدمت دوستان عزيز
من با دلفي تا حدودي اشنايي دارم . حالا مي خوام دلفي رو با شبكه امتحان كنم. من خودم هر وقت بخوام يه چيزي رو ياد بگيرم در قالب يه پروژه شروع مي كنم .حالا مي خواستم خواهش كنم تو اين تايپيك هم همين كار رو بكنيم . يك پروژه مثلا يك كتابخانه رو در نظر بگيريم و همه با هم پايگاه داده اونو تحت شبكه طراحي كنيم و شروع به نوشتن برنامه اون بكنيم اينطوري اولا يه كار مفيد كرديم يعني يه پروژه انجام داديم و هم با صحبت با هم خيلي چيزها ياد گرفتيم .اونايي كه با نظر من موافق هستند يه يا علي بگند تا با هم اين كار رو بكنيم .اونايي كه موافقند با من تماس بگيرند . البته اينو بگم كه اين كار ياري همه اساتيد رو مي طلبه چون من خودم اصلا دلفي تحت شبكه بلد نيستم . به اميد حق..
اين هم ميل من
....mehdi_3287575@yahoo.com
قربون همتون- باي