بدون داشتن فرم میشه از تايمر استفاده كرد؟

سلام
شما روشي كه استفاده كرديد واسه قايم كردم! غلته!
اين رو بنويس توي فايل پروژه.dpr :

کد:

---

begin
  Application.Initialize;
  Application.ShowMainForm := False; 
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

---

با این کد! فرم قایم میشه! فقط و فقط با گشتن توی پروسه ها مشخص میشه!
در ضمن تمام پروژه ات باید عادی باشه! یعنی غیر از این هیچ کاری نکن!
حتی دستور hide رو هم ننویس! visible رو هم تغییر نده! بزارشون به حالت عادی!
موفق باشی

نقل قول:

---

با این کد فرم قایم میشه! فقط و فقط با گشتن توی پروسه ها مشخص میشه!
در ضمن تمام پروژه ات باید عادی باشه! یعنی غیر از این هیچ کاری نکن!
حتی دستور hide رو هم ننویس! visible رو هم تغییر نده! بزارشون به حالت عادی!
موفق باشی

---

خیلی ممنون

درسته، روش مخفی کردن فرم من اشتباه بود.

سلام
اگر موفق شدي كه فرم رو قايم كني! لازم نيست يك تايمر به صورت دايناميك بسازي
يك تايمر بزار روي فرم و هر كاري كه مي خواهي مي توني به راحتي انجام بدي!
راستي مشكل كامل حل شد؟

موفق باشي! باي

نقل قول:

---

سلام
اگر موفق شدي كه فرم رو قايم كني! لازم نيست يك تايمر به صورت دايناميك بسازي
يك تايمر بزار روي فرم و هر كاري كه مي خواهي مي توني به راحتي انجام بدي!
راستي مشكل كامل حل شد؟

---

میدونم. دستت درد نکنه. مشکلم حل شد.

فقط یه سوال توی ذهنم مونده، آیا امکان نداره به صورت دینامیک تایمر ایجاد کرد ؟!
فقط محض اطلاع می پرسم و گرنه مشکلم حل شده.

خیلی ممنونم

سلام
خواهش مي كنم! خوشحالم كه حل شد!

بله! به راحتي ميشه يك تايمر با خصوصياتي كامل ايجاد كرد! اين هم كدش :

کد:

---

var
    Time : TTimer;
begin
    Time := TTimer.Create(Self);
    Time.Interval := 1000;
    Time.Enabled :=True;
    Time.OnTimer := Timer;
end;

---

نوشتم كه اطلاع بشتري داشته باشي!
Timer هم یک پروسیجر هست! اگر خواستی بگو که در مورد پروسیجر Timer هم توضیح بدم!
موفق باشی ! بای

نقل قول:

---

Timer هم یک پروسیجر هست! اگر خواستی بگو که در مورد پروسیجر Timer هم توضیح بدم!
موفق باشی ! بای

---

مرسی

اگه در مورد پروسجر Timer بیشتر توضیح بدی ممنون میشم.

سلام
بفرما اين هم از همون پروسيجر كه مي خواستي!

کد:

---

procedure TForm1.Timer(Sender: TObject);
begin
    I := I + 1;
    Caption := IntToStr(I);
end;

---

در ضمن این رو بزار توی private :

کد:

---

procedure Timer(Sender: TObject);

---

I یک متغیر عددی هست! هر بار یکی اضافه میشه
و در بالای فرم نمایش داده میشه!
این فقط یک نمونه بود!
موفق باشی! بای