Есть класс TPlace:
TPlace = class(TPanel)
public
pNum: TPanel;
pNumGallon: TPanel;
pPGS: TPanel;
end;
Есть родительская панель, на которой находятся несколько объектов TPlace, объектов других классов на родительской панели нет. При щелчке мышью на дочернем объекте, он записывается в переменную SelectedPlace. Также на форме есть кнопка, по нажатию на которую должен выводиться Caption следующего за выбранным элемента.
procedure TfrmMain.Button1Click(Sender: TObject);
var
aPlace: ^TPlace;
begin
aPlace := @SelectedPlace;
inc(aPlace);
ShowMessage(TPlace(aPlace^).Caption);
end;
На строке "ShowMessage(TPlace(aPlace^).pNum.Caption);"
выскакивает access violation. Т.е. не удается преобразовать элемент, хранящийся по новому адресу в TPlace. Где ошибка? В коде или в ДНК? :) Неужели элементы массива хранятся не по порядку?
@OnClick := @FindInGrid;
... где так написано делать??? – KoVadim 15 ноя '12 в 8:02