اجازه ندادن دسترسی به ساعت سیستم

[ستایش ستایش]

با سلام
چگونه میتوانیم به کاربر اجازه دسترسی به ساعت سیستم را ندهیم(وقتی که در ساعت بر روی نوار وظیفه دابل کلیک میکند برای باز شدن ، اجازه ندهد) ممنون میشم کد مربوطه را بگین
با تشکر

[Felony]

فکر کنم بتونی با به دست آوردن هندلش وقتی باز شد Kill بکنیش ، البته نه به این سادگی چون تو rundll32.exe هستش . شایدم راهای دیگه ای هم باشه مثل ریجستری و ...

[vcldeveloper]

تا جایی که یادم هست، کاربری که با حساب Limited وارد ویندوز میشه، اجازه تغییر ساعت سیستم را ندارد.

[arash_ebrahimi_nk]

هدفتون از این کار چیه؟
(gpedit.msc در ویندوز اکس پی پروفشنال یه گزینه برای حذف کردن ساعت از تسکبار داره.)

[ستایش ستایش]

درسته که به اين کاربران که محدوديت دارند اجازه دسترسي به ساعت را نميده
اما ما کاربري داريم با تمام دسترسي ها چه کنيم؟

[ستایش ستایش]

هدفتون از این کار چیه؟
(gpedit.msc در ویندوز اکس پی پروفشنال یه گزینه برای حذف کردن ساعت از تسکبار داره.)
چيز جالبي بود فکر کنم ميشه گفت رجيستري مجازي با دسترسي خيلي راحت تر.
اما چيزي که من ميخوام اينه که سرور و کلاينت داريم . با باز شدن برنامه، کلاينت نگاه به سرور کرده و تاريخ و زمانش را
بر اساس سرور تنظيم ميکند.حال ميخواهيم کلاينت ديگر اجازه تغيير دادن تاريخ و زمان سيستم را نداشته باشد.
چون که در داخل برنامه مدام پارامترهايي با عنوان تاريخ که از سيستم ميگيرد در بانک ذخيره ميکند. حال کد مربوطه چی میشه خدا میدونه :لبخندساده:

[hojjatcroos]

سلام یک تایمر بر روی فرم خود قرار دهید و Interval آن را یک کنید و کد زیر را کپی کنید
procedure TForm1.Timer1Timer(Sender: TObject);
var
a:HWND;
begin
a:= FindWindow(nil, 'Date and Time Properties');
ShowWindow(a,SW_HIDE)
end;
end.

[ستایش ستایش]

سلام یک تایمر بر روی فرم خود قرار دهید و Interval آن را یک کنید و کد زیر را کپی کنید
procedure TForm1.Timer1Timer(Sender: TObject);
var
a:HWND;
begin
a:= FindWindow(nil, 'Date and Time Properties');
ShowWindow(a,SW_HIDE)
end;
end.

عالییییییییییییییی بود ممنون :تشویق::تشویق::لبخندساده:
خیلی لطف کردین ممنون. اما انگاری ....(حالا چیکار کنیم که وقتی از برنامه خارج میشیم بتونه ساعت را باز کنه) آرزوی موفقیت برای شما

[ستایش ستایش]

عالییییییییییییییی بود ممنون :تشویق::تشویق::لبخندساده:
خیلی لطف کردین ممنون. اما انگاری ....(حالا چیکار کنیم که وقتی از برنامه خارج میشیم بتونه ساعت را باز کنه) آرزوی موفقیت برای شما

فهمیدم،نه که عجولیم چه کنیم دیگه مینویسیم()
procedure TForm1.Timer1Timer(Sender: TObject);
var
a:HWND;
begin
a:= FindWindow(nil, 'Date and Time Properties');
ShowWindow(a,SW_SHOW)
end;