upravljanje komponentama

Odgovori Nova tema

4 odgovora
2.430 pregleda

upravljanje komponentama 07.09.2011. u 23:49 · pre 184 meseca #1

pitanje

ako u Delphiju na formi imamo npr.

Edit1
Edit2
Edit3
Edit4

i želimo npr sa svih u toku rada programa izbrisati txt .... da li postoji način da to napravimo a da ne pišemo za svaku komponentu posebno ...nego pomoću TEdit?

tnx

Re: upravljanje komponentama 08.09.2011. u 01:44 · pre 184 meseca #2

> ako u Delphiju na formi imamo npr.
> Edit1
> Edit2
> i želimo npr sa svih u toku rada programa izbrisati txt .... da li postoji način da to napravimo a da ne pišemo za svaku komponentu posebno ...nego pomoću TEdit?

Code:

var
  i: Integer;
begin
  for i := 0 to ComponentCount - 1 do
    if Components[i] is TEdit then
      TEdit(Components[i]).Text := '';
end;

Potpis

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

Re: upravljanje komponentama - dodatno 02.12.2011. u 23:15 · pre 181 mesec #3

imam TEdit komponente, nekih 50-tak komada,

i sad trebam da mi se njih 15 obrađuje na jedan način, 15 na drugi način i 20 na treći način

imena komponenti su

txt1 - txt20

txtT1-txtT15

txtTT1 - txtTT15

KAKO napisati kod da obuhvatim sve komponente koje su mi potrebne (tako da ne moram jednu po jednu)

Ovaj prije predložen kod je dobar kad se obrađuju baš sve, ali kako kad samo neke od njih???

hvala

Re: upravljanje komponentama 02.12.2011. u 23:56 · pre 181 mesec #4

Code:
var
  i: Integer;
begin
  for i := 0 to ComponentCount - 1 do
    if Components[i] is TEdit then
    begin
      if Copy(TEdit(Components[i]).Name, 1, 5) = 'txtTT' then
        TEdit(Components[i]).Text := ''
      else if Copy(TEdit(Components[i]).Name, 1, 4) = 'txtT' then
        TEdit(Components[i]).Text := ''
      else if Copy(TEdit(Components[i]).Name, 1, 3) = 'txt' then
        TEdit(Components[i]).Text := '';
    end;
end;

Otprilike ovako?

Re: upravljanje komponentama 03.12.2011. u 09:20 · pre 181 mesec #5

Za takve stvari je pogodan Tag properties.

pozdrav

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme