[es] - Promena boje u pozadini edit-a

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.

+5 Profil

^{25.01.2017. u 14:08 - pre 88 meseci}

Imam kod za promenu boje pozadine kada se fokusira na neki edit,ali da li mogu to da uradim tako sto bih to postavio u main form,negde u recimo oncreate event,i da mi menja boje u svim formama,u celoj aplikaciji...

Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: Promena boje u pozadini edit-a

^{25.01.2017. u 14:56 - pre 88 meseci}

> Imam kod za promenu boje pozadine kada se fokusira na neki edit,ali da li mogu to da uradim tako sto bih to postavio u main form,negde
> u recimo oncreate event,i da mi menja boje u svim formama,u celoj aplikaciji...

Zelis da na jednom mestu kontrolises boju svih edita u programu?
Mozda bi moglo da se resi preko stilova ili class helpera ako imas noviji Delphi, ako ne onda postoji nekoliko klasicnih pristupa:
a) Nasledis TEdit (TCustomEdit) i tu ubacis zeljenu boju i dalje koristis tu izvedenu klasu svuda
b) Subclasujes TEdit.WndProc i onda handlujes windows poruke za fokus i gubljenje fokusa i menjas boju
c) Iskopiras ceo StdCtrls.pas u dir gde ti je projekat pa izmenis direktno u fajlu sta trebas i samo rekompajliras.

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Odgovor na temu

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.

+5 Profil

Re: Promena boje u pozadini edit-a

^{25.01.2017. u 15:28 - pre 88 meseci}

Da,kao sto kontrolisem da mi umesto taba bude enter....sve iz main form,kao i jezik koji koristim,datume i slično....

Odgovor na temu

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.

+5 Profil

Re: Promena boje u pozadini edit-a

^{26.01.2017. u 21:30 - pre 87 meseci}

Mene zanima ovaj prvi nacin,jel moze neko pojasnjenje,...Dakle,kada polje bude u fokusu,da bude rezimo zuta,a kada izadje da se vrati na belu...

Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: Promena boje u pozadini edit-a

^{26.01.2017. u 22:17 - pre 87 meseci}

> Mene zanima ovaj prvi nacin,jel moze neko pojasnjenje,..

Napravis novu komponentu izvedenu iz TEdit/TCustomEdit i dalje svuda nju koristis.

Kod za nju je jednostavan, otrprilike ovako

Code:

TMyEdit = class(TEdit)
protected
    procedure DoEnter; override;
    procedure DoExit; override;
public

end;

procedure TMyEdit.DoEnter;
begin
  Color := clYellow;
  inherited;
end;

procedure TMyEdit.DoExit;
begin
  Color := clWindow;
  inherited;
end;

Odgovor na temu