ورود

View Full Version : ه با زدن دو بار Enter یک edit رو خالی کرد


aks2download
چهارشنبه 07 اسفند 1387, 17:02 عصر
کسی میدونه چطو میشه با زدن دو بار Enter یک edit رو خالی کرد؟؟؟؟
لطفا هر کی بلده کدشو اینجا بنویسه.
Felony
چهارشنبه 07 اسفند 1387, 23:45 عصر
تو رویداد KeyDown شئ Edit برنامت کد زیر رو بنویس و متغییر Check رو از نوع بایت و سراسری تعریف کن .



if GetASyncKeyState(VK_Return)<>0 then begin
Check:=Check+1;
end;
if Check=2 then begin
Edit1.Clear;
Check:=0;
end;
aks2download
جمعه 09 اسفند 1387, 15:42 عصر
تو رویداد KeyDown شئ Edit برنامت کد زیر رو بنویس و متغییر Check رو از نوع بایت و سراسری تعریف کن .



if GetASyncKeyState(VK_Return)<>0 then begin
Check:=Check+1;
end;
if Check=2 then begin
Edit1.Clear;
Check:=0;
end;


ممنون
میشه بگین چطور میشه این کد را برای یک کلید دیگه مثل space نوشت؟؟
Felony
جمعه 09 اسفند 1387, 20:35 عصر
به جای VK_Return در کد ، نام کلید مورد نظرتون رو بنویسید .
Batman
شنبه 10 اسفند 1387, 06:34 صبح
ممنون
میشه بگین چطور میشه این کد را برای یک کلید دیگه مثل space نوشت؟؟
اشاره گره ماوس رو روي مثلا VK_Return نگه داريد و سپس كليد shift رو نگه داريد و بعد روي عبارت كليك كنيد تا ليست كامل كليدها رو ببينيد.
موفق باشيد
Felony
شنبه 10 اسفند 1387, 07:00 صبح
اشاره گره ماوس رو روي مثلا VK_Return نگه داريد و سپس كليد shift رو نگه داريد و بعد روي عبارت كليك كنيد تا ليست كامل كليدها رو ببينيد.

جناب Batman اشتباه فرمودند باید کلید Ctrl رو برای این کار نگه داری .