procedure TForm1.Button1Click(Sender: TObject);
Var
S : AnsiString;
begin
Setlength(S,9);
ShowMessage(s);
end;
end.
Ta procedura jak pewnie zauważyliście jest podpięta do przycisku Button1 i o właściwości Caption Button1
I teraz pytanie dlaczego zmienna S zawiera 'Button1' - właściwośćCaption przycisku Button1
:| Ten kod nic sensownego nie robi a Ty piszesz jasno jak 12 kilometrów pod wodą :|
Chodzi o to że choć do zmiennej S nie przypisałem żadnej wartości to po wywołaniu funkcji ShowMessage zmienna S miała wartość Button1
co w tym dziwnego? zmienne lokalne nie są inicjalizowane, dlatego mają mniej lub bardziej losową zawartość. to samo tyczy się setlength.