سلام
دارم یه پروژه می نویسم که فرم نداره،ولی میخوام از یک تایمر توی برنامه استفاده کنم.
بدون داشتن فرم میشه این کار رو انجام داد ؟
ممنون
Printable View
سلام
دارم یه پروژه می نویسم که فرم نداره،ولی میخوام از یک تایمر توی برنامه استفاده کنم.
بدون داشتن فرم میشه این کار رو انجام داد ؟
ممنون
سلام
آره میشه ...
باید به صورت RunTime بسازیش ، به عبارت دیگه : Timer1.Create;
بعد باید براش مقدار دهی کنی ...
مثلا Timer1.Interval:= 1000;
می تونی یه Procedure بنویسی و رویداد OnTimer اون رو با اون Procedure ست کنی ...
موفق باشی ...
سلام
مجمود جان يك چيز رو يادش رفت! خيلي هم ضروري نيست :
اگر هم می خواستی از کار بیوفته ! این طوری :کد:Timer1.Enable := True
موفق باشیکد:Timer1.Enable := False
خیلی ممنون
سلامنقل قول:
باید به صورت RunTime بسازیش
من شنيدم دايناميك! (ممكنه دو اسم داشته باشه)
فقط مي خواستم بگم (براي اطلاعات بيشتر)
RunTime یعنی در زمان اجرا که همون حالت دینامیک( پـو یـا -Dynamic) میشه.
توی این قسمت Self رو نمیشناسه !کد:Timer1:=TTimer.Create(self);
توی این قسمت هم به مشکل خوردم !نقل قول:
می تونی یه Procedure بنویسی و رویداد OnTimer اون رو با اون Procedure ست کنی ...
میشه یه Sample بزارین ؟
خیلی ممنون از شما دوستان عزیز
ميشه كمي درباره پروژت توضيح بدي.
چي داري ميسازي كه فرم نداره ؟؟
شايد راه راحتتري وجود داشته باشه.
فکر بد نکنید، پــروژه ی بدی نیست !!نقل قول:
ميشه كمي درباره پروژت توضيح بدي.
چي داري ميسازي كه فرم نداره ؟؟
شايد راه راحتتري وجود داشته باشه
یه برنامه برای محدود کردن دسترسی یوزرها در کافی نت هاست.
البته با فرم هم پــروژه رو انجام دادم ولی اینو بیشتر به خاطر جنبه ی آموزشیش میخوام.
ممنون
سلام
خوب مي توني با فرم بسازيش اما فرم را اينويسيبل كني! (قايم كني)
سلام سولجر جاننقل قول:
سلام
خوب مي توني با فرم بسازيش اما فرم را اينويسيبل كني! (قايم كني)
الان همین کار رو کردم ولی میخوام محکم کاری کنم.آخه اگه طرف ALT+Tab رو بگیره لیست پنجره ها رو میبینه ولی اگه برنامه پنجره نداشته باشه باید توی لیست پروسس ها دنبالش بگرده !
ممنون
سلام
شما روشي كه استفاده كرديد واسه قايم كردم! غلته!
اين رو بنويس توي فايل پروژه.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 بیشتر توضیح بدی ممنون میشم.
سلام
بفرما اين هم از همون پروسيجر كه مي خواستي!
در ضمن این رو بزار توی private :کد:procedure TForm1.Timer(Sender: TObject);
begin
I := I + 1;
Caption := IntToStr(I);
end;
I یک متغیر عددی هست! هر بار یکی اضافه میشهکد:procedure Timer(Sender: TObject);
و در بالای فرم نمایش داده میشه!
این فقط یک نمونه بود!
موفق باشی! بای