سلام
من می خواهم که روی هر DBEdit که کاربر است رنگی (High light) شود و بعد TAB را زد و به DBEdit بعدی رفت حالا قبلی به حالت معمولی برگردد و این DBEdit که کاربر هست رنگی (High light) شود الی آخر....
سلام
من می خواهم که روی هر DBEdit که کاربر است رنگی (High light) شود و بعد TAB را زد و به DBEdit بعدی رفت حالا قبلی به حالت معمولی برگردد و این DBEdit که کاربر هست رنگی (High light) شود الی آخر....
سلام
شما بایستی از رویدادهای OnEnter و OnExit استفاده کنی. کار سختی هم نیست
procedure TForm1.DBEdit1Enter(Sender: TObject);
begin
DBEdit1.Brush.Color:=$00B6F3FC;
end;
procedure TForm1.DBEdit1Exit(Sender: TObject);
begin
DBEdit1.Brush.Color:=clWindow;
end;
موفق باشید
با این کد باید برای هر DBEDIT جداگانه کد رو بنویسی ، حداقل کد رو اینطوری بکن و به ایونت همه DBEDitها Assign کن.
procedure TForm1.DBEdit1Enter(Sender: TObject);
begin
(Sender As TDBEidt).Brush.Color:=$00B6F3FC;
end;
procedure TForm1.DBEdit1Exit(Sender: TObject);
begin
(Sender As TDBEidt).Brush.Color:=clWindow;
end;
سلام
مرسی اساتید گرامی مشکلم حل شد!