ارتباطات ، شبکه ، اینترنت

ببين اگه ممكنه يك كدي بزار كه وقتي كانكت شديم زمان رو بگيره و مدت زمان اتصال به اينترنتو بگه

سلام
خوب مي توني با يك تايمر چك كني! (با كدي كه نوشتم)
بعد يك متغير تغيير كنه! (اضافه بشه) و بعد اون متغير رو تقسيم بر 60 كن
ميشه دقيقه! (خودم يه برنامه نوشتم ! همينجوري كه مي خواهي)
خيلي ساده هست! در ضمن مي توني متغير رو ادامه بدي
يعني وقتي كه برنامه بسته شد! متغير توي يه فايل ذخيره بشه
وقتي كه اجرا شد برنامه متغير لود بشه و ادامه بده! اينطوي مي تونيد
بفهميد كه در ماه چقدر كنكت بوديد! توضيح بيشتر مي خواستيد بگيد
باي

ببين يك خورده گيج شدم اگه برات ممكنه كد آمادشو بزار :worried:

سلام
باشه! آماده اش مي كنم! ميزارم اينجا!
چون الآن هم سرم شلوغه هم بايد بگردم دنبال كدش!
فعلا باي

رفيق يك لطفي كن و درباره اون برنامه كه ساختي كه يك Ip بهش ميدادي و كانكت ميشد توضيح بده.
در واقع يادمون بده چي كار كنيم.

بحث خیلی جالب و مفیدی هست.

ادامه بدین.

ممنون

راست ميگه من از اون كدي كه گفتي نشون ميده با lan کانکت هستیم یا دایال آپ رو نتونستم استفاده کنم اگه ممکنه بیشتر توضیح بده

سلام
باشه حتمآ! برقا رفته بودن! الآن شد كه بيام! در پست بعدي
به همتون جواب ميدم! منتظر باشيد
باي

سلام gamelife
خوب کار خیلی ساده ای هست!
یک متغیر بزار به نام I و اینطوری وقتی که وصل شدی با مودم I اضافه میشه!
می تونی یک Memo بزاری! و توی onClose متغیر I رو بزاری توی Memo و از Memo ذخیره بشه
توی یک فایل! اینطوری!

کد:

---

Memo1.Clear;
Memo1.Lines.Add(IntToStr(I));
Memo1.SaveToFile('T.txt');

---

و توی onCreate به این صورت لود کن! این هم خود کد :

کد:

---

Memo1.LoadFromFile('T.txt');
I := StrToInt(Memo1.Lines[0];

---

این هم برای اضافه شدن متغیر

کد:

---

Function ConnectionKind : Boolean;
var
        flags : dword;
begin
        Result := InternetGetConnectionState(@flags,0);
        if Result the begin
                if (flags and INTERNET_CONNECTION_MODEM) =
                        INTERNET_CONNECTION_MODEM
                        Inc(I);
end;

---

خوب حالا می تونی این برنامه رو بزاری توی StartUp ! که وقتی وصل شدی
زمان رو ذخیره کنه! و در آخر ماه فایل T.txt رو باز کن! اون عدد رو تقسیم 60 کن! نتیجه میشه دقیقه!
اونوقت اون نتیجه ای هست که در ماه کنکت بودی!
اگر هم می خواهی می تونی یک دکمه بزاری که متغیر I رو تقسیم 60 کنه! بگه که تا حالا چقدر وصل شدی
اگر هم دوست داری می تونی یک دکمه بزاری واسه Reset کردن زمان! کار سختی نیست! متغیر I رو صفر کن !
این طوری :

کد:

---

I := 0;

---

هر سوالی ، مشکلی بود بگو تا بهت جواب بدم!
موفق باشی ! بای

نقل قول:

---

رفيق يك لطفي كن و درباره اون برنامه كه ساختي كه يك Ip بهش ميدادي و كانكت ميشد توضيح بده.
در واقع يادمون بده چي كار كنيم.

---

سلام مرد مباح عزيز!
كجا بودي! مدتي نبودي!
خوب من دقيق منظورت رو نفهميدم! اما اگر منظورت اون برنامه هست كه مثل ياهو مسنجر بود!(ابتدايي)
بگو كه در پست بعدي! كامل توضيح بدم!
موفق باشي! باي