🚀 go-pugleaf

Terrmit pisze:
> Terrmit pisze:
> Podobny problem poruszony był kiedyś w wątku:
> http://groups.google.pl/group/pl.comp.lang.pascal/browse_thread/thread/2c8cc7da6f194fd6/b44dfa2038660f65 
> 
> ale bez odpowiedzi.
> 
> Sławek


A odpowiedź mogłaby być przypuszczalnie taka:


Są sobie dwa obiekty - X1 i X2. Obydwa mają właściwość Count typu Integer.

I mamy taki kod:


X1.Count := 1;
X2.Count := 2;

with X1 do
begin
   with X2 do
   begin
     Count := 3;
   end;
end;



I teraz zagadka: do której właściwości odnosi się "Count := 3"? do 
X1.Count czy X2.Count?

Zastanów się DOBRZE, zanim odpowiesz...








A jak już odpowiesz, to popatrz na coś podobnego: jest forma Form1 i 
jakaś kontrolka na tej formie. I teraz mamy tak:


procedure TForm1.<jakas nazwa>;
var
   X: TComponent;
begin
   ... // tu zmiennej X nadaje się wartość

   if X is TControl then
   begin
     with TControl(X) do
     begin
       Color := clRed;
     end;
   end;


jak myślisz, co zrobi się czerwone: kontrolka, czy forma? Sprawdź zanim 
odpowiesz.