![]() |
|
|
#4
|
|||
|
|||
|
procedure TForm1.Image1Click(Sender: TObject);
Код:
begin
image1.picture.loadfromfile ('click.jpg');
end; |
| Этот пользователь сказал Спасибо ApxaHGe1 за это полезное сообщение: | ||
BakalavR (11.01.2012)
| ||