Components

0

Witam!

W moim programiku występują 4 komponenty image (image1,image2,3...,4....) i mam jedna procedure obslugi takiego komponentu np procedura ladujaca obrazek do wkazanego przez parametr do procedury imaga!!

kombinowalem cos takiego

const Image ='Image';
begin

TImage(Image[1]).left:=10;

ale to powoduje jakis blod..wywalaja sie jakies adresy dostepu w delphi....
moze ktos juz to wymyslił??

Pozdrawiam wszystkich!!

0

Dla twojego przykładu:

procedure TForm1.ImageChange(Sender: TImage);
begin
  Sender.Left := Sender.Left + 10;
end;

Wywołanie dla Image1: ImageChange(Image1)

1 użytkowników online, w tym zalogowanych: 0, gości: 1