🚀 go-pugleaf

Terrmit pisze:
> Magda S pisze:
>> Terrmit pisze:
>>> Magda S pisze:
>>>> Terrmit pisze:
>>> [ciach]
>>>> X1.Count := 1;
>>>> X2.Count := 2;
>>>>
>>>> with X1 do
>>>> begin
>>>>   with X2 do
>>>>   begin
>>>>     Count := 3;
>>>>   end;
>>>> end;
>>>>
>>>>
>>>>
>>> Count := 3 odnosi się do X2
>>
>>
>>
>>
>>   PUUUUUUUUUUUUUUUUDŁŁŁŁŁŁŁŁŁOOOOOOOOOOOOOOO!
>>
>>
>>
>>
> Masz dziwny kompilator.
> Zirytowałem się i napisałem przykład:
> Na formę przylepiamy Button i dwie Labelki
> 
> procedure TForm1.Button1Click(Sender: TObject);
> begin
>   with Label1 do begin
>     with Label2 do begin
>       Color := clYellow;
>     end;
>   end;
> end;
> 
> procedure TForm1.FormShow(Sender: TObject);
> begin
>   Label1.Color := clRed;
>   Label2.Color := clBlue;
> end;
> 
> Po kliknięciu w Button żółty robi się Label2 !
> label1 pozostaje czerwony!
> 
> I gdzie tu puuuuuuuuudłooooooooooooo? Gdzie pułapka?
> 
> [ciach]
>>> Bawimy się w quizy?
>>
>> Nie. Chciałam zwrócić uwagę na pewną pułapkę, w kwestii POZORNIE 
>> oczywistej.
> Kwestia jest oczywista, a nie POZORNIE oczywista. Sama nie sprawdziłaś.
> 
> Sławek

  Uruchom ten kawałek z Editem i Buttonem na formie, który dalej 
zamieszczam i zobacz, czy naprawdę oczywista. I czy naprawdę mam dziwny 
kompilator, czy to tylko Ty za płytko myślisz.

A potem przeczytaj ten wątek na p.l.c.l.delphi i zobacz, dlaczego 
oczywistość jest pozorna.