PDA

View Full Version : کنترل tab



yamne_h
شنبه 17 دی 1384, 22:58 عصر
سلام
یکی کمکم کنه
من دو تا memo گذاشتم و دو تا کلید ما بینشون به صورت >> va << می خوام وقتی روی >> رفتم tab منتقل شه به این memo و برعکس
کسی می تونه کمکم کنه؟
برنامه نویسی tab رو می خوام

m-khorsandi
یک شنبه 18 دی 1384, 11:21 صبح
وقتی رو دکمه خاصی رفتین فوکوس روی memo قرار بگیره؟؟
شما در OnEnter دکمه مورد نظر کد زیر رو بنویسید :


Memo1.SetFocus;

yamne_h
یک شنبه 18 دی 1384, 13:25 عصر
دستتون درد نکنه
مشکل من هم همین بود
فقط اینکه شما یه برنامه دادین واسه ناپدید شدن فرم
همه ی اون کارارو کردم اما فرم خیلی زود نتپدید میشه لااقل 2 یا 3 ثانیه دیرتر
باید چی کار کنم؟

m-khorsandi
یک شنبه 18 دی 1384, 14:10 عصر
تو OnCreate فرم Form1 عدد 3000 رو زیاد کنید تا به زمان مورد نظر برسید.

yamne_h
یک شنبه 18 دی 1384, 14:17 عصر
ممنون
امتحان می کنم

yamne_h
یک شنبه 18 دی 1384, 14:30 عصر
ببخشید تو فرم 1 عددی نیست که 3000 رو زیاد کنم
چرا تو فرم 2 بود که تا 3000 عددهای اول رو نشون می داد
اما اینی که گفتین رو نفهمیدم
برنامتون هست دیدم شما جایی 3000 ننوشتین

yamne_h
یک شنبه 18 دی 1384, 14:38 عصر
کارایی که من کردم
اول هدر رو گذاشتم در فرم 1


public
procedure MakeSplash;
و بعد
procedure Tform1.MakeSplash;
begin
Show;
Update;
end;
و بعد در سورس پروژم نوشتم:
var
SplashAbout: Tform1;

begin
Application.Initialize;
// create and show the splash form
SplashAbout := Tform1.Create (Application);
try
SplashAbout.MakeSplash;
// standard code...
Application.CreateForm(TForm1, Form1);
SplashAbout.Close;
finally
SplashAbout.Free;
end;
Application.Run;
end.

و بعد در project/option
فرم 1 رو به قسمت avalable فرستادم
این اجرا میشه بدونه مشکل منتها در کمتر از یک ثانیه فرم ناپدید میشه


ممنون میشم مشکلمو بگین کجاست

m-khorsandi
یک شنبه 18 دی 1384, 15:15 عصر
هر تاپیک برای مطرح کردن یک سئوال هست.