Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Events OnChange za odredjenu celiju DBGrida, da li ovo moze i kako?

[es] :: Pascal / Delphi / Kylix :: Events OnChange za odredjenu celiju DBGrida, da li ovo moze i kako?

[ Pregleda: 2375 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

chips
Blazin Srdjan

Član broj: 14803
Poruke: 342
212.200.78.*



Profil

icon Events OnChange za odredjenu celiju DBGrida, da li ovo moze i kako?19.08.2006. u 17:53 - pre 213 meseci
Zeleo bi da dok ukucavam neke vrednosti u odredjenu celiju DBGrida da se za svako novu promenu u toj celiji ,vrednost trenutno iscrtanog tekst akoristi kao filter za neku drugu tabelu. Ovako nesto je sasvim lako uraditi sa recimo DBEdit poljem jer ono ima OoChange dogadjaj. Da li moze da se napravi da i celija DBGrid aima svoj OnChange dogadaj.
Sto puta sam ti SRPSKI rekao:
ono što jednom crack-uješ,
ne možeš više da patch-uješ!
 
Odgovor na temu

delalt

Član broj: 68360
Poruke: 198
*.teol.net.



Profil

icon Re: Events OnChange za odredjenu celiju DBGrida, da li ovo moze i kako?19.08.2006. u 21:23 - pre 213 meseci
Može ti ovo pomoći, možda uz malu doradu:
Code:
procedure TForm1.DBGrid1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState) ;
var
   i: Integer;
begin
  for i := 0 to DBGrid1.ControlCount - 1 do
    if DBGrid1.Controls[i] is TInPlaceEdit then 
     begin
      with DBGrid1.Controls[i] as TInPlaceEdit do 
       begin
        Label1.Caption := Label1.Caption + Text;
       end;
     end;
end;
 
Odgovor na temu

chips
Blazin Srdjan

Član broj: 14803
Poruke: 342
212.200.78.*



Profil

icon Re: Events OnChange za odredjenu celiju DBGrida, da li ovo moze i kako?19.08.2006. u 22:30 - pre 213 meseci
To je to. Samo ja sam uradio ovako, jer sam zeleo da mi filtrira odredjenu bazu i to samo iz te celije:



procedure TForm1.DBGrid1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState) ;
var
i: Integer;
begin

if DBGrid1.SelectedIndex = 14 then begin

for i := 0 to DBGrid1.ControlCount - 1 do
if DBGrid1.Controls is TInPlaceEdit then
begin
with DBGrid1.Controls as TInPlaceEdit do
begin
Table9.Filter:='nazivpolja=' + QuotedStr(Text + '*');
end;
end;
end;
end;

Svaka ČAST.
Sto puta sam ti SRPSKI rekao:
ono što jednom crack-uješ,
ne možeš više da patch-uješ!
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Events OnChange za odredjenu celiju DBGrida, da li ovo moze i kako?

[ Pregleda: 2375 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.